问题
单项选择题
窗体上有名称分别为Text1、Text2的两个文本框，要求文本框Text1中输入的数据小于500，文本框Text2中输入的数据小于1000，否则重新输入。为了实现上述功能，在以下程序中间号()处应填入的内容是
Private Sub Text1_LostFocus()
Call CheekInput(Text1,500)
End Sub
Private Sub Text2_LostFocus()
Call CheekInput(Text2,1000)
End Sub
Sub Cheeklnput(t As , x As Integer)
If Val(t.Text)＞x Then
MsgBox "请重新输入!"
End If
End Sub
A．Text
B．SelText
C．Control
D．Form
答案
参考答案：C
解析： 从调用CheckInput过程的实参和CheckInput过程中的条件语句“If Val(t.Text)＞x then”可以看出，变量t应该代表的是文本框控件。使用控件作为参数时，可以定义形参的类型为该控件类或Control，即此处填写TextBox或Control程序都能正确运行，根据题目选项，本题答案为C。