更多"在窗体上画一个命令按钮，名称为Comraandl。单击该命令按钮时，执"的相关试题:
[简答题]完成下列问题：
在名称为Form1的窗体上画一个命令按钮，名称为Command1，其标题为“移动本按钮”，如图2所示。
[*]
要求编写适当的事件过程，使得程序运行时，每单击按钮一次，按钮向左移动100。
要求：程序中不得使用变量，事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
[填空题]在窗体上画一个通用对话框，其名称为CommandDialog1，再画一个命令按钮，其名称为Command1。程序运行时，单击命令按钮，在对话框内只允许显示文本文件。将以下程序补充完整。
Private Sub Command1_Click（ ）
CommandDialog1．Filter= 【15】
CommandDialog1．ShowOpen
End Sub
[单项选择]在窗体上画一个命令按钮，名称为Command1。
Private Sub Command1 Click（ ）
Dim x As Integer，y As Integer
x=10:y:0
Do
x=x+2:y=y+x
Print "x=", x; "y=",y
If y＞20 Then Exit Do
Loop Until x=18
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是 ______。
A. x=12y=12
B. x=12 y=12
C. x=12 y=12
D. x= 12 y=12
[填空题]在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为 Text1)，然后编写如下事件过程：
Private Sub Command1_Click( )
x=Val(Text1．Text)
Select Case x
Case 1，3
y=x*x
Case Is＞=10，Is＜=-10
y=x
Case-10 To 10
y=-x
End Select
End Sub
程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为______。
[单项选择]在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程：
Private Sub Command1_Click（ ）
a$="software and hardware"
b$=Right(a$,8)
c$=Mid(a$,1,8)
MsgBox a$,,b$,c$,1
End Sub
则在弹出的信息框的标题栏中显示的信息是( )。
A. software and hardware
B. software
C. hardware
D. 1
[填空题]在窗体上画一个命令按钮，名称为Commandl，然后编写如下程序：
Privme Sub Commandl_Click（ ）
Dim intNum As Integer
intNum＝InputBox(“请输入：”)
MsgBox f(intNum)
End Sub
Function f(X As Integer) As Integer
f＝IIf (X<10,X,X+5)
End Function
运行程序，单击命令按钮，在输入对话框中输入5，则程序的输出结果为______。
[单项选择]在窗体上画一个命令按钮，名称为Commandl，然后编写如下代码：
Option Base 0
Private Sub Commandl_Click（ ）
DimA(4)As Integer,B(4)As Integer
Fork=0 To 2
A(k+1)=InputBox(“请输入一个整数”)
B(3-k)=A(k+1)
Nextk
PrintB(k)
End Sub
程序运行后，单击命令按钮，在输入对话框中分别输入2、4、6，输出结果为( )。
A. 0
B. 2
C. 3
D. 4
[单项选择]在窗体上画一个命令按钮,名称为Command1,然后编写如下代码：
Option Base 0
Private Sub Commandl_Click（ ）
Dim A(4)As integer,B(4)As Integer
For k=0 To 2
A(k+1)=InputBox("请输入一个整数")
B(3-k)=A(k+1)
Next k
Print B(k)
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入2、4、6,输出结果为【 】
A. 0
B. 2
C. 3
D. 4
[单项选择]在窗体上画一个命令按钮，名称为Command1，然后编写下列代码：
Option Base 0
Private Sub Command1 Click（ ）
Dim A1(4)As Integer，A2(4)As Integer
For k=0 To 2
A1(k+1)=InputBox(”请输入一个整数”)
A2(3-k)=A1(k+1)
Next k
Print A2(k)
End Sub
程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为( )。
A. 0
B. 1
C. 2
D. 3
[填空题]在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1)，然后编写如下事件过程：
Private Sub Command1_Click（ ）
x＝Val(Text1.Text)
Select Case x
Case 1,3
y＝x*x
Case IS＞＝10,IS＜＝-10
y＝x
Case-10 To 10
y＝-x
End Select
End Sub
程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为______。
[单项选择]在窗体上画一个命令按钮，名称为Commandl。然后编写如下程序：
Private Sub Command1_Ctick（ ）
For I=1 TO 2
For J=1 TO I
Print String(I，"Hello")；
Next J
Print
Next I
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是
A. H
B. H
C. HHHHH
D. H
[单项选择]在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：
Option Base 0
Private Sub Command1_Click（ ）
Dim A1(4) As Integer, A2(4) As Integer
For k=0 To 2
A1(k+1)=InputBox("请输入一个整数")
A2(3-k)=A1(k+1)
Next k
Print A2(k)
End Sub
程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为
A. 0
B. 1
C. 2
D. 3
[填空题]在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
Private Sub Command1 Click（ ）
Dim intNum As Integer
intNum＝InputBox("请输入：")
MsgBox f(intNum)
End Sub
Function f(X As Integer)As Integer
f＝IIf(X＜10,X,X+5)
End Function
运行程序，单击命令按钮，在输入对话框中输入5，则程序的输出结果为______。
[填空题]在窗体上画一个命令按钮，名称为Command1，编写如下事件代码：
Private Sub Command1_Click（ ）
a="software and hardware"
b=Right(a，8)
MsgBox(a，b)
End Sub
程序运行后，单击命令按钮，则在弹出的信息框的标题栏中显示的是______。
