殷小宝 发表于:2011-01-24 00:22:46
在报销管理系统中经常用到"新增"按钮,点击"新增",打开"新增窗体(后缀后为_child_Add)",其中有"保存"及"关闭"按钮,怎样能使焦点移到"保存"按钮上去,这时只要按回车键就能达到保存的目的,这样就不用鼠标操作了,提高了效率,请问老师们,应该写怎么的代码用回车键将焦点移到"保存"上去呢?谢谢了.
保存.SetFocus
这个有多种办法,最简单的就是先在这个按钮属性中将制表位由否选为是,再在TAB键次序中把这个按钮拖到最后,或相应控件后。看下面截图
这个问题已经出现了一个矛盾,既然回车后焦点到按钮上,然后回车后进行保存的操作,那就说明保存按钮都是多余的。既然多余就不必要这个按钮控件,可以将该按钮控件下的代码写为一个子程序,然后在需要输入的最后一个控件中调用该子程序即可。
上面的老师都理解错了,我说的是基础教程中的报销管理系统中的Active控件,如下图所示:
煮江品茶老师,说得对,难怪以下代码不起作用了.
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
cmd_Save
End If
End Sub
如果能起作用的话,"保存"不是多余的吗?请问老师们,有办法解决吗?
但是用这个代码能起作用:
Private Sub fzxm_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
cmd_Save
End If
End Sub
不信,老师们试试.