超星 - 第四章第5次作业-循环嵌套及其他控件 - 查题吧

单选题

窗体上有一个名称为Hscroll1的滚动条。程序运行后,当单击滚动条两端的箭头时, 立即在窗体上显示滚动框的位置(即刻度值).下面能够实现上述操作的事件过程是（）。

A. Private Sub Hscroll1_Changc()Print HScroll1.ValueEnd Sub
B. Private Sub Hsctroll1_Change()Print HScroll1.SmallChangeEnd Sub
C. Private Sub HScroll1_Scroll()Print HScroll1.ValueEnd Sub
D. Private Sub HScroll1_Scroll()Print HScroll1.SmallChangeEnd Sub

单选题

单击滚动条两端的箭头时,滚动条 Value 属性值的改变量由下列（）属性值决定.

A. LargeChange
B. Max
C. SmallChange
D. Min

单选题

当拖动滚动条的滚动块时,将触发滚动条的（）事件。

A. Move
B. Change
Clear
D. Scroll

单选题

下面程序运行时,内层循环的循环总次数是.For m = 1 To 3For n = 0 To m - 1Next nNext m

A. 4
B. 5
C. 6
D. 7

单选题

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x = 1n = InputBox("")For i = 1 To nFor j = 1 To ix = x * 2Next jNext iPrint xEnd Sub程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是（）

A. 16
B. 32
C. 64
D. 128

单选题

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程:Private Sub Command1_Click()n = Val(Text1.Text)For i = 2 To nFor j = 2 To sqr(i)If i Mod j = 0 Then Exit ForNext jIf j > Sqr(i) Then Print INext IEnd Sub该事件过程的功能是（）。

A. 输出n以内的奇数
B. 输出n以内的偶数
C. 输出n以内的素数
D. 输出n以内能被j整除的数

单选题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim i As Integer,n As IntegerFor I=0 To 50i=i+3n=n+1If i>10 Then Exit forNext IText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是（）。

A. 2
B. 3
C. 4
D. 5

单选题

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Commond1_Click()Dim I, numRandmizeDoFor I =1 to 1000Num = int(Rnd * 100)Print Num;Select case NumCase 12Exit ForCase 58Exit DoCase 65,68,92EndEnd selectNext ILoopEnd sub上述事件过程执行后,下列描述中正确的是（）

A. Do循环执行的次数为1000次
B. 在For循环中产生的随机数小于等于100
C. 当所产生的随机数为12时结束所有循环
D. 当所产生的随机数为65,68,92时窗体关闭,程序结束

单选题

在窗体上画一个命令按钮和一个标签,名称分别为Command1和Label1,编写如下事件过程:Private Sub Command1_Click()Counter = 0For i = 1 To 4For j = 6 To 1 Step -2Counter = Counter + 2Next jNext iLabel1.Caption = Str(Counter)End Sub程序运行后,单击命令按钮,标签中显示的内容是（）。

A. 24
B. 20
C. 16
D. 12

单选题

执行下面程序段后,变量a的值为（）。For I=1 To 3For j=1 To IFor k=j To 3a=a+1Next kNext jNext I

A. 3
B. 9
C. 14
D. 21

1