补充练习1 Vsual Basic.docVIP

一、单项选择题（每小题2分，共20分） 1、指示一个窗体位置的值是窗体的( )。 A、对象 B、事件 C、方法 D、属性 2、下列不合法的标识符是（ ）。 A、Go_To B、Tab C、姓名 D、Int1 3、下列选项中，（ ）不能交换变量a和b的值。 A、 t=b: b=a: a=t B、a=a+b : b=a-b: a=a-b C、 t=a: a=b: b=t D、a=b: b=a 4、当窗体被装入内存时，系统将自动执行（ ）事件过程。 A、Load B、Activate C、Unload D、QueryUnload 5、若有数组说明语句Dim b(-1 To 2, -2 To 2)，则数组b中元素的个数是（ ）。 A、12 B、15 C、16 D、20 6、当鼠标在窗体上移动时，会发生（ ）事件。 A、MouseDown B、MouseUp C、MouseMove D、DragDown 7、若以读的方式打开顺序文件”d:\file1.dat” ，则正确的语句是（ ）。 A、Open ”d:\file1.dat” For Output As #1 B、Open ”d:\file1.dat” For Input As #1 C、Open ”d:\file1.dat” For Binary As #1 D、Open ”d:\file1.dat” For Random As #1 8、 有程序段 Dim I As Integer FOR I=7 TO 90 STEP 5 PRINT I; NEXT I 上述程序共执行（ ）次循环。 A、17 B、16 C、15 D、14 9、 有程序段 Dim X As Integer, Y As Integer X = 5 Y = 6 PRINT X + Y = 11 , 上述程序段运行时输出的结果是（ ）。 A、X+Y=11 B、11 C、X+Y=11， rue 10、关于变量作用域，正确的描述是（ ）。 A、在模块内定义的变量，其作用域必定为所在的模块。 B、同一模块中不同级的变量不能同名。 C、一模块中所有在过程之外用Dim定义的变量为全局变量。 D、不同模块中定义的变量名字可以相同。 二、给出以下表达式的值（每小题2分，共10分） 1、 ABS（INT（ -13.2 ）+ ROUND（ 0.32 * 5 ）） 2、 25\3 MOD 3.2 * INT( 2.5 ) 3、 Instr(5, “Microsoft Visual Basic”, “visual”,1) 4、 Mid(S,7,8) Left（S,5） Right(S,5) 其中 S =“Hello Computer World” 5、 x = 2 Or Not y 0 And (x-y) / i 0 其中 x=2,y=2,i=1 三、将下列数学表达式写成Visual Basic语句（每小题2分，共6分） 1、 ab + 2x2 + ( 2x )3 2、 2m SIN2 x + COS2 x 3、 x { x [ x ( ax + b ) + c ] + d } + e 四、阅读程序，写出运行后的结果（每小题4分，共24分） 1、Private Sub Command1_Click() For K = 1 To 3 If K = 1 Then A = 2 * K If K = 2 Then A = 2 * K + 1 If K = 3 Then A = K Print K ; A ; Next K End Sub 2、Private Sub Command1_Click() Dim i As Integer: Dim t As Integer t = 0 For i = 0 to 4 t = t + 2 ^ i Next i