Dim ctl As Control
Set ctl = Screen.ActiveControl
Print "当前得到焦点的是:" & ctl.Name
End Sub
更正一下楼上的getfocus,应该是GotFocus,用GotFocus或者LostFocus做个记录也可以返回
还有许许多多的方法,希望楼主多加探索
getfocus 是事件，当一个控件得到焦点时触发；
setfocus是方法，是让某个控件得到焦点。
txtusername.getfocus
【紧急求助】vb如何返回获得焦点的文本框
Private Sub Form_Click()Dim ctl As Control Set ctl = Screen.ActiveControl Print "当前得到焦点的是:" & ctl.Name End Sub 更正一下楼上的getfocus,应该是GotFocus,用GotFocus或者LostFocus做个记录也可以返回 还有许许多多的方法,希望楼主多加探索 ...
VB紧急求助,我已经在线等了2个多小时了,55555
'添加一个按钮和一个文本框，文本框的multiline属性设置成true，粘贴代码，点按钮看结果 '有问题不要发消息，发消息收不到，发百度HI才能收到，就点我回答下面的那个“在线交谈”或者离线留言之类的
紧急求助:VB中的句柄是什么意思
简单说就是 窗口，按钮，图标，滚动条，输出设备，控件或者文件等在windows系统下的唯一标识，应用程序几乎总是通过调用一个WINDOWS函数来获得一个句柄，之后其他的WINDOWS函数就可以使用该句柄，以引用相应的对象
文本框链接是什么
一\\组合,按绘图工具栏的斜上向箭头,单击左键拖动鼠标选中全部文本框,右键-组合-组合. 二\\文本框内容链接: 将第一个框中无法容纳的文字自动排入下一个文本框,单击文章的第一个文本框。 1\\选中第一个文本框,右键-单击“创建文本框链接”-鼠标指针变为罐状指针。在希望作为文字部分中下一个框的文本...
紧急求助:VB中的句柄是什么意思
句柄是一个对象的唯一ID，是系统自动分配给的，通过这个句柄就能够对这个对象进行发送消息或者获取它的场景（Hdc），总之，句柄是指向一个对象的指针。
【紧急求助】求高手指教一段VB代码,为何老是说下标越界?
4，6）就不会出错。正确的解决方法：从一开始就定义数组a为a（5，5）即可。Private Sub Command1_Click()ReDim a(5, 5)For i = 1 To 4 For j = 1 To 5 a(i, j) = Int(Rnd * 9) + 1 Print a(i, j); " ";Next j Print Next i ………...
紧急求助vb程序卡死
这样就好了：For i = 0 To 100 Sleep 1000 Beep DoEvents '让程序响应系统指令，防止锁死 Next i
【紧急求助】 vb 写一个迅雷7弹出窗口的样子
你打开迅雷,点击工具--配置--监视设置,把监视对象下面的几个选勾全部去掉应用确定,在写日志
