VFP 愛用者社區

[Terry1211]

請問板上前輩~~
小弟在ListBox裡的Click事件內，有以下程式碼，把ListBox 拿來搜尋資料，
並會更新form內的TextBox，ListBox的DataSource為Cursor

Local tSearch as String
tSearch = ALLTRIM(cTemp.OrderNO)
Select DBF
Set Order To OrderNO
Seek tSearch
If Found()
Thisform.Refresh
ELSE
Return
Endif

但是有時候會突然發生奇怪現象，執行程式後，有時候會出現 不論點任何一筆資料，都會回到Listbox內特定的一筆，Form內的TextBox，會正常更新，EX：

１
２
３
４
５

無論點哪一筆資料，都會馬上跳回到第三筆，正常情況點哪一筆，哪一筆就因該被反白，並停在點擊的那一筆資料；把程式碼換到DBClick 或是 InteractivateChange 內，也會有同樣的情形發生，而且都是隨機的，雖然功能正常，但會讓使用者看得有點臂扭，搜尋板上資料好像沒有相關討論，我該怎麼解決這個問題~~

[saint]

我想應該用listindex吧..

[andywilliams]

!Found() 時 要返回原 recno()