物圣粱落炭笑铜俩斤竣冒授戈
对应课程:点击查看
起止时间:2020-03-02到2020-07-05
更新状态:已完结
第6讲 控制结构-循环结构 第6讲单元测验
1、 对用户输入的数值限制为正数，如果输入了负数，则要求重新输入。下面__可以实现。
A:Dim x As IntegerDo x = Val(InputBox(“请输入数据”))Loop While x < 0
B:Do x = Val(InputBox(“请输入数据”))Loop While x > 0
C:Do While x > 0 x = Val(InputBox(“请输入数据”))Loop
D:x = Val(InputBox(“请输入数据”))If x < 0 ThenEnd If
E:For x < 0 x = Val(InputBox(“请输入数据”))Next
答案: Dim x As IntegerDo x = Val(InputBox(“请输入数据”))Loop While x < 0
2、 以下程序段运行后，Label1.Text结果是___。Label1.Text = “”For i = 1 To 6 If i Mod 2 = 0 Then Label1.Text = i EndifNext
A:6
B:135
C:246
D:123456
E:24
答案: 6
3、 当在文本框输入“ABCD”时，则下面程序运行后，标签 Label1上显示的是_____。Dim i As IntegerLabel1.Text = TextBox1.TextFor i = 1 To Len(TextBox1.Text) Label1.Text &= Mid(TextBox1.Text, i, 1)Next
A:ABCDABCD
B:ABCDDCBA
C:AABABCABCD
D:DCBA
E:AABBCCDD
答案: ABCDABCD
4、 下面程序功能是在文本框输入任意字符串，将字符串倒置后在标签显示结果。例如，输入“ABCDEFG”变换成“GFEDCBA”。在空白处填入合适的表达式，使程序完整。Dim i As IntegerLabel1.Text = “”For i = 1 To Len(TextBox1.Text) Label1.Text = __Next
A:Mid(TextBox1.Text, i, 1) & Label1.Text
B:Mid(TextBox1.Text, i, 1)
C:Label1.Text & Mid(TextBox1.Text, i, 1)
D:Label1.Text & TextBox1.Text
E:TextBox1.Text & Label1.Text
答案: Mid(TextBox1.Text, i, 1) & Label1.Text
5、 在下列循环中，能正常结束的是 。
A:i=5Do i=i+1Loop while i>10
B:i=1Do i=i+2Loop while i<>10
C:i=10Do i=i+1Loop while i>10
D:i=6Do i=i-2Loop while i<>1
E:i=3Do i = i mod 2Loop while i<>0
答案: i=5Do i=i+1Loop while i>10
6、 以下 是正确的For … Next结构。
A:For x = 3 To -3 Step -3 …Next
B:For x=1 Step 10 …Next
C:For x = 1 To 10 re: … NextIf x = 10 Then GoTo re
D:For x = 3 To 10 Step 3 …Next y
E:For x = 3 To 1 , 3 …Next
答案: For x = 3 To -3 Step -3 …Next
7、 下列程序段不能正确显示1！、2！、3！、4！的结果的是 。
A:For i = 1 To 4 For j = 1 To i n = 1 n = n * j Next j MsgBox( n)Next i
B:Dim i%, j%, n%For i = 1 To 4 n = 1 For j = 1 To i n = n * j Next j MsgBox( n)Next i
C:Dim j%, n%n = 1For j = 1 To 4 n = n * j MsgBox( n)Next j
D:Dim j%, n%n = 1j = 1Do While j<=4 n=nj MsgBox(n) j=j+1Loop
E:Dim j%, n%n = 1j = 1Do n=nj MsgBox(n) j=j+1Loop While j<=4
答案: For i = 1 To 4 For j = 1 To i n = 1 n = n * j Next j MsgBox( n)Next i
8、 下面程序功能是在文本框输入一个正整数，转换为7进制后在标签显示结果。在空白处填入合适的表达式，使程序完整。Dim n As IntegerDim s As Stringn = Val(TextBox1.Text)Do While __ s = n Mod 7 & s n = n \ 7LoopLabel1.Text = s
A:n > 0
B:n > 7
C:s > 0
D:TextBox1.Text > 0
E:n < 0
答案: n > 0
9、 在下面关于Do循环和For循环的说法中，正确的是 。
A:Do循环和For循环都可以用于循环次数已知或未知的情况。
B:For循环只能用于循环次数已知的情况。
C:Do循环只能用于循环次数未知的情况。
D:Do循环和For循环都不可以用于循环次数未知的情况。
E:Do循环只能用于循环次数已知的情况。
答案: Do循环和For循环都可以用于循环次数已知或未知的情况。
10、 以下程序段运行后，Label1.Text结果是___。Label1.Text = “”For i = 7 To 1 Step -1 If i Mod 3 = 0 Then Continue For Label1.Text &= i & ” “Next
A:7 5 4 2 1
B:7
C:7 6
D:6 3
E:7 6 5 4
答案: 7 5 4 2 1
11、 在Do while···Loop 循环中，想要跳出循环，用Exit do 语句。
A:正确
B:错误
答案: 正确
12、 在For循环中，想要结束本轮循环，用Exit For 语句。
A:正确
B:错误
答案: 错误
13、 要使下列For语句的循环体循环执行20次，循环变量的初值应当是__。For k = _ To 5 Step 2
答案: -33
14、 以下程序段运行后，如果输入123，b的结果是___。 Dim a, b As Integer a = Val(InputBox(“请输入数据”)) Do While a > 0 b = b * 10 + a Mod 10 a = a \ 10 Loop
答案: 321
第1讲 VB.NET入门基础 第1讲 单元测验
1、 不属于VB.NET特点的是 。
A:没有语法的程序编写语言
B:易学易用的集成开发环境
C:具有面向对象的可视化设计工具
D:事件驱动的编程机制
E:支持结构化程序设计
F:具有丰富的数据类型、类库
G:强大的数据库、网络和图形功能
H:完备的帮助功能
答案: 没有语法的程序编写语言
2、 在VB.NET中，显示帮助信息的快捷键是 。
A:F1
B:F2
C:F5
D:F6
E:F3
F:Alt+F4
G:Ctrl+C
答案: F1
3、 在VB.NET集成开发环境中，通过 窗口编写程序。
A:代码
B:即时
C:监视
D:布局
E:属性
F:事件
答案: 代码
4、 在集成开发环境有两类窗口，浮动和固定，下面 窗口不是浮动窗口。
A:窗体
B:代码
C:工具箱
D:属性
E:即时
答案: 窗体;
代码
5、 VB.NET项目文件的扩展名是 。
A:.vbproj
B:.vb
C:.sln
D:.exe
E:.user
F:.frm
答案: .vbproj
6、 在下列窗口中， 可以查看与项目有关的所有文件。
A:解决方案资源管理器
B:属性窗口
C:起始页
D:任务列表
E:代码窗口
F:工具箱窗口
答案: 解决方案资源管理器
7、 将调试好的exe可执行文件复制到其他机器上不能运行，其主要原因是__ 。
A:运行的机器上无.NET框架
B:缺少窗体文件
C:该可执行文件有病毒
D:缺少代码文件
E:缺少属性文件
F:缺少方法文件
答案: 运行的机器上无.NET框架
如需购买完整答案，请点击下方红字：
获取更多中国大学慕课答案，请点击这里，进入mooc.mengmianren.com
粹酱管瓜嗅驴莆惯巧喝僧碧驼