一个跳转问题

[sunfor]

在窗体里有几个控件，在KEY事件里写如下语句，用ENTER代替TAB跳转。
if key = keyenter! then
keybd_event(9,0,0,0)
keybd_event(9,0,2,0)
return 1
end if

在窗体里有个数据窗口，在数据窗口里定义个dwnkey事件里写如下语句，用ENTER代替TAB跳转。
if key = keyenter! then
keybd_event(9,0,0,0)
keybd_event(9,0,2,0)
return 1
end if

结果在数据窗口里按ENTER时，会跳转两个ENTER，但在窗体不会！
如果只在窗体里写KEY事件，数据窗口的ENTER不能代替TAB！
如果只在数据窗口里写KEY事件，窗体的ENTER不能代替TAB！

请指教。

[WYL20031722]

新建一个实例变量,如叫 blob bl_IsWindows = 1
在窗体里有几个控件，在KEY事件里写如下语句，用ENTER代替TAB跳转。
[color=#FF0000]bl_IsWindows = 1[/color]
if key = keyenter! and bl_Iswindows <> 0 then
keybd_event(9,0,0,0)
keybd_event(9,0,2,0)
return 1
end if

在窗体里有个数据窗口，在数据窗口里定义个dwnkey事件里写如下语句，用ENTER代替TAB跳转。
bl_IsWindows = 0
if key = keyenter! then
keybd_event(9,0,0,0)
keybd_event(9,0,2,0)
return 1
end if

[WYL20031722]

新建一个实例变量,如叫 blob bl_IsWindows = 1
在窗体里有几个控件，在KEY事件里写如下语句，用ENTER代替TAB跳转。
bl_IsWindows = 1
if key = keyenter! and bl_Iswindows <> 0 then
keybd_event(9,0,0,0)
keybd_event(9,0,2,0)
return 1
end if

在窗体里有个数据窗口，在数据窗口里定义个dwnkey事件里写如下语句，用ENTER代替TAB跳转。
bl_IsWindows = 0
if key = keyenter! then
keybd_event(9,0,0,0)
keybd_event(9,0,2,0)
return 1
end if

//这样试试看

[sunfor]

把bl_IsWindows = 1放在窗体的各个控件的GETFOCUS事件里就可以了。
THANKS！

[xuam]

其实窗体控件没必要搞用ENTER代替TAB跳转