更多"在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的"的相关试题:
[填空题]在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)，此时如果在文本框中输入字符，则命令按钮Command1变为可用。请填空。
Pfivate Sub Form_Load（ ）
Command1.Enabled=False
End Sub
Private Sub Text1______
Command1.Enabled=True
End Sub
[填空题]在窗体上有二个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色),此时如果在文本框中输入字符,则命令按钮Command1变为可用。请填空。
Private Sub Form_Load（ ）
Commandl.Enabled=False
End Sub
Private Sub Text1【 】（ ）
Commandl.Enabled=True
End Sub
[简答题]
在窗体上画一个名为Command1的命令按钮和一个名为Text1的文本框。程序运行后，Command1显示为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在______处填入适当的内容，将程序补充完整。
Private Sub Form_Load（ ）
Command1. Enabled=False
End Sub
Private Sub Text1______（ ）
Command1. Enabled=True
End Sub |
[填空题]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请将程序补充完整。
Private Sub Form_Load（ ）
Command1.Enabled=False
End Sub
Private Sub Text1 【15】 （ ）
Command1.Enabled=True
End Sub
[单项选择]在窗体上有两个名称分别为Text1、Text2的文本框，—个名称为Command1的命令按钮。运行后的窗体外观如图所示。 设有如下的类型和变量声明： Private Type Person name As String*8 major As String*20 End Type Dim p As Person 设文本框中的数据已正确地赋值给Person类型的变量p，当单击“保存”按钮时，能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是______。
A. Open "c:/Test2.dat" For Output As #1 Put #1,1,p Close #1
B. Open "c:/Test2.dat" For Random As #1 Get #1, 1, p Close #1
C. Open "c:/Test2.dat" For Random As #1 ten=ten( Put #1,1,p Close #1
D. Open "c:/Test2.dat" For Random As #1 Len=Len( Get #1, 1, p Close #1
[填空题]设窗体上有一个名为CD1的通用对话框、一个名为Text1的文本框和一个名称为Command1的命令按钮。程序执行时，单击Command1按钮，则显示“打开”文件对话框，操作者从中选择一个文本文件，并单击对话框上的“打开”按钮后，则可打开该文本文件，并读入一行文本，显示在Text1中。下面是实现此功能的事件过程，请填空。
Private Sub Command1_Click（ ）
CD1.Filter="文本文件|*.txt|Word文档|*.doc"
CD1.FilterIndex=1
CD1.ShowOpen
If CD1.FileName＜＞""Then
Open______For Input As #1
Line Input #1,ch$
Close #1
Text1.Text=______
End If
End Sub
[单项选择]
设窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并有以下事件过程：
Private Sub Command1_Click（ ）
x!=Val(Text1. Text)
Select Case x
Case Is＜-10, Is＞=20
Print "输入错误"
Case Is＜0
Print 20-x
Case Is＜10
Print 20
Case Is＜=20
Print x+10
End Select
End Sub
程序运行时，如果在文本框中输入-5，则单击命令按钮后的输出结果是（）。
A. 5
B. 20
C. 25
D. 输入错误
[单项选择]设窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并有以下事件过程：
Private Sub Command1_Click（ ）
x!=Val(Text1.Text)
Select Case x
Case Is＜-10.Is＞=20
Print"输入错误"
Case Is＜0
Print 20-x
Case Is＜10
Print 20
Case Is＜=20
Print x+10
End Select
End Sub
程序运行时，如果在文本框中输入-5，则单击命令按钮后的输出结果是______。
A. 5
B. 20
C. 25
D. 输入错误
[填空题]
窗体上有名称为Command1的命令按钮及名称为Text1、能显示多行文本的文本框。程序运行后，如果单击命令按钮，则可打开磁盘文件c:/test.txt，并将文件中的内容(多行文本) 显示在文本框中。下面是实现此功能的程序，请填空。
Private Sub Command1_Click（ ）
Text1=""
Number=FreeFile
Open "c:/test.txt" For Input As Number
Do While NotEOF( [14] )
Line Input #Number，s
Text1.Text=Text1.Text+ [15] +Chr(13)+Chr(10)
Loop
Close Number
End Sub
[填空题]若窗体中已有一个为Command1的命令按钮、一个名为Label1的标签和一个名为Text1的文本框，且文本框的内容为空，然后编写如下事件代码：
Private Function f(x AS Long) As Boolean
If x Mod 2=0 Then
f=True
Else
f=False
End If
End Function
Private Sub Command1_Click（ ）
Dim n As Long
n=Val(Me!text1)
P=IIf(f(n), "Even number", "Odd number")
Me!Label1.Caption=n&"is"&p
End Sub
窗体打开运行后，在文本框中输入21，单击命令按钮，则标签显示内容为______。
[填空题]
窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框，事件代码如下：
Private Sub Command1_Click （ ）
Dim a(10) As Integer , b(10) As Integer
n=3
For i=1 T0 5
a(i)= i
b(n) = 2*n+i
Next i
Me!Text1 = a(n) + b(n)
End Sub
打开窗体，单击命令按钮，文本框Text1中显示的内容是（）。
[单项选择]窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。设有如下的类型声明：
Type Person
name As String *8
major As String*20
End Type
当单击"保存"按钮时，将两个文本框中的内容写入一个随机文件C:///Testl.dat中。设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是______。
A. Open "c: /Test1.dat" For Random As#1
B. Open "c: /Test1.dat" For Random As#1 Len=
C. Open "c:/Test1.dat" For Random As#1
D. Open "c:/Test1.dat" For Random As#1 Len=
[单项选择]窗体上有名称分别为Text1、Text2的文本框，名称为Command1的命令按钮。运行程序，在Text1中输入“FormList”，然后单击命令按钮，执行如下程序：
Private Sub Command1_Glick( )
Text2. Text = UCase( Mid( Text1. Text, 5, 4) )
End Sub
在Text2中显示的是( )。
A. form
B. list
C. FORM
D. LIST
