VB程序设计结构：顺序结构、分支结构、循环结构。
一、顺序结构题：二、分支结构：IF <条件> Then<语句组1>Else<语句组2>EndifIF <条件> Then<语句组>Endif答案：1、a=6 b=5 2、Value=60 3、a=94、a=9:b=75、a=7 b=91、以下程序段的执行结果是? A=1b=5c=4a=bb=cc=aPrint a;b;c 2、该程序段运行后，变量b的值为?a=7b=8a=a+bb=a-b当条件满足时，执行语句组1当条件不满足时，执行语句组2执行完语句组1或语句组2后执行Endif下面的语句。
4、该程序段运行后，变量a的值为?a=8b=7z=aa=bb=z5、经过几下几条语句，A和B的值分别为多少？A=6B=7C=AA=BB=C 6、Text1和Text2中分别输入5，6，求Labe7l中值？Dim X AS Single, Y ASSingle, Z AS SingleX=Val（Text1.text）Y=Val（Text2.text）Z=X*Y／10Label7.caption=Z当条件满足时，执行语句组，接着执行Endif下面的语句。
当条件不满足时，执行Endif下面的语句。
1 、以下程序段的执行结果为？A=5B=6If A<B thenT=AA=BB=TEnd ifPrint a;b 4、该程序段运行后，变量a和b的值分别为a=9:b=7If a<b thent=aa=bb=tEnd If3、该程序段运行后，变量a的值为？a=7If a<6 Thena=a-2End Ifa=a+22．下列程序运行后，变量Value的值是?x=12If x>=10 ThenValue=5*xElseValue=4*xEnd IfSelect case 表达式三、循环结构答案：1、3 2、s=s+i3、k=-3 a=504、s=0四、选择题1、流程图如右图所示，其输出结果是( )当表达式的值为表达式列表达1时，执行语句组1；当表达式的值为表达式列表达2时，执行语句组2； ……当表达式的值为表达式列表达n-1时，执行语句组n-1；当表达式的值不是上述值时，执行语句组n ；n = Text1.Text Select Case n Case 1 To 20 x = 10Case 2, 4, 6 x = 20Case Is < 10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是 答案：10 cj =VAL( Text1.Text ) Select Case cj Case 0 To 59 dj = “ E ” Case 60 To 69 dj = “ D ” Case 70 To 79 dj = “ C ” Case 80 To 89 dj = “ B ” Case 90 To 100 dj = “ A ” Case ElseLabel1.Caption=“你输入的成绩有问题！” End SelectLabel1.Caption=“你的成绩等级为：”+dj End Sub程序运行后，如果在文本框Text1中输入87，然后单击命令按钮，则在Label1中显示的内容是答案：你的成绩等级为：BFor 循环变量=初值 To 终值 [Step 步长值] [循环体] Next 循环变量 在执行For 语句时，把初值赋给循环变量，并且记录终值和步长。
如果步长为1，Step 语句可省略。
执行循环体 当执行Next 语句时，要做两件事：第一是改变循环变量的值，循环变量（当前的值）+步长；第二是检查循环变量的新值是否已超过初值和终值的范围，如果没有超过，就返回执行循环体；若超过终值，就退出循环，执行Next 的后续语句。
n=0 For i=0 To 11 i = i+3 n = n+1 Next i Textl.Text=Str(n) 程序运行后，在文本框中显示的值是 ？ 用以下程序段求100以内的偶数和，划线部分的语句应为？ S=0 for i=0 to 100 step 2 _________ Next 以下程序段的执行结果为？ a=5 For k=15 To 0 step -3 a=a + k Next k Print k;a 以下程序段的执行结果是？ S = 1 For I = 0 to 4 S=S*I Next I print sA . 4B . 3C . 10D . 5答案=A2、该程序段运行后，变量y 的值是( )A . 25B . 20C . 15D . 0答案= B3、把二进制数10转换为十进制数，其值为( )A . 6B . 4C . 2D . 8答案= C4、下列属于Visual Basic合法变量名的是( )A . 8abB . a?2C . ifD . cengji答案= D5、流程图如右图所示，若输入x、y的值为1和-4，则输出结果是( )A . -5B . -3C . 3D . 5答案= D6、要使循环体t=t*k执行5次，循环变量的初值应该是( )A . 2B . 1C . 0D . 10答案= B7、2πa 在Visual Basic中的表达式是( )A . 2?3.1416?aB . 2*?aC . 2πaD . 2*3.1416*a 答案= D8、该程序段运行后，循环体执行的次数是( )A . 2B . 1C . 0D . 出错答案= C9、该程序段运行后，变量a，b的值是( )A . 3，2B . 2，1C . 2，3D . 5，2答案= A10、“x 小于30 且y 大于20”的逻辑表达式是( )A . x<30 Not y>20B . x<30 Or y>20C . x<30 And y>20D . x<30:y>20 答案= C11、表达式Int(3.141*100)/100的值是( )A . 314.1B . 314C . 3.14D . 3答案= C12、该程序段运行后，变量s的值为( )A . 80B . 60C . 15D . 3答案= C13、该程序段运行后，变量s的值为( )A . 10B . 50C . 1D . 5答案= B14、下面程序段的循环步长是( )For i=1 To 1000s=s+iNext iA . 不确定B . 1000C . 1D . 0答案=C15、以下程序段的执行结果为( )A=2:B=3If A<B thenT=A:A=B:B=TEnd ifPrint a;bA . 33B . 22C . 32D . 23答案=C16、王浩同学用VB设计了一个加法器，左图是它的主界面，右图是实现加法运算的关键代码。
右图中的代码应该写在（）按钮的“Click”事件中。
A . “清除”B . “计算”C . “窗体”D . “退出”答案=B17、在VB程序中，能表示Ｘ或Ｙ小于Ｚ的表达式是( )A . X<Z And Y<ZB . X<Y<ZC . X<Z <YD . X<Z Or Y<Z答案=D18、如图，在这个用VB制作的“加法器中”，圈内部分需要使用右图中哪个控件？A . ③B . ②C . ①D . ④答案=D19、用以下程序段求100以内的偶数和，划线部分的语句应为( )S=0for i=0 to 100 step 2_________NextA . S=iB . S=S+2C . S=S+ID . i=i+2答案=C20、在VB中插入一个命令按钮，图中是这个命令按钮的属性窗口，那么这个命令按钮上显示的文字是：A . False B . start C. Command1 D . True答案=B21、以下程序段的执行结果为( )a=5For k=1 To 0a=a + kNext kPrint k;aA . -16B . 1121C . 15D . -116答案=C22、图中是一个按钮的“click”事件代码，这说明该按钮的作用是（）A . 改变字体颜色B . 进行一个加法计算C . 取当前的系统时间D . 添加命令按钮答案=B23、如图，这个VB窗体中有（）个标签框和（）命令按钮。
A . 3、2B . 2、2C . 3、3D . 2、3答案=A24、在VB程序中，用以表示10<x<15 的表达式应该是（）A . x>10 and x<15B . 10<x<15C . 10<x or x<15D . 10<x and x>15答案=A25、李刚要用Visual Basic设计一个程序，首先要做的是（）。
A . 分析问题B . 编写代码C . 设计界面D . 调试与运行程序答案=A26、执行“A=5:A=A+5”语句后，变量A的值为（）A . 10B . 5C . 0D . 不一定答案=A27、用VB设计一个程序，可以查询当前日期和时间并退出，运行界面如图所示，该窗体中用到了：A . 两个标签框和两个命令按钮B . 一个标签框和四个命令按钮C . 五个标签框D . 三个标签框和两个命令按钮答案=D28、以下程序段的执行结果是（）A=1:b=2:c=3a=b:b=c:c=aPrint a;b;cA . 3 2 1B . 2 3 1C . 1 2 3D . 2 3 2 答案=D29、下面程序段的划线部分应是（）A=321:b=654t=a:a=b:print a;b运行结果654321A . b=tB . a=tC . t=bD . b=a 答案=A30、表达式16/4-2^8*5MOD5\2的值为（）A . 14B . 2C . 20D . 4答案=D31、执行以下程序段后，变量S的值为（）S = 0For I = 0 to 4S=S+INext IA . 4B . 16C . 12D . 10答案=D32、执行以下程序段后，变量y的值为（）x=3If x>3 Theny=x*xEnd Ify=2*xA . 6B . 3C . 0D . 9答案=A33、以下程序段的执行结果是（）S = 1For I = 0 to 4S=S*INext Iprint sA . 12B . 10C . 4D . 24答案=D34、在用VB设计程序时，图中（）工具用于插入标签框。