内容发布更新时间 : 2024/11/18 21:32:24星期一 下面是文章的全部内容请认真阅读。

VB语言程序设计-在线作业_A 用户名：W310201132227最终成绩：100.0

一 单项选择题

1.

阅读下面的程序： Private Sub Form_Click() Dim m, n As Integer

m = InputBox(\请输入 M 的值\ m = Val(m) m1 = m

n = InputBox(\请输入 N 的值\ n = Val(n) n1 = n

Do While n <> 0 remin = m Mod n m = n n = remin Loop

Print m1, n1, m End Sub

程序运行后，单击窗体，在输入对话框中分别输入16和24，在程序在窗体上的输出结果为（ ）。

16 24 4 24 16 8

16 24 8 24 16 6

本题分值： 5.0 用户得分： 5.0

用户解答： 16 24 8 知识点：

2.

假定有以下循环结构 Do Until 条件

循环体

Loop

则正确的描述是（ ）。

如果“条件”是一个不为0的常数，则至少执行一次循环体 不论“条件”是否为“真”，至少要执行一次循环体 如果“条件”是一个为0的常数，则无限次执行循环体 如果“条件”是一个为0的常数，则一次循环体也不执行

本题分值： 5.0 用户得分： 5.0

用户解答： 如果“条件”是一个为0的常数，则无限次执行循环体 知识点：

3.

在窗体上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程： Private Sub Command1_Click() x = 0

Do While x < 50 x = (x + 2) * (x + 3) n = n + 1 Loop

Text1.Text = Str(n) Text2.Text = Str(x) End Sub

程序运行后，单击命令按钮，在两个文本框中显示的值分别为（ ）。

2和72 1和0 4和168 3和50

本题分值： 5.0 用户得分： 5.0 用户解答： 2和72 知识点：

4.