更多"[单选题]在窗体上画两个单选按钮,名称分别为Option1,Optio"的相关试题:
[单选题]题 （1.0分）
在窗体上画两个单选按钮,名称分别为Option1,Option2,标题分别为"宋体"和"黑体";
一个复选框,名称为Check1,标题为"粗体";一个文本框,名称为Text1,Text属性为"改变文字字体".
要求程序运行时,"宋体"单选按钮和"粗体"复选框被选中,则能够实现上述要求的语句序列().
A.Option1.Value=True Checkl.Value=False
B.Option1.Value=True Checkl.Value=True
C.Option2.Value=False Check1.Value=True
D.Option1.Value=True Check1.Value=1
[单选题]在窗体上画两个名称分别为Text1,Text2的文本框
和一个名称Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim x As Integer,n As Integer
X=.
N=.
Do While X<2.
X=X*.
N=n+.
Loop
Textl.Text=Str(x)
Text2.Text=Str(n)
End Sub
程序运行后,单击命令按钮,在两个文本框中显示的值分别是().
A.15和1
B.27和3
C.195和3
D.600和4
[单选题]在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1_Click()
For I=1 To 4
For J=0 To I
Print Chr$(65+i);
Next J
Print
Next I
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是().
A.BB CCC DDDD EEEEE
B.A BB CCC DDDD
C.B CC DDD EEEE
D.AA BBB CCCC DDDDD
[单选题]第259题 （1.0分）
在窗体上画一个命令按钮,名称为Command1,然后编写如下程序.
Private Sub Command1_Click()
For I=1 To 4
For J=0 To I
Print Chr$(65+i);
Next J
Print
Next I
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是().
A.BB CCC DDDD EEEEE
B.A BB CCC DDDD
C.B CC DDD EEEE
D.AA BBB CCCC DDDDD
[单选题]在窗体上画一个名称为Label1、标题为"VisualBasic考试"的标签,两个名
称分别为Command1和Command2、标题分别为"开始"和"停止"的命令按钮,
然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500.
编写如下程序:
Private Sub Form_Load()
Timer1.Enabled = False
End Sub
Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Command2_Click()
Timer1.Enabled = False
End Sub
Private Sub Timer1_Timer()
If Label1.Left < Width Then
Label1.Left = Label1.Left + 120
Else
Label1.Left = 0
End If
End Sub
程序运行后,单击"开始"按钮,标签在窗体中移动.
对于这个程序,
以下叙述中错误的是().
A.标签的移动方向为自左向右
B.单击"停止"按钮后再单击"开始"按钮,标签从停止的位置继续移动
C.当标签全部移出窗体后,将从窗体的另一端出现并重新移动
D.标签每隔1秒移动一次
[单选题]在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click() S=.Do s=(s+1)*(s+2) number=number+.Loop Until s>=3. Print number,s End Sub运行后,输出的结果是().
A.. 1
B.3. 30
C.. 30
D..182
[单选题]在窗体上画一个命令按钮,然后编写如下事件过程,程序运行后,
单击命令按钮,依次在输入对话框中输入5,4,3,2,1,-1,输出结果().
Private Sub Command1_Click()
X=0
Do Until x=-1
A=Val(InputBox(""请输入A的值""))
B=Val(InputBox(""请输入B的值""))
X=Val(InputBox(""请输入X的值""))
A=a+b+x
Loop
Print a
End Sub
A.13
B.2
C.3
D.14
[单选题]设在窗体上有两个命令按钮,其中一个命令按钮的名称为cmda,
则另一个命令按钮的名称不能是().
A.cmdc
B.cmdb
C.cmdA
D.Command1
[单选题]第218题 （1.0分）
在窗体上画一个命令按钮,然后编写如下事件过程.
Private Sub Command1_Click()
S=0
Do
S=(s+1)*(s+2)
number=number+1
Loop Until s>=30
Print number,s
End Sub
运行后,输出的结果是().
A.0 1
B.30 30
C.4 30
D.3 182
[单选题]第262题 （1.0分）
在窗体上画一个命令按钮,然后编写如下事件过程.
Private Sub Command1_Click()
B=1
A=2
Do While b<10
B=2*a+b
Loop
Print b
End SUb
程序运行后,输出的结果是().
A.13
B.17
C.21
D.33
[单选题]第194题 （1.0分）
在窗体上画一个命令按钮,然后编写如下事件过程.
Private Sub Command1_Click()
A=0
For M=1 To 10
A=A+1.B=0
For J=1 To 10
A=A+1. B=B+2
Next J
Next M
Print A;B
End Sub 程序运行后,输出的结果是().
A.10 20
B.20 110
C.110 20
D.200 110
[单选题]第271题 （1.0分）
在窗体上画一个命令按钮,然后编写如下事件过程.
Private Sub Command1_Click()
a=Val(InputBox("",,0))
b=Val(InputBox("",,0))
x=a+b
If a>b Then
x=a-b
End If
Print x
End Sub
程序运行时从两个输入框中输入3和4,输出x的值是().
A.3
B.5
C.7
D.9
