习题
一、选择题
1. 在程序中已将变量Inta、Bl、st和D分别定义为Integer型、Boolean型、String型和Date型，下列语句中，正确的是      。
A. Inta="333"+"a22"  B. D=#10/05/01#     C. st=5+"abc"      D. Bl= #True#
2. 语句Print "5*20" 输出结果是      。
A. "5*20"          B. 出错          C. 5*20         D. 100
3. 下列可作为Visual Basic变量名的是      。
A. a#a                B. 4a                C. ?xy          D. Consta
4. 表达式6*7/8 Mod 9的值是_______。
A. 4                B. 5                C. 6              D. 7
5. 将数学表达式cos2(a+b)+5e2写成Visual Basic表达式，其正确的形式是_______。
A. cos(a+b)^2+5*Exp(2)                B. cos^2(a+b)+5*Exp(2)
C. cos(a+b)^2+5*Ln(2)                  D. cos^2(a+b)+5*Ln(2)
6 .数学表达式Sin25°写成VB表达式是_______。
A. Sin25            B. Sin（25）        C. Sin（25°）  D. Sin（25*3.14/180）
7. 选拔身高T超过1.7米且体重W小于62.5公斤的人，表示该条件的逻辑表达式为_______。
A. T>=1.7 And W<=62.5              B. T<=1.7 Or W>=62.5
C. T>1.7 And W<62.5                 D. T>=1.7 Or W<62.5
8. 执行语句代码 print format(2004.218, "##,##0.00")，以下答案中哪一个是正确的_______。
A. 2004.21          B. 2,004.21          C. 2,004.22      D. 02,004.21
9. 下面表达式的值为真的是_______。
A. Mid("Visual Basic",1,12)=Right("Programming language Visual Basic",12)
B. "ABCRG">"abcde"
C. Int(134.69)>=Round(134.69)
D. 78.9/32.77<=957/43.91 And –45.4>-4.98
10. 实现字符的Unicode编码方式与Windows编码方式相互转换的函数是      。
A. str  B. strconv  C. trim  D. mid
二、填空题
1. 在VB中整型数据占 2     个字节的内存空间，双精度浮点型数据占  8   个字节的内存空间。
2. 在VB中，字符串常量要用下列数据中属于字符串常量的是abc 双引号     括起来，日期/时间型常量要用  #号    括起来。
3. 表达式10\6 = 10 mod 6 的运算结果是 False     。
4.  a$=Lcase("Hello")  a$的返回值是：  hello    ；
b$=Ucase("Hello")  b$的返回值是：  HELLO    。
5. 要强制显式变量声明时，需在声明段部分加入语句 Option Explicit     。
6. 在VB中，用Dim X As Integer定义的变量X，系统默认值为 0     。
7. 语句Print Int(12345.6789*100+0.5)/100的输出结果是： 12345.68      。
8. 设有如下程序段：
a$="BeijingShanghai"
b$=Mid(a$,InStr(a$,"g")+1)
执行上面的程序段后，变量b$的值为 Shanghai     。
9.  Private Sub Form_Click()
Dim x As String * 5
x = "abc"
y% = 1
Print x & y
x = "abcdefg"
Print x & y
End Sub 则单击窗体，显示结果的第分别为 abc  1      和 abcde1     。
10. 随机产生10个100～200之间的数，求最大值。 
Private Sub Command1_Click()
    Max = 100
    For i = 1 To 10
      x = Int(Rnd() * _101____ + 100)
      Print x;
      If x > Max Then Max = x
    Next i
    Print
    Print "最大值="; Max
End Sub

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