在窗体上画一个命令按钮和两上文体,其名称分别为 Command1 、 Text1 和 Text2 ,然后编写如下程序:
Dim S1 As String, S2 As String
Private Sub Form_Load()
Text1. Text=””
Text2. Text=””
End Sub
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
S2=s2 & Chr(KeyCode)
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
S1=S1 & chr(KeyAscii)
End Sub
Private Sub Command1_Click()
Text1.Text=S2
Text2.Text=S1
S1=""
S2=""
End Sub
程序运行后,在Text1中输入"abc",然后单击命令按钮,在文本框 Text1 和 Text2 中显示的内容分别为( )。A.abc 和 ABC
B.abc 和 abc
C.ABC 和 abc
D.ABC 和 ABC
第1题:
在窗体上画两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:
Private Sub Command1_Click()
Text 1="VB programming"
Text 2=Text 1
Text 1="ABCD"
End Sub
程序运行后,单击命令按钮,文本框Text 2中显示的内容为【 】。
第2题:
在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程: Private Sub Command1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case 2,4,6 x=20 Case Is<10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是 ______。
A.10
B.20
C.30
D.40
第3题:
在窗体上画两个文本框,(其Name 属性分别为Text1和Text2)和一个命令按纽(其Name属性为Command1),然后编写如下事件过程()
A1和0
B2和72
C3和50
D4和168
第4题:
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Command1_Click() A=Text1.Text+TextText Print a End Sub Private SUb Form胃Load() Text1.Text= " " TextText=" " End Sub程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入33和44,然后单击命令按钮,则输出结果为
A.77
B.33+44
C.3344
D.4433
第5题:
在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Tem1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:
Private Sub Command1 Click()
Text3=Text1+Text2
End Sub
Private Sub Forml Load()
Text1=""
Text2=""
Text3=""
End Sub
打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。
第6题:
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?
程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为:同学们,你们好。
略