hi,
thank you for reply,
I TRY VIA PROPERTIES NOT WORKS...>column.visible=.f.



>column.visible=.f.
>

>Select bookno,sticket,eticket,NOOFTICKET,BOXNO,shipno,trans_type from trans1 into cursor csrmyCursor readwrite where .F.
>SELECT csrMyCursor
>With thisform.Grid1
>  .RecordSource = "csrMyCursor"
>  .Columncount = 7
>  .Column1.ControlSource = "csrMyCursor.bookno"
>  .Column2.ControlSource = "csrMyCursor.sticket"
>  .Column3.ControlSource = "csrMyCursor.eticket"
>  .Column4.ControlSource = "csrMyCursor.noofticket"
>  .Column5.ControlSource = "csrMyCursor.boxno"
>  .Column6.ControlSource = "csrMyCursor.shipno"&&&&&&HIDE AT MY FORM(GRID1)
> .Column7.ControlSource = "csrMyCursor.trans_type"&&&&&HIDE AT MY FORM(GRID1)
>  .column6.visible=.f.
>  .column7.visible=.f.
>    append blank
>  .Refresh()
>ENDWITH
>
>