更多"在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属"的相关试题:
[单项选择]在窗体上建立三个文本框,名称分别为Text1、Text2和Text3,一个命令按纽,名称为command1,如果在TEXT1中输入数200,在TEXT2中输入数150,则执行下列程序后,TEXT3的值为______。 Private Sub Command1_Click( ) Dim m, n As Integer m = Val (Text1. Text) n = Val (Text2. Text) If n * m = 0 Then Exit Sub End If If m < n Then t =m: m= n: n = t End If Do r = m Mod n m= n n =r Loop While r <> 0 Text3. Text= m End Sub
A. 200
B. 50
C. 100
D. 150
[填空题]在窗体上添加一个文本框控件Info,画一个命令按钮,当单击命令按钮显示“保存文件”对话框,设置该对话框可用于保存文本文件(默认)和可执行文件(.exe),然后在文本控件中显示保存的文件名。
Private Sub Command1_Click( )
CommonDialog1.Filter=【 】
CommonDialog1.FilterIndex=【 】
CommonDialog1.ShowSave
Info.Text=【 】
End Sub
[填空题]在窗体上画一个名称为Commandl的命令按钮和一个名称为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的文本框。程序运行后,Command1为禁用(灰色),此时如果在文本框中输入字符,则命令按钮Command1变为可用。请填空。
Private Sub Form_Load( )
Command1.Enabled=False
End sub
Private Sub Text1_()( )
Command1.Enabled=Tree
End Sub
[单项选择]在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码:
Private Sub Command1_Click( )
k=0
Do While k < 70
k=k+2
k=k*k+k
a=a+k
Loop
Text1.Text=a
End Sub
程序运行后,文本框中显示的是
A. 20
B. 32
C. 44
D. 78
[填空题]在窗体中添加一个命令按钮cmd和一个文本框txt,然后编写如下事件过程:
Private Sub cmd_click( )
Dim x As Integer, y As Integer, z As Integer
x=5
y=7
z=0
Me! Txt=""
Call p(x,y,z)
Me! txt=z
End Sub
Sub p(a As Integer, b As Integer, e As Integer)
c=a+b
End Sub
单击按钮,文本框显示的内容是 【12】 。