vb保持控件活动

来源:百度知道 编辑:UC知道 时间:2024/06/25 05:50:21
就是说你按了某一command之后,还是text活动,直接可以在键盘上键入

还有一个问题,command如何相应键盘,就是像计算器一样,你按键盘上的1,控件1也会凹下去。

Private sub commanmd1_click()
text1.setfocus
end sub

做控件数组
Private sub command1_keypress(index as integer)
if keyascii =... then
command1(...).click
elseif keyascii=... then
...
endif
end sub

Private sub command1_click(index as integer)
select case index
case 0
...
case 1
...
...
end select
end sub

Private Sub Command1_Click()
Text1.SetFocus
End Sub

在command控件属性里面找。

1问:textbox1.Focus
2问:text后面加上(&1)

把窗体的 KeyPreview 属性设为TRUE。然后处理窗体的 KeyDown、KeyUp 和 KeyPress 事件。