UC知道VB程序焦点
来源：百度知道 编辑：UC知道 时间：2024/06/23 22:11:12
有text1 text2 text3 3个text 一个CM确定按钮 当text1，text2输入数字 text3没输入数字的时候我想让确定按钮判断没有输入并把光标移动到TEXT3位置 并输入“没有输入数据” 急急急 请给出详细答案 给高分 谢谢
首先判断text1，2是否有输入数字了，可以在两个文本框都有数据的时候使cm按钮的enable为true 否则为false 然后判断text3是否为空，为空则text3的写入数据“没有输入数据”
在text1和text2的change事件中输入代码：
if text1.text<>"" and text2.text<>"" then
cm.enable=true
else
cm.enable=false
end if
在cm按钮的click事件中写入代码：
if text3.text="" then
text3.text="没有输入数据"
else
你想要的效果
end if
用getfouse
Private Sub CM_Click()
If Len(Text1.Text) <> 0 And Len(text2.Text) <> 0 And Len(Text3.Text) = 0 Then
Print "没有输入数据"
Text3.SetFocus
End If