>thisform.Grid1.Column4.ControlSource = "csrMyCursor.sticket - csrMyCursor.eticket" >>Good Luck!
>>Select bookno,sticket,eticket,noofticket,boxno from trans1 into cursor csrmyCursor readwrite where .F. >>SELECT csrMyCursor >>With thisform.Grid1 >> .RecordSource = "csrMyCursor" >> .Column1.ControlSource = "csrMyCursor.bookno" >> .Column2.ControlSource = "csrMyCursor.sticket" >> .Column3.ControlSource = "csrMyCursor.eticket" >> .Column4.ControlSource = "csrMyCursor.noofticket" >> .Column5.ControlSource = "csrMyCursor.boxno" >> >> append blank >> .Refresh() >>ENDWITH >>