更多"在窗体中使用一个文本框(名为numl)接受输入值，有一个命令按钮run"的相关试题:
[填空题]在窗体中使用一个文本框(名为numl)接受输入值，有一个命令按钮run13，事件代码如下：
Private sub run13 Click（ ）
If Me! num1＞=60 Then
result="及格"
Else If Me! numl＞=70 Then
result="通过"
Else if Me!mum1＞=85 Then
result="合格"
End If
MsgBox result
End Sub
打开窗体后，若通过文本框输入的值为85，单击命令按钮，输出结果是______。
[填空题]在窗体中使用一个文本框(名为x)接受输入值，有一个命令按钮test，事件代码如下：
Private Sub test_Click（ ）
y=0
For i=0 To Me! x
y=y+2*i+1
Next i
MsgBox y
End Sub
打开窗体后，若通过文本框输入值为3，单击命令按钮，输出的结果是______。
[单项选择]在窗体上画一个命令按钮和一个文本框，并将窗体的KeyPreview属性设置为True，然后编写如下代码：
Dim SaveAll As String
Private Sub Form_Load（ ）
Show
Text1.Text=" "
Text1.SetFocus
End Sub
Private Sub Command1_Click（ ）
Text1.Text = Ucase(SaveAll)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后，在键盘上输入abcdefg，单击命令按钮，则文本框中显示的内容为
A. abcdefg
B. 不显示任何信息
C. ABCDEFG
D. 出错
[单项选择]在窗体上画一个命令按钮和一个文本框，并把窗体的KeyPreview属性设置为True，然后编写如下代码： Dim SaveAll As String Private Sub Command1_Click（ ） Text1.Text=UCase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAseii) End Sub 程序运行后，在键盘上输入“abcdefg”，单击命令按钮，则文本框中显示的内容为 ______ 。
A. abcdefg
B. 不显示任何信息
C. ABCDEFG
D. 出错
[单项选择]在窗体中使用一个文本框(名称为num1)接受输入值，有一个命令按钮run13，事件
代码如下：
Private Sub run13_Click（ ）
If Me!num1＞=60 Then
result="及格"
Else If Me!num1＞=70 Then
result="通过"
Else If Me!num1＞=80 Then
result="合格"
End If
MsgBOx result
End Sub
打开窗体后，若通过文本框输入的值为85，单击命令按钮，输出结果是
A. 及格
B. 通过
C. 合格
D. 其他
[填空题]在窗体中使用一个文本框(名为num1)接受输入值，有一个命令按钮run13，事件代码如下：
Private Sub run13_Click（ ）
If Me!num1＞=60 Then
result="及格"
ElselfMe!num1＞=70 Then
result="通过"
Elself Me!numl＞=85 Then
result="合格"
End If
MsgBox result
EndSub
打开窗体后，若通过文本框输入的值为85，单击命令按钮，输出结果是 【13】 。
[单项选择]在窗体上画一个名为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. 出错
[填空题]通过选择组合框中的选项来改变文本框的字体。在窗体中添加一个组合框 (Combo1)和一个文本框(Text1)，代码如下。请填入适当的内容，将程序补充完整。
Private Sub Combo1_Cliek（ ）
Text1. FontName=Combo1. List(Combo1. Listlndex)
End Sub
Private Sub Form_Load（ ）
With Combol
Addltem"宋体"
Addltem"隶书"
Addltem"黑体"
·Addltem"楷体_GB2312""
·Listlndex＝0
End With
Text1. 【8】 30
Textl. 【9】 =Combol.List(0)
End Sub
[单项选择]在窗体中使用一个文本框(名为n)接受输入的值，有一个命令按钮run，事件代码如下： Private Sub run_click( ) result ="" For i=1 TO Me! n For j=1 TO Me! n result = result+"*" Next j Result=result+Chr(13)+Chr(10) Next i MsgBox result End Sub 打开窗体后，如果通过文本框输入的值为4，单击命令按钮后输出的图形是( )。
A. * * * * * * * * * * * * * * * *
B. * * * * * * * * * * * * * * * *
C. * * * * * * * * * * * * * * * * * * * * * * * * * * * *
D. * * * * * * * * * * * * * * * *
