大学 VB 第3章 VB语言基础
第3 章VB语言基础
一．例题解析
（1）执行下列语句后，Print语句的输出结果是。
a=8：b=9
Print a>b
A）-1 B）0 C）True D）False
【答案】D
【解析】VB中使用常量True表示逻辑真，False表示逻辑假。表达式a>b的结果是逻辑假，所以Print语句的输出结果为False。
（2）设x为整型变量，能正确表示1 A）1 C）1 【答案】C 【解析】表示某一区间的数学式子在VB中应改写为两个关系表达式的逻辑与运算，使用And运算符。 （3）函数Int(Rnd(2)*10)产生的是闭区间范围的整数。 A）[0,9] B）[1,10] C）[0,10] D）[1,9] 【答案】A 【解析】Rnd函数产生的是区间[0,1)之间的随机数，所以Rnd(2)*10产生的是区间[0,10)之间的随机数，Int函数的功能是截尾取整，即舍去所有的小数部分。 （4）下列四个表达式中，其值为0的是。 A）3/4 B）3\4 C）4 Mod 3 D）3 Mod 4 【答案】B 【解析】在此题中出现了三种运算符，“/”表示除，“\”表示整除，“Mod”表示取余。选项A的值为0.75；选项B的值为0；选项C的值为1；选项D的值为3。 （5）下列常量表示中，合法的长整型常量是。 A) @ B)0& C)31276! D)345# 【答案】B 【解析】VB 6.0中可以使用类型后缀识别常量的类型，@是货币型常数，&是长整数，!是单精度常数，#是双精度数。 （6）下面逻辑表达式的值为真的是。 A)"ABC">"abc" B)"ABC">"b23" C)"ABC">"ABC" D)"ABC">"AB C" 【答案】D 【解析】两个字符串比较大小，从左到右进行，若两个字符串全部字符相同，则二者相等。若二者不相等，则以第一个出现的不同字符比较结果为准。 （7）下列函数中，返回值是字符串的是。 A)Chr B)Instr C)Val D)Asc 【答案】A 【解析】函数Chr的功能是将ASCII码转换成字符；函数Instr的功能是返回一个字符串在 另一个字符串中出现的位置；函数Val的功能是将字符串转换为数值；函数Asc的功能是将字符转换为ASCII码。 （8）下列可作为Visual Basic变量名的是。 A) A#A B)4A C)?xy D)constA 【答案】D 【解析】Visual Basic变量命名的规则是：变量名的第一个字符必须是字母或汉字，并由字母、数字、汉字和下划线组成，中间不能有空格；变量名的字符数不超过255个并不能使用VB保留字。在上述选项中，选项A中含有字符“#”、选项B以数字开头，选项C中含有字符“?”，均不满足变量的命名规则。 （9）函数String(n,"str")的功能是。 A)把数值型数据转换为字符串 B)返回由n个字符组成的字符串 C)从字符串中取出n个字符 D)从字符串中第n个字符的位置开始取子字符串 【答案】B 【解析】函数String(n,"str")返回由n个字符"s"组成的字符串。 （10）在窗体上画一个文本框、一个命令按钮和一个标签，名称分别为Text1、Command1和Label1，文本框的Text属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Textl.Text)+0.5) Label1.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是。 A)27 B)28 C)29 D)30 【答案】C 【解析】Int函数的功能是求不大于输入参数的最大整数；Val函数的功能是将一个字符串转换成数值；Str函数的功能是将一个数值表达式转换成一个字符串。本题中使用Val(Text1.Text)将文本框中的字符串"28.653"转换成数值28.653，Int(28.653+0.5)的值是29，再使用Str函数将29转换成字符串赋给Label的Caption属性，因而在标签中显示29。 （11）在窗体上画一个命令按钮名称为Commandl，编写如下事件过程： Private Sub Commandl_Click() b=5 c=6 P rint a=b+c End Sub 程序运行后，单击命令按钮，输出结果是。 A)a=11 B)a=b+c C)11 D)False 【答案】D 【解析】本题出现在Print方法中的“a=b+c”是一个关系表达式，不是赋值语句，因而其结果是逻辑值。由于a、b、c的值分别为0、5、6，也就是说a和b+c的值不相等，所以表达式“a=b+c”的结果是False。 （12）在窗体上放置两个文本框和一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() Dim a As Integer, b As Integer a = Text1.Text b = Text2.Text Print a + b; Text1 + Text2 End Sub 程序运行后，在Text1中输入3，在Text2中输入4，然后单击命令按钮，则输出结果为。 A)34 34 B)34 7 C)7 34 D)7 7 【答案】C 【解析】文本框的Text属性值是字符串型数据。由于变量a和b已经声明为整型，所以在赋值时系统自动将Text1和Text2中的字符串转换为数值分别赋给变量a和b。因此a+b 是数值的加法运算，输出结果为整数7；而Text1+Text2则是字符串的连接，输出结果是字符串“34”。 二．练习题 1．单项选择题 （1）Int函数的返回值类型是。 A) 整型B)字符串C) 变体D)字符串或整型 （2）在VB中，常量22# 的数据类型是。 A）整型 B）双精度型C）单精度实型D）长整型 （3）设当前日期是2010年4月30日，表达式Print Day(Now)的输出结果是。 A) 2010 B) 4/30/10 C)30 D) 4 （4）下述四个字符"C"、"z"、"A"和"8"中，ASCII码值最小的是。 A) "C" B) "8" C) "A" D) "z" （5）VB中1e-6写成十进制小数是。 A) 0. B) –0. C) 1.00005 D) –1.00005 （6）函数InStr()返回的是数据。 A) 字符串类型B) 长整型 C) 单精度类型D) 字节型 （7）表达式10^3的值是。 A）-1000 B）0.001 C）1000 D）-0.001 （8）VB变量名abc%的类型是。 A) 字符串类型B) 单精度类型C) 整型 D) 双精度类型 （9）下面VB程序运行结果的值是。 Private Sub Command1_Click() Dim s a = 1： b = 2： c = 3 s = a < b Or b < c Or c < a Print s End Sub A) True B) False C) 0 D) Boolean （10）方法Print Int(11111.5555 * 100 + 0.5) / 100输出结果是。 A) 11111.55 B) 11111.00 C) 11111 D) 11111.56 （11）方法Print Format(122.3, "00000.000")输出结果是。 A) 12.230 B)12.23 C)122.30 D) 00122.300 （12）下列名称表示变体数据类型的是。 A) Boolean B) Currency C) Double D) Variant （13）下列不能定义一个整型变量test的语句的是。 A) Public test As Integer B) Dim test As Integer C) Dim test% As Integer D) Dim test% （14）以下语句的输出结果是。 Print Format$(32548.56, " ###,###.# ") A) 32548.6 B) 32,548.6 C) 032,548.56 D) 32548.56 （15）以下关系表达式中，其值为False的是。 A) "ABC">"AbC" B) "the"<>"they" C) "VISUAL"=UCase("Visual") D) "Integer">"Int" （16）计算结果为0的表达式是。 A) Int(2.3)+Int (-2.8) B) Cint(2.3)+Cint(-2.8) C) Fix(2.3)+Int(-2.8) D) Fix(2.3)+Fix(-2.8) （17）在Visual Basic中,表达式3*2 \5Mod3的值。 A) 1 B) 0 C) 3 D) 出现错误提示 （18）以下选项中,不合法的Visual Basic变量名是。 A) a5b B) _xyz C) a_B D) andif （19）设y是整型变量,能判断y为奇数的表达式是。 A) Not(y Mod 2<>0) B) y Mod 2<>0 C) (y-1)Mod 2<>0 D) y Mod 2<>1 （20）设A="",则表达式Val(Left(A,4)+Mid(A,4,2))的值为。 A) B) C) 5 D) 6 （21）Mid("Hello Everyone",7,3)的执行结果是。 A) yon B) every C) Eve D) one （22）设a=5,b=4,c=3,d=2,则表达式3>2*b Or a=c And b<>c Or c>d的值是。 A) 1 B) True C) False D) 2 （23）表达式Right("Beijing",4)的值是。 A) Beij B) jing C) eiji D) ijin 2．填空题 （1）设a=18,b=25,c=30,d=10,表达式的d > c Or Not a > b的值是。 （2）用Dim abc As Variant定义的abc变量类型是。 （3）将数学表达式Cos2(a+b)+5e2写成VB的表达式，其正确的形式是。（4）执行以下程序段后，变量c的值是。 a="12A34" ：b="78" c= Val(a) + Val(b) （5）有如下程序 Private Sub Form_Click() Dim z1, z2 As Integer z1 = 15.6 ：z2 = 15.6 Print z1; z2 End Sub 运行后，单击窗体，则输出的结果是。