DO While x＜50

x＝（x＋2）＊（x＋3）

n＝n＋l

Loop

Text1．Text＝Str（n）

Text2．Text＝Str（x）

End Sub

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

A．1和0 B．2和72 C．3和50 D．4和168

B。【解析】Do While Until…Loop循环语句的执行过程是：如果条件为真（True），则执行语句块，当执行到Loop语句时，将返回到While语句并对“条件”再次进行判断，如仍为真（True），则重复前述过程；如果条件为假（False），则不执行语句块，而执行Loop之后的语句。

本题第1次执行循环体后，x、n的值分别为6和1，第2次执行循环体后，x、n的值分别为72和2，此时While语句“条件”为假，将n、x的值在文本框中显示。

33. 假定有下列程序段：

For i＝1TO 3

For j＝5To 1Step－1

Print i＊j

Next j

Next i

则语句Print i＊j的执行次数是（）。

A．15 B．16 C．17 D．18

A。【解析】For…Next循环语句可提供一个重复执行的语句序列，遵循“先检查，后执行”的规则，执行过程中，循环次数＝Int（终值－初值）／步长＋1。本题代码是一个嵌套的For循环，其中每次执行内循环时的循环次数＝（Int（1－5）／－1）＋1＝5，外循环的循环次数为3，因此执行循环体语句：PrintI＊J的次数为15次。

34. 在窗体上画一个名称为Co mmand1的命令按钮，然后编写下列事件过程：

Private Sub Co mmand1＿Click（）

c＝1234

c1＝Tri m（Str（c））

For i＝1To 4

Print Next

End Sub

程序运行后，单击命令按钮，要求在窗体上显示下列内容：1121231234则在横线处应填入的内容为（）。

A．Right（c1，i）B．Left（c1，i）C．Mid（c1，i，1）D．Mid（c1，i，i）

B。【解析】Str（）函数可将数值数据转换为字符串数据，转换时总会在数字前保留一空位来表示正负，如果数值为正，返回的字符串包含一个前导空格，暗示有一个正号。Tri m$（字符串）函数用于去掉“字符串”两边的空白字符。从本题显示结果可知，在For循环中窗体上每次显示的是字符串“1234”的前i个字符（i为循环变量）。故答案为选项B。

35. 在窗体上画两个单选按钮（名称分别为Optionl、Option2，标题分别为“宋体”和“黑体”）、1个复选框（名称为Checkl，标题为“粗体”）和1个文本框（名称为Text1，Text

属性为“改变文字字体”），窗体外观如下图所示。程序运行后，要求“宋体”单选钮和“粗体”复选框被选中，则下列能够实现上述操作的语句序列是（）。

A．Option1．Value＝False

Check1．Value＝True

B．Optionl．Value＝True

Checkl．Value＝0

C．Option2．Value＝False

Check1．Value＝2

D．Optionl．Value＝True

Checkl．Value＝1