首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > PB >

一个跳转有关问题

2012-02-04 
一个跳转问题在窗体里有几个控件,在KEY事件里写如下语句,用ENTER代替TAB跳转。if key keyenter! thenkeyb

一个跳转问题
在窗体里有几个控件,在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!

请指教。



[解决办法]
新建一个实例变量,如叫 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

//这样试试看

热点排行