更多"[单选题]题 （1.0分）窗体上有一个按钮和一个滚动条,则下列程序的功"的相关试题:
[单选题]窗体上有一个按钮和一个滚动条,则下列程序的功能是().
Sub Command1_Click()
HScrolll.LargeChange=.
End Sub
A.将滚动条的最大值设为5
B.将滚动条最大改变值改变5
C.将滚动条的是小值设为5
D.将滚动条最小改变值改为5
[单选题]窗体上有一个按钮和一个文本框,程序执行后,在文本框中输入12345,单击按钮后的输出结果为().
Private Sub Command1_Click()
Dim A As Integer,B As Integer
Textl.SelStart=.
Textl.SelLength=.
A=VaL(Textl.SelText)
B=Len(Textl.Text)
Print A*B
End Sub
A.68
B.115
C.170
D.1170
[单选题]窗体上有一个命令按钮Command1,编写如下事件过程:
Private Sub Command1_Click()
X = InputBox("x=")
Y = InputBox("y=")
Print x + y
End Sub
运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是().
A.444
B.123321
C.123+321
D.出错信息
[单选题]窗体上有一个按钮和一个列表框(Sorted属性为True),执行下列过程后的输出结果为().
Private Sub Command1_Click()
List1.AddItem"China"
List1.AddItem"Great"
List1.Addltem"Is",.
List1.Addltem"!",.
Print Listl.List(2)
End Sub
A.China
B.Great
C.Is
D.1
[单选题]题 （1.0分）
窗体上有一个按钮和一个列表框(Sorted属性为True),执行下列过程后的输出结果为().
Private Sub Command1_Click()
List1.AddItem"China"
List1.AddItem"Great"
List1.AddItem"Is",1
List1.AddItem"!",3
Print List1.List(2)
End Sub
A.China
B.Great
C.Is
D.1
[单选题]在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码:
Private Sub Command1_Click()
For a = . To .
Y = .
For b = . To 1.
For C = . To .
X = X + .
Y = y + .
Next C
Next b
Next a
Text.Text = y
End Sub
A.61
B.60
C.36
D.6
[单选题]在窗体上画一个命令按钮,名称为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
[单选题]第268题 （1.0分）
窗体上有一个命令按钮Command1,编写如下事件过程.
Private Sub Command1_Click()
X = InputBox("x=")
Y = InputBox("y=")
Print x + y
End Sub
运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是().
A.444
B.123321
C.123+321
D.出错信息
[单选题]设在窗体上有两个命令按钮,其中一个命令按钮的名称为cmda,
则另一个命令按钮的名称不能是().
A.cmdc
B.cmdb
C.cmdA
D.Command1
[单选题]在窗体中画一个命令按钮,然后编写以下事件过程:
Private Sub Command1_Click()
For X=5 To 2.5 Step -7
Next x
Print x
End Sub
程序运行后,输出的结果是().
A.2.2
B.2.5
C.2.9
D.-2
[单选题]在窗体上画一个命令按钮,然后编写如下事件过程: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
[单选题]题 （1.0分）
在窗体上添加一个命令按钮,编写如下代码.
Private Sub Command1_Click
Dim Arr1(10) as Integer ,Arr2(10) As Integer
n=3
For i=1 to 5
Arr1(i)=i
Arr2(n)=2*n+i
Next i
Print Arr2(n), Arr1(n)
End Sub
程序运行后,单击命令按钮,输出结果是().
A.11 3
B.3 11
C.13 3
D.3 13
[单选题]题 （1.0分）
设在窗体上有两个命令按钮,其中一个命令按钮的名称为cmda,
则另一个命令按钮的名称不能是().
A.cmdc
B.cmdb
C.cmdA
D.Command1
[单选题]在窗体上画一个命令按钮,然后编写如下事件过程,程序运行后,
单击命令按钮,依次在输入对话框中输入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
