>>>Are there any short-cut key to return back the column to left most
>>>column in browse window!?
>>>
>>>For some reasons, user need to use browse to lookup information
>>>but feel inconvience on moving!
>>No shortcut key. If browse is browse (not grid) then you could assign a menu shortcut or "on key" to do it (beware about validation etc).
>>

>>do while !varread()="LEFTMOSTFIELD"
>>  keyboard "{TAB}"
>>enddo
>>

>>Cetin
>
>Sorry again, the Keyboard statement seem fail to work in browse window...
>it becomes an infinite loop...
You're right (and it was kludgy).

clear all
push key clear
use (home()+"samples\data\customer")
on key label "F4" do plsScrollToLeftMost     && Beware - On key label would interrupt events !!!
browse name mybrowse
push key clear
use

function plsScrollToLeftMost
with mybrowse
	do while .columns(.activecolumn).columnorder # 1
	   .doscroll(6)
	   .activatecell(.relativerow,1)
	enddo
endwith	

Cetin