第三章 VB语言基础
一、单选题
1．设a=5,b=4,c=3,d=2，下列表达式的值是____B_____。
3>2*b Or a=c And b<>c Or c>d
A）1          B）True          C）False        D）2
2．设a=”MicrosoftVisualBasic”，则以下使变量b的值为”VisualBasic”的语句是___B______。
A）b=Left(a,10)        B）b=Mid(a,10)
C）b=Right(a,10)        D）b=Mid(a,11,10)
3．假定有如下的窗体事件过程：
Private Sub Form_Click()
a$ = "Microsoft Visual Basic"
b$ = Right(a$, 5)
c = Mid(a$, 1, 9)
MsgBox a$, 34, b$
End Sub
程序运行后单击窗体，则在弹出的信息框中的标题栏中显示的信息是___C______。
A）Microsoft Visual    B）Microsoft        C）Basic          D）34
4．在窗体上画一个文本框，然后编写如下事件过程：
Private Sub Form_Click()
x = InputBox("请输入一个整数")
Print x + Text1.Text
End Sub
程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容是___D______。
A）123    B）456    C）579    D）123456
5．可以同时删除字符串前导和尾部空白的函数是___C______。
A）Ltrim          B）Rtrim      C）Trim        D）Mid
6．\、/、Mod、*四个算术运算符中，优先级别最低的是___C______。
A）\          B）/          C）Mod        D）*
7．在VisuaIBasic中，日期／时间型常量要用____B_____括起来。
A）"          B）#          C）*    D）{}
8．设a%=20,b$=”30”，则下列输出结果是”2030”的语句是___D______。
A）Print str(a)      B）Print “a”+b      C）Print a+b    D）Print a & b
9．设a=10，b=5，c=1，执行语句 Print a > b > c  后，窗体上显示的是___B____。
A）True            B）False        C）1      D）出错信息
10．表达式Fix(-32.68)+Int(-23.02)的值为____B_____。
A）-55          B）-56        C）-57            D）–58
11．InputBox函数返回值的类型为basic语言是一种___B______。
A）数值        B）字符串     
C）变体            D）数值或字符串（视输入的数据而定）
12．执行以下程序段后，变量c$的值为___D______。
      a$="Visual Basic Programing"
      b$="Quick"
      c$=b$ & UCase(Mid$(a$,7,6)) & Right$(a$,11)
A）Visual BASIC Programing        B）Quick Basic Programing
C）QUICK Basic Programing        D）Quick BASIC Programing
13．语句Print 5 * 5 \ 5 / 5的输出结果是___B______。
A）5          B）25        C）0            D）1
14．语句Print Sgn(-6^2）+Abs(-6^2）+Int(-6^2）的输出结果是____C_____。
A）-36          B）1        C）-1            D）-72
15．假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是__D______。
A）Print 2.5            B）Picture1.Print 2.5
C）Debug．Print 2.5        D）Text1.Print 2.5
16．以下声明语句中错误的是____B_____。
A）Const var1=123            B）Dim var2 = 'ABC'
C）Dim var3%                D）Static var3 As Integer
17．以下能判断是否到达文件尾的函数是___D______。
A）BOF    B）LOC    C）LOF        D）EOF
18．在VB中，若要强制变量必须先定义才能使用，应该用___B______语句说明。
A）Public Const                  B）Option Explicit
C）Type 数据类型名                D）DefDbl
19．下列关于变体数据类型的叙述中正确的是____C_____。
A）变体是一种没有类型的数据
B）给变体变量赋某一种类型数值后，就不能再赋给另一种类型数值
C）一个变量没有定义就赋值，该变量即为变体类型
D）变体的空值就表示该变体值为0
20．设a="Visual Basic"，下面使b="Basic"的语句是____C_____。
A）b=Left$(a,8,5)                B）b=Right$(a,5,5)
C）b=Mid$(a,8,5)                D）b=InStr(a,8)
二、填空题
1．整型变量X中存放了一个两位数，要将两位数交换位置，例如13变成31，实现的表达式是___(X mod 10) * 10 + x\10____。
2．表示x是5的倍数或9的倍数的逻辑表达式是__x mod 5 = 0 OR x mod 9 = 0____。
3．已知a=3.5，b=5.0，c=2.5，d=true，则表达式a>=0 AND a+c > b+3 OR NOT d的值是
___False____。
4．表达式Ucase(Mid(“abcdefgh”，3，4))的值是___“CDEF”____。
5．要以××××年××月××日形式显示当前机器内日期的Format函数格式为___Format(date,“yy
yy年mm月dd日”)____。
6．计算进入21世纪有多少天的函数表达式是___DateDiff(“d”,#1/1/2001#,now)+1___。
7．计算离你毕业2009年6月30日还有多少个星期的函数表达式是__DateDiff(“w”,now,#6/10/2009#)____。
8．表示s字符变量是字母(不区分大小写)的逻辑表达式是___UCase(s)>=”A” AND UCase(s)>=”Z”____。
三、编程题
1．利用InputBox输入三角形三条边的长度a，b，c，计算并显示三角形面积。公式为：
面积=，s=(a+b+c)/2
2．随机产生一个三位正整数，然后逆序输出，产生的数与逆序同时显示。例如输入123，输出321。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。