13问答网 > 用VB编写一个程序，实现用户键入检查功能。当一个文本框获得焦点时，系统给出输入提示。当用户

用VB编写一个程序，实现用户键入检查功能。当一个文本框获得焦点时，系统给出输入提示。当用户

2025-04-16 02:51:08

推荐回答（1个）

回答1：

不知道你要的是什么版本，以下代码适用于VB6：

Private Sub Text1_GotFocus()
Label1.Caption = "请输入"
End Sub

Private Sub Text1_LostFocus()
If Not IsNumeric(Text1.Text) Then Label1.Caption = "你输入的不是数字！"
End Sub

需要一个文本框Text1配合一个标签Label1来使用。