更多"窗体上有一个按钮和一个滚动条，则下列程序的功能是( )。 Sub "的相关试题:
[单项选择]窗体上有一个按钮和一个滚动条，则下列程序的功能是______。
Sub Command1_Click（ ）
HScroll1.LargeChange=5
End Sub
A. 将滚动条的最大值设为5
B. 将滚动条最大改变值改为5
C. 将滚动条的是小值设为5
D. 将滚动条最小改变值改为5
[单项选择]窗体上有一个按钮和一个列表框，执行下列程序后，输出的结果为
Private Sub Command1_Click（ ）
List1.AddItem "Visual"
List1.AddItem "Basic"
List1.AddItem "Programming", 1
Print list1.List(2)
End Sub
A. Visual
B. Basic
C. Programming
D. 2
[单项选择]应用程序窗体的名称属性为Frm1，窗体上有一个命令按钮，其名称属性为Cmd1，单击窗体和命令按钮的事件过程名分别为______。
A. form_ Click() Command1_Click()
B. Frm1_ Click() Command1_ Click()
C. form_ Click() Cmd1_ Click()
D. Frm1_ Click() Cmd1_ Click()
[单项选择]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。
Private Sub Command1_Click（ ）
Dim a
a=Array(1，2，3，4，5)
For k=1 To 4
S=S+a(k)
Next k
Print S
End Sub
A. 10
B. 14
C. 15
D. 120
[单项选择]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。
Private Sub Command1_Click（ ）
Dim a
a=Array(1,2,3,4,5)
For k=1 To 4
S=S+a(k)
Next k
Print S
End Sub
A. 10
B. 14
C. 15
D. 120
[单项选择]窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。
Pfivate Sub Command1_click（ ）
Picture1.Picture=LoadPicture("C:/picture.ipg")
Picture1.Cis
Picture1.Print"picture"
End Sub
A. 窗体无显示，图片框显示图片和文字picture
B. 窗体上出现picture文本，图片框无显示
C. 窗体上出现picture文本，图片框显示图片picture.jpg
D. 窗体无显示，图片框只显示picture文字
[单项选择]窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。
Private Sub Commandl_Click（ ）
Picturel.Picture=LoadPicture("c：/picture.jpg")
Picmrel.Cls
Picturel.Print "picture"
End Sub
A. 窗体无显示，图片框显示图片和文字picture
B. 窗体上出现picture文本，图片框无显示
C. 窗体上出现picture文本，图片框显示图片picture.jpg
D. 窗体无显示，图片框只显示picture文字
[单项选择]某程序执行后显示了一个MDI窗体和两个子窗体，其中某子窗体中有一个按钮，执行下列程序后的输出结果为______。
Private Sub Command1_Click（ ）
Print DoEvents（ ）
End Sub
A. 0
B. 1
C. 2
D. 3
[单项选择]在窗体上有一个名称为Command1的命令按钮，并有如下程序：
Private Sub Command1_Click（ ）
Static X As Integer
Static Y As Integer
Cls
Y=1:Y=Y+5:X=5+X:Print X,Y
End Sub
程序执行时，单击命令按钮Command1三次后，窗体上显示的结果为( )。
A. 15 16
B. 5 6
C. 15 15
D. 15 6
[单项选择]
窗体上有一个名为Command1的命令按钮，并有如下程序：
Private Sub Command1_Click（ ）
Dim a(10), x%
For k=1 To 10
a(k)=Int(Rnd*90+10)
x=x+a(k)Mod 2
Next k
Print x
End Sub
程序运行后，单击命令按钮，输出结果是（）。
A. 10个数中奇数的个数
B. 10个数中偶数的个数
C. 10个数中奇数的累加和
D. 10个数中偶数的累加和
[单项选择]给程序的空白行选择适当的语句。窗体上有一个命令按钮Command2和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下。
Private Sub Command2_Click（ ）
Dim Ind As Integer
Ind=______
List1.Remove Ind
End Sub
A. List1.Index
B. List1.Listlndex
C. List1, Text
D. List1.ListCount
