更多"在窗体上添加—个文本框,名为Text1,然后编写如下的Load事件过程"的相关试题:
[单项选择]在窗体上添加一个文本框Text1,然后编写下列Load事件过程,则程序运行结果是( )。
Private Sub Form_Load( )
Text1.Text=""
Text1.SetFocus
For k=1 To 5
t=t*k
Next k
Text1.Text=t
End Sub
A. 在文本框中显示120
B. 文本框中仍为空
C. 在文本框中显示1
D. 出错
[单项选择]在名为Form1的窗体上添加三个文本框和一个命令按钮,其名称分别为Text1、Text2、Text3和Command1,然后编写如下两个事件过程:
Private Sub Command1_Click( )
Text3=Textl+1Text2
End Sub
private Sub Form1_Load( )
Text1=""
Text2=""
Text3=""
End Sub
打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为
A. 57
B. 12
C. 5
D. 出错
[填空题]在名为“Form1”的窗体上添加3个文本框(Text1、Text2和Text3)和1个命令按钮Command1,编写如下事件过程:
Private Sub Command1_Click( )
Text3=Text1+Text2
End Sub
打开窗体Form1后,在Text1和Text2中分别输入5和10,然后单击命令按钮Comrnand1,则Text3中显示的内容为______。
[单项选择]在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),则执行如下事件过程后,文本框中的输出为______。private Sub Command1_ click( ) for i = 1 To 4 for j = 1 To 3 x = 3 for K = 1 To 2 x=x+3 Next K Next j Next i Text1.Text= Str(x)End Sub
A. 3
B. 6
C. 9
D. 12
[单项选择]在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码:
Private Sub Command1_Click( )
m=2.17
n=Len(Str$(m)+Space(5))
Mc! Text1=n
End Sub
打开窗体运行后,单击命令按钮,在文本框中显示( )。
A. 5
B. 8
C. 9
D. 10
[填空题]在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Text1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:
Private Sub Commandl Click( )
Text3=Text1+Text2
End Sub
Private Sub Form1 Load( )
Text1=" "
Text2=" "
Text3=" "
End Sub
打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为 【14】 。
[填空题]在名为”Form1”的窗体上添加三个文本框和一个命令按钮,其名称分别为"Text1"、"Text2"、"Text3"和"Command1",然后编写如下两个事件过程:
Private Sub Command1_Click( )
Text3=Text1+Text2
End Sub
打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和10,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为______。
[单项选择]在窗体上画一个文本框Text1、一个标签Label1和一个命令按钮Command1,然后编写如下两个事件过程: Private Sub Command1_Click( ) a=InputBox("请输入一个字符串") Text1.Text=a End Sub Private Sub Textl_Change( ) Label1.Caption=UCase(Mid(Text1.Text,8)) End Sub 程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串“Visual Basic”,则在标签中显示的内容是
A. visual basic
B. VISUAL BASIC
C. basic
D. BASIC
[单项选择]在窗体上画 1 个文本框,其名称为 Text1,然后编写如下过程: Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode)
End Sub
Private Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2)
End Sub 程序运行后,把焦点移到文本框中,此时如果敲击"A"键,则输出结果为______。
A. A
B. A
C. A
D. A