更多"窗体上有名称分别为Text1、Text2的2个文本框，要求文本框Tex"的相关试题:
[单项选择]窗体上有2个名称分别为Text1和Text2的文本框。编写如下程序： Private Sub Form_Load（ ） Private Sub Command 1_Click（ ） Text1．Text="" Print Text1．Text+Text2．Text Text2．Text="" End Sub End Sub 程序运行后，在Text1和Text2中依次输入100和200，单击Command 1，则输出结果为
A. 100
B. 200
C. 300
D. 100200
[单项选择]窗体上有名称分别为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
[单项选择]窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。设有如下的类型声明：
Type Person
name As String*8
major As String*20
End Type
当单击命令按钮时，将两个文本框中的内容写入一个随机文件Test.dat中。设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是( )。
A. Open "c:/Test.dat" For Random As#1
B. Open "c:/Test.dat" For Random As #1
C. Open "c:/Test.dat" For Random As#1 Len=Len(p)
D. Open "c:/Test.dat" For Random As#1 Len=Len(p)
[单项选择]窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyDown事件过程如下：
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Dim s As String
s=Chr(KeyCode+35)
Text2.Text=s
End Sub
当向文本框Text1中输入小写字母a时，文本框Text2中显示的是
A. A
B. a
C. D
D. d
[单项选择]窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：
Private Sub Text1_KeyUp(KeyCode As Integer，Shift As Integer)
Dim c As String
c=UCase(Chr(KeyCode))
Text2．Text=Chr(Asc(c)+2)
End Sub
当向文本框Text1中输入小写字母a时，文本框Text2中显示的是( )。
A. A
B. a
C. C
D. c
[单项选择]在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Commandl_Click( ) n=Text1.Text Select Case n Case 1 T0 20 x=10 Case 2，4，6 x=20 Case ls<10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是
A. 10 B。20
B. 30
C. 40
[单项选择]在窗体上画两个名称分别为 Text1、Text2的文本框和一个名称为 Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click（ ）
Dim x As Integer， n As Integer
x = 1
n = 0
DoW hilex ＜ 20
x = x * 3
n = n + 1
Loop
Text1.Text = Str(x)
Text2.Text = Str(n)
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值分别是________。
A. 15和 1
B. 27和 3
C. 195和 3
D. 600和 4
[单项选择]在窗体上画一个名称为Commaudl的命令按钮和两个名称分别为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
