高级语言程序设计(沈阳农业大学)1461936478中国大学mooc慕课答案2024版100分完整版

吵受梢联铆侈协谎抹肠亢琼吞

对应课程:点击查看
起止时间:2020-09-25到2021-01-15
更新状态:已完结

第3讲 VB语言基础和顺序结构 第3讲 单元测验

1、 在VB6.0中，表达式4 * 3 \ 5 Mod 3的值是_。

A:2
B:1
C:0
D:3
E:出现错误提示
答案: 2

2、 以下选项中，不合法的变量名是_。

A:and
B:1ab
C:xyz
D:_abc
E:a1b
F:ab1
答案: and;
1ab

3、 不属于VB6.0基本数据类型的是_。

A:Char
B:Value
C:String
D:Integer
E:Single
F:Double
答案: Char;
Value

4、 数学关系 3<=x<10 表示成正确的VB6.0表达式为_。

A:3<=x And x<10
B:3<=x<10
C:x>=3 Or x<10
D:x>=3 XOR x<10
E:x>=3 MOD x<10
答案: 3<=x And x<10

5、 表达式Abs(-4.5)的值是_。

A:4.5
B:-4
C:-5
D:4
E:5
F:-4.5
答案: 4.5

6、 表示x是5的倍数的逻辑表达式为_。

A:x Mod 5 = 0
B:x – 5 = 0
C:x / 5 = 0
D:x * 5 = 0
答案: x Mod 5 = 0

7、 若要定义一个变量，用来保存某人的年龄，则最合适的数据类型是_。

A:Date
B:Integer
C:Byte
D:String
E:Boolean
F:Object
G:Variant
答案: Integer;
Byte

8、 下列关于IsNumeric()函数的描述中，错误的是_。

A:IsNumeric(“123a”)的结果是 False
B:IsNumeric(123a)的结果是 语法错误
C:IsNumeric(“-123a”)的结果是 False
D:IsNumeric(“-123.4”)的结果是 False
答案: IsNumeric(“-123.4”)的结果是 False

9、 表达式Chr(Int(Rnd*4+97))的结果是_。

A:97 ～ 100 之间的整数
B:”a” ～ “d” 之间的小写字母
C:97.0 ～ 100.0 之间的小数
D:4 ～ 97 之间的整数
E:”A” ～ “D” 之间的大写字母
答案: “a” ～ “d” 之间的小写字母

10、 表达式Val(“-1.2a3b4”)的值是_。

A:1.234
B:-1.234
C:-1.2
D:ab
E:2a3b
答案: -1.2

11、 既可作算术相加，也可作字符串连接的运算符是_。
答案: +

第4讲 选择结构 第4讲 单元测验

1、 有下列If语句，说法正确的是__。 If x=1 Then y=1

A:x=1为赋值语句，y=1为关系表达式
B:x=1为关系表达式，y=1为赋值语句
C:x=1和y=1均为赋值语句
D:x=1和y=1均为关系表达式
答案: x=1为关系表达式，y=1为赋值语句

2、 假设文本框Text1中输入了一个字母，要求判断输入的字母为”A”～”E”正确，否则显示输入错误信息，下列语句中正确的是_______。

A:If “A” <= Text1.Text <= “E” Then MsgBox “输入正确” Else MsgBox “输入错误”
B:If A <= Text1.Text <= E Then MsgBox “输入正确” Else MsgBox “输入错误”
C:If “A” <= Text1.Text Or Text1.Text <= “E” Then MsgBox “输入正确” Else MsgBox “输入错误”
D:If A <= Text1.Text Or Text1.Text <= E Then MsgBox “输入正确” Else MsgBox “输入错误”
E:If “A” <= Text1.Text And Text1.Text <= “E” Then MsgBox “输入正确” Else MsgBox “输入错误”
F:If A <= Text1.Text And Text1.Text <= E Then MsgBox “输入正确” Else MsgBox “输入错误”
答案: If “A” <= Text1.Text And Text1.Text <= “E” Then MsgBox “输入正确” Else MsgBox “输入错误”

3、 下面程序段的功能是求两个数中的大数,_______是不正确的。

A:If x > y Then Max = x Else Max = y
B:Max = x : If y > x Then Max = y
C:Max = y : If x > y Then Max = x
D:If y > x Then Max = y : Max = x
E:If x > y Then Max = x : Max = y
答案: If y > x Then Max = y : Max = x;
If x > y Then Max = x : Max = y

4、 假设x是一个整数变量，要求判断x的值为1～4之间。Select语句形式如下，则Case表达式列表写法正确的是_______。 Select Case x Case 表达式列表

A:Case 4>=x>=1
B:Case x>=1 and x<=4
C:Case Is>=1 and Is<=4
D:Case 4>=Is>=1
E:Case 1 to 4
F:Case 1,2,3,4
答案: Case 1 to 4;
Case 1,2,3,4

5、 分段函数：

,下面程序段中正确的是____。

A:If x < 0 Then y = 0If x < 1 Then y = 1If x < 2 Then y = 2If x >= 2 Then y = 3
B:If x > =2 Then y = 3ElseIf x > =1 Then y = 2ElseIf x > =0 Then y = 1Else y = 0End If
C:If x >= 2 Then y = 3If x >= 1 Then y = 2If x > 0 Then y = 1If x < 0 Then y = 0
D:If x < 0 Then y = 0ElseIf x > 0 Then y = 1ElseIf x > 1 Then y = 2Else y = 3End If
E:If x < 0 Then y = 0If 0 <= x <1 Then y = 1If 1 <= x < 2 Then y = 2If x >= 2 Then y = 3
答案: If x > =2 Then y = 3ElseIf x > =1 Then y = 2ElseIf x > =0 Then y = 1Else y = 0End If

6、 如果在文本框Text1输入80，程序运行后，显示的结果是_。 Dim x% x = Val(Text1.Text) Select Case x\5 Case 18 to 20 MsgBox( “优秀”) Case 16,17 MsgBox( “良好”) Case 12 to 15 MsgBox( “通过”) Case Else MsgBox( “不通过”) End Select

A:优秀
B:良好
C:通过
D:不通过
答案: 良好

7、 如果在文本框Text1输入80，程序运行后，显示的结果是_。 Dim x% x = Val(Text1.Text) If x >= 60 Then MsgBox (“通过”) ElseIf x >= 80 Then MsgBox (“良好”) ElseIf x >= 90 Then MsgBox (“优秀”) Else MsgBox (“不通过”) End If

A:优秀
B:良好
C:通过
D:不通过
答案: 通过

8、 任何Select Case语句都可以改写成If语句，同样，任何If语句也都可以改写成Select Case语句。

A:正确
B:错误
答案: 错误

9、 简单 If 形式无 End If 时，Then 后面只能是一句语句或多条语句间用冒号分隔，而且必须在一行上书写。

A:正确
B:错误
答案: 正确

10、 已知两个变量m和n，利用If语句，使得m大于n。在下列程序中填写合适的语句，使得功能完善(答案不要有空格)。 If m < n Then ____ n = m m = t End If

呢竟硅杭骋纳篮尾纽衫婚盒哥