A.
B.
C.
D.
[单选题]窗体上有名称分别为Text1、Text2的2个文本框,要求文本框Text1中输入的数据小于500,文本框Text2中输入的数据小于1000,否则重新输入。为了实现上述功能,在以下程序中问号(?)处应填入的内容是。Private Sub Text1_LostFocus()C.all CheckInput(Text1,500)E.nd SubPrivate Sub Text2_LostFocus()C.all CheckInput(Text2,1000)E.nd SubSub CheckInput(
[单选题]窗体上有名称分别为Text1、Text2的2个文本框,要求文卒框Text1中输入的数据小于500,文本框Text2中输入的数据小于1000,否则重新输入。为了实现上述功能,在以下程序中问号(?)处应填入的内容是______。 Private Sub Text1 LostFocus() Call CheckInput(Text1,500) End Sub Private Sub Text2 LostFocus() Call CheCkInput(Text2,1000) End Sub Sub Ch
[单选题]在窗体上放一个文本框Text1,在文本框中输入456,并有下列事件过程:Private Sub Form_Click()x=InputBox("请输入一个整数")Print x+Text1.TextE.nd Sub单击该窗体,在输入对话框中输入123,单击“确定”按钮后,窗体上显示的是( )。A.123B.456C.579D.123456
[单选题]在窗体上放一个文本框Text1,在文本框中输入456,并有下列事件过程: Private Sub Form_Click() x=InputBox("请输入一个整数") Print x + Text1.Text End Sub单击该窗体,在输入对话框中输入123,单击“确定”按钮后,窗体上显示的是。A. 123 B. 456 C. 579 D. 123456
[单选题]文本框Text1的KeyDown事件过程如下: Private Sub Text 1_KeyDown(KeyCode As Integer,Shift As Integer) … End Sub 其中参数KeyCode的值表示的是发生此事件时( )。A.是否按下了<Alt>键或<Ertl>键B.按下的是哪个数字键C.所按的键盘键的键码D.按下的是哪个鼠标键
[单选题]在窗体上画一个名称为Text1的文本框,要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是( )。A.Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii < 65 Or KeyAscii > 90 Then MsgBox "请输入大写字母" KeyAscii = 0 End If End SubB.Private Sub Text1_KeyDown(KeyCode As Intege
[单选题]在窗体上画一个名称为Text1的文本框,要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是A.Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii < 65 Or KeyAscii > 90 Then MsgBox "请输入大写字母" KeyAscii = 0 End If End SubB.Private Sub Text1_KeyDown(KeyCode As Integer, Shift As I
[单选题]在窗体上画一个名称为Text1的文本框,要求文本框只能接收大写字母的输入,以下能实现该操作的事件过程是______。A.Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii<65 Or KeyAscii>90 Then MsgBox"请输入大写字母" KeyAscii=0 End If End SubB.Private Sub Text1_KeyDown(Keycode As Integer, Shift As Integer
[单选题]在窗体上放一个文本框Text1,在文本框中输入456,并有如下事件过程, Private Sub Form. Click() x=InputBox("请输入一个整数") Print x+Text1. Text End Sub 单击该窗体,在输入对话框中输入123,单击“确定”按钮后,窗体上显示是( )。A.123B.456C.579D.123456
[单选题]在窗体上放一个文本框Text1,在文本框中输入456,并有如下事件过程: Private Sub Form_Click() x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 单击该窗体,在输入对话框中输入123,单击“确定”按钮后,窗体上显示是( )。A.123B.456C.579D.123456