[单项选择]在窗体上放一个文本框Text1，在文本框中输入456，并有下列事件过程：

Private Sub Form_Click（　）

x=InputBox("请输入一个整数")

Print x+Text1.Text

End Sub

单击该窗体，在输入对话框中输入123，单击“确定”按钮后，窗体上显示的是( )。
A. 123
B. 456
C. 579
D. 123456

更多"在窗体上放一个文本框Text1，在文本框中输入456，并有下列事件过程"的相关试题:

[单项选择]在窗体上放一个文本框Text1，在文本框中输入456，并有如下事件过程： Private Sub Form_Click（　） x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 单击该窗体，在输入对话框中输入123，单击“确定”按钮后，窗体上显示是( )。
A. 123
B. 456
C. 579
D. 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，编写下列代码：
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode+51 ＆KeyCode)
End Sub
程序运行时，在文本框中输入“ab”，则在窗体上输出为( )。
A. F65
B. F65
C. G66
D. G65

查看答案

[单项选择]窗体上添加一个文本框Text1，编写如下代码： Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode+5) & KeyCode End Sub 程序运行时，在文本框中输入“ab”，则在窗体上输出为( )。
A. F65 G66
B. F65 F66
C. G66 F65
D. G65 G66

查看答案

[单项选择]在窗体上有文本框Text1和命令按钮Command1，并有如下事件过程： Private Sub Command1_Click（　） Dim i As Integer, n As Integer For j=0 To 50 i=i+3 n=n+1 If i＞10 Then Exit For Next Text1.Text=Str(n) End Sub
A. 2
B. 3
C. 4
D. 5

查看答案

[单项选择]在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String 　　Str=Chr(KeyAscii) 　　KeyAscii=Asc(UCase(str)) 　　Text1.Text=String(2,KeyAscii) End Sub 程序运行后，如果在键盘上输入字母"b"，则在文本框Text1中显示的内容是
A. bbb
B. BBB
C. BB
D. bb

查看答案

[单项选择]在窗体上画一个文本框，然后编写如下事件过程：Private Sub Text1_ KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1. Text= String(6，KeyAscii)End Sub程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为______。
A. a
B. A
C. aaaaaaa
D. AAAAAAA

查看答案

我来回答:

提交