更多"在窗体上有一个名称为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
[单项选择]在窗体上画一个名为Command1的命令按钮和一个名为Text1的文本框,并把窗体的 KeyPreview 属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_ Load ( ) Show Text1.Text = " " Text1. SetFocus End Sub Private Sub Command1 Click( ) Text1. Text= LCase(SaveAll) End Sub Private Sub Form_ KeyPress (KeyAscii As Integer) SaveAll = SaveAll + Chr(KeyAscii) End Sub程序运行后,在键盘上输入ABCDEFG,单击命令按钮,则文本框中显示的内容为 ______ 。
A. abodefg
B. 不显示任何信息
C. ABCDEFG
D. 出错
[单项选择]窗体上有一个名为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
Nextj
text1=str(n)
End Sub
程序运行时单击命令按钮,文本框中显示的值是()。
A. 2
B. 3
C. 4
D. 5
[单项选择]在窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮,并编写有如下事件过程:
Private Sub Command1_Click( )
Dim i As Integer,n As Integer
For i=0 To 50
i=j+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