Private Sub Form_Click() Dim a As Single
a=Abs(Val(InputBox(\请输入一个实数\
Print Format(a*a,\Spc(4) __;Format(Sqr(a),\ End Sub
81.函数Int(Rnd(0)*10)是哪个范围内的整数 [0,10) ____. 82.语句print 5*5\\5/5输出结果是（25）
83. 决定窗体标题条显示内容的属性是（caption） 84.下列可作为VB的变量名的是（Alpha）
85.设a=2，b=3，c=4，d=5，下列表达式的值是（ false ） a>b and c<=d or 2*a>c 86.下列叙述中不正确的是____ A变量名的第一个字符必须是字母 B变量名的长度不超过255个字符
C.变量名可以包含小数点或者内嵌的类型声明字符 D变量名不能使用关键字
87.变量未赋值时，数值型变量的值为_0___。
88.在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345
Print Format$(a, \ End Sub
程序运行后，单击命令按钮，窗体上显示的是 12345.00 89.以下程序段的输出结果是（True） a=sqr（3） b=sqr（2） c=a>b print c
90. 表达式(7\\3+1)*3的值是_9___ 91.表达式 5 Mod 3+3\\5*2的值是 2
92.设x=4,y=8,z=7，以下表达式的值是 ( False ) x 选择结构程序 1．计时器控件的（Interval）属性用于设置Timer事件发生的时间间隔。 2．运行下列程序段后，显示的结果为 （ 9 ） J1=4 J2=9 If J1 3．下列语句正确的是 If A<>B Then Print \不等于B\ 4．下列程序段执行结果为 （ -3 3 ） x=5 y=-6 If Not x>0 Then x=y-3 Else y=x+3 Print x-y; y-x 5.设a=6，则执行x=IIf(a＞5,-1,0)后,x的值为( -1 ) 6.假设有以下程序段： For I=1 to 3 For j=5 to 1 Step -1 Print I*j Next j Next I 则语句Print I*j的执行次数I、j的值分别是（15 4 0） 7.在窗体上有一个文本框控件，要求每一秒钟在文本框中显示一次当前名称为TxtTime：一个计时器控件，名称为Timerl 的时间。程序为： Private Sub Timer1_ () TxtTime.text=Time End Sub 在下划线上应填入的内容是 Timer 8. 为了暂时关闭计时器，应把该计时器的某个属性设置为False ，这个属性是Enabled 9.下列语句正确的是( If X＜＞Y Then Print \不等于Y\) 10.计算分段函数： 0 x<0 y= 1 0<=x<1 2 1<=x<2 3 x>=2 下面程序段中正确的是(select case x Case Is<0 Y=0 Case Is<1 Y=1 Case Is<2 Y=2 Case else Y=3 End select) 11. 下列关于Select Case Is的叙述中，错误的是 ACase 10 To 100 表示判断Is是否介于10与100之间 B Case \ 表示判断Is是否和\、\两个字符串中的一个相同 C Case \ 表示判断Is是否为大写字母X D Case -7,0,100 表示判断Is是否等于字符串\，0，100\ 12．VB算术运算符乘或除、整除、求余的优先级，从高到低依次为 乘或除、整除、求余 13．如果要求设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于 1000 14．能够改变复选框中背景颜色的属性是 Backcolor 15．下列语句正确的是(If X＜＞Y Then Print \不等于Y\ ) 16．在VB语言中，6个关系运算符在运算过程中优先级从高到低的顺序是( 不分先后顺序 ) 17．下列赋值语句中，( )是错误的。 A x=x+1 B x=x+y C x+y=x D x=4＞6 18.表达式1.5+32＞2 Or 7 Mod 3＜4 And Not 1的运算结果是( -1 ) 19.如果将文本框的MaxLength属性设置为0，则文本框中的字符不能超过 32K 20.设在窗体上有个文本框，然后编写如下的事件过程： Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt) > 0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text=\ End If End Sub 上述程序运行后，如果按 【Shift+F2】 ，则在文本框中显示得是 文本框平均内容无变化 21.以下程序段运行时从键盘上输入字符\，则输出结果为 ( -2 ) op$=InputBox(\ If op$=\ If op$=\ Print a 22.下列程序段的执行结果为 （ I =4 ） a=75 If a > 60 Then I=1 If a > 70 Then I=2 If a > 80 Then I=3 If a < 90 Then I=4 Print \ 23．下面程序段执行结果为 （ Pass ） x=Int(Rnd() + 3) Select Case x Case 5 Print \ Case 4 Print \ Case 3 Print \ Case Else Print \ End Select 24.下列程序段的执行结果为 ( * *0* * ) a=1 b=0 Select Case a Case 1 Select Case b Case 0 Print \ Case 1 Print \ End Select Case 2 Print \ End Select 25.下面程序段执行结果为 (Good) x=Int(Rnd() + 4) Select Case x Case 5 Print \ Case 4 Print \ Case 3 Print \ Case Else Print \ End Select 26.运行下列程序段后，显示的结果为 ( 32 ) J1=23 J2=32 If J1 27.下列语句正确的是 If A<>B Then Print \不等于B\ 28.下面语句正确的是 If x<3?y And x>y Then y=x^3 29. 计算z的值，当x大于y时，z=x；否则z=y。下列语句错误的是 If x>=y Then z=x : z=y 30.下列程序段执行结果为 (- 3 3 ) x=5 y=-6