vb循环结构选择题共24页Word文档下载推荐.docx

1、A、退出整个程序B、退出当层循环C、退出最外层循环D、退出所在子程序11、Doloop中使用while关键字时，条件为（B）执行循环体A、FalseB、TrueC、0D、假或真12、Doloop中使用until关键字时，条件为（A）执行循环体13、Doloop中使用while关键字时，条件为（A）终止循环14、Doloop中使用until关键字时，条件为（B）终止循环15、ForNext循环结构中（C）用来控制循环变量A、forB、stepC、nextD、to16、ForNext循环结构中step用来控制（D）A、循环变量B、循环变量初值C、循环变量终值D、循环变量增量17、ForNext循环

2、结构中循环变量初值大于终值时,步长为（A）A、负数B、非负数C、正整数D、正数18、ForNext循环结构中循环变量初值小于终值时,步长为（A）B、负整数19、ForNext循环结构中next后的循环变量（A）A、可以省略B、不可以省略C、与for后的变量名可以不同D、与for后的变量不是同一变量20、ForNext中循环变量初值与终值间使用的关键字是（A）A、ToB、InC、gotoD、private21、ForNext中循环变量初值与终值间使用的关键字是（A）22、执行下面的程序段后，s的值为（C）Private Sub Form_Click（）Static s As Integers =

3、 5For i = 1.4 To 2.1 Step 0.6s = s + 1Next iPrint sEnd SubA、5B、6C、7D、123、下面程序的作用是利用随机函数产生10个100200之间（包含100、200）的随机数，打印其中为5的倍数的数将程序补充完整（）Private Sub Command1_Click（）For m = 1 To 10x = Int（Rnd * 101+100）If（ ）ThenPrint x;End IfNext mA、x mod 5=0B、x mod 5=0C、x/5=0D、x5=024、设有如下程序：Option Base 1Dim a（10）, P

4、（3） As Integerk = 5For i = 1 To 10a（i） = iFor i = 1 To 3P（i） = a（i * i）k = k + P（i） * 2Print k程序运行后，单击窗体，则在窗体上显示的是（A）A、33B、35 C、37 D、3825、在窗体上画一个命令按纽Command1，然后编写如下事件过程：Private Sub Command1_Click（） X=0 N=val（inputbox（“n=?”）For i=1 to n For j=1 to i X=x+1 Next jPrint xEnd sub 程序运行后、单击命令按钮,输入3,在窗体上显示的

5、内容是（D）A、9 B、44 C、5 D、626、以下能够正确计算n！的程序是（C）A、private sub command1_click（） N=5 : x=1 Do X=x*1 I=i+1 Loop while i n27、在窗体上画一个命令按纽Command1，标签Label1然后编写如下事件过程：Private sub command1_click（） For i=1 to 15 X=2*i-1 If x mod 3=0 then s=s+1 Next i Label1、caption =sEnd sub程序运行后,单击命令按钮,标签中显示的内容是（ B ）A、1 B、5 C、27

6、D、4528、在窗体上画一个命令按纽Command1，然后编写如下事件过程： For i=1 to 4 For j =0 to i Print chr$（65+i） Print 程序运行后,单击命令按钮,窗体中显示的内容是（ A）A、BB CCC DDDD EEEEEB、A BBC、B CC DDD EEEED、AA BBB CCCC DDDDD28、在窗体上画两个名称分别为text1，text2的文本框和一个名称为command1的命令按钮，然后编写如下事件过程： Dim x as integer，n as integer X=1 ： n=0 Do while x 20X=x*3N=n+1L

7、oopText1、text=str（x）Text2、text=str（n）程序运行后,单击命令按钮,在两个文本框中显示的值分别是（B）A、15和1 B、27和3 C、195和3 D、600和429、在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：Dim a（5）,b（5）For j =1 to 4A（j）=3*jB（j）=a（j）*3Next jText1、text=b（j2）程序运行后，单击命令按钮，在文本框中显示（ B ）A、25 B、18 C、36 D、3530、下面程序运行时，内层循环的循环总次数是（A）For m = 1 To 3For n = 0 To m -

8、1Next nA、6 B、3 C、0 D、931、 定义语句Dim A （-3 to 3） as Integer，定义数组的元素个数是（D）D、732、 执行下面的程序段后，X的值为（C）X=5For I=1 to 10 Step 2X=X+I5Next I A、7 B、10 C、8 D、533、如果整型变量a、b的值分别为3和1，则下列语句中循环体的执行次数是（ D ）For I=a to bPrint INext IA、0 B、1 C、2 34、下列关于do while loop 和doloop until循环执行循环体次数的描述正确的是（ D ）A、 do while loop循环和do

9、loop until循环至少都执行一次B、 do while loop循环和doloop until循环可能都不执行C、 do while loop循环至少执行一次，doloop until循环可能不执行D、 do while loop循环可能不执行，doloop until循环至少执行一次35、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：For i = 1 To 4a = 1For j = 1 To 3a = 2For k = 1 To 2a = a + 6Next kPrint a程序运行后，单击命令按钮，则在窗体上显示的内容是（ A ）A、14 B、15 C、16

10、 D、1736、设有如下程序：Select Case iCase 1, 3a = a + 1Case 2, 4a = a + 2End Select程序运行后，单击窗体，则在窗体上显示的内容是（ B ）A、6B、5 C、4 37、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：sub ss （b（） as Integer ）b（i） = 2 * iDim a（1 To 4） As Integera（1） = 5: a（2） = 6a（3） = 7: a（4） = 8ss a（）Print a（i）运行上面的程序，单击命令按钮，则在窗体上显示的内容是（ B ）A、5 6 7

11、8 B、2 4 6 8 C、1 2 3 4 D、5 7 6 838、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：Function fun（x As Integer）Static zy = y + 1: z = z + 1fun = x + y + zEnd FunctionDim x As Integerx = 1For i = 1 To 2Print fun（x）程序运行后，如果单击命令按钮，窗体中显示的内容是（ B ）A、3 3 B、3 4 C、3 5 D、3 639、若I、n均为整型变量，下列程序段的输出结果为（C）n = 0If i Mod 2 = 1 Then

12、 n = n + 1Print nB、4 C、5 D、3 40、在窗体中添加一个文本框（其中Name属性为Text1）,然后编写如下代码：Private Sub Form_click （）Text1、Text = Text1、SetFocusSum = Sum + iText1、Text = Sum上述程序运行后，单击窗体，则运行的结果（ A ）A、在文本框Text1中输出55 B、在文本框Text1中输出0C、出错 D、在文本框Text1中输出不定值41、在窗体中添加一个名称为Command1的命令按钮，然后编写如下代码：x = 0Do Until x = -1a = InputBox（请输

13、入A的值）a = Val（a）b = InputBox（请输入B的值b = Val（b）x = InputBox（请输入X的值x = Val（x）a = a + b + x程序运行后，单击命令按钮，依次在输入对话框中输入 12345-1，则输出结果为（A）A、8 B、9 C、14 D、1542、设有如下程序：程序运行后，单击窗体，则在窗体上显示的是（ A ）A、33 43、在窗体中添加一个名称为Command1的命令按钮，然后编写如下代码：Function F（a As Integer）b = 0Static cb = b + 1c = c + 1F = a + b + cDim a As I

14、ntegerDim b As Integerb = F（a）Print b程序运行后，如果单击命令按钮，则窗体上显示的内容是（ A ）A、4 5 6 B、1 2 3 C、0 1 2 3 D、2 3 4 44、在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Private Sub Command1_Click（） For a=1 To 4 For b=0 To a Print Chr（65+a） Next b Print Next a End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是（B）A、A DDDD B、BB EEEEE EEEE D、B C DE4

15、5、循环是一组重复执行的指令，重复次数由（B）决定A、int（终值-初值）+1 B、int（终值-初值）/步长）+1 C、int（终值-初值）/步长） D、（终值-初值）/步长46、假定有以下程序段：For j = 5 To 1 Step -1Print i * jNext j, i则语句Print i * j的执行次数是（ A ） A、15 B、16 C、17 D、1847、以下程序段的输出结果是（C）num=0While num=2num=num+1Print numWendA、1 3 5 B、2 3 4 C、1 2 3 D、0 1 248、在窗体中添加一个命令按钮（其Name属性为Com

16、mand1），然后编写如下代码：Dim n（） As IntegerDim a, b As IntegerEnter the first numberEnter the second numberReDim n（a To b）For k = LBound（n, 1） To UBound（n, 1）n（k） = kPrint n（k）程序运行后，单击命令按钮，在输入对话框中分别输入2和3，输出结果为（D）A、0 1 B、1 3 C、1 2 D、2 349、在窗体中添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程：Do While x x Then Print a（i）;程序运行后，单击命令按钮，在窗体上显示的内容是 （D）A、1 2 B、1 2