题目内容

设x的初始值为1，并有下面程序片段： While x < 10 x = x + 1 Wend下面与上述程序片段产生结果不同的是

A. Do While x < 10 x = x + 1 Loop
B. Do x = x + 1 Loop While x < 10
C. Do x = x + 1 Loop Until x > 10
Do Until x >= 10 x = x + 1

查看答案

搜索结果不匹配？点我反馈

更多问题

下面关于列表框Selected属性的叙述中正确的是

A. Selected属性是个字符数组
B. Selected属性一个数组，用来表示哪些列表项被选中
C. Selected属性是一个逻辑型变量，当选中一个列表项时，Selected属性被设置为True
D. Selected属性为1时表示列表框中有列表项被选中

查看答案

下面程序片段中有错误Sub pric( ) Public x As Integerx = Array(1, 2, 3, 4, 5) ……End Sub为了避免出错，正确的修改方案是

A. 把Public x As Integer 改为Public x As Variant
B. 把Public x As Integer 改为Dim x(5)
C. 把Public x As Integer 改为Static x
D. 把x = Array(1, 2, 3, 4, 5)改为x = Array(0, 1, 2, 3, 4)

查看答案

为了判断字符串变量ch中是否是一个大写字母，需要编写这样一个表达式：当ch中字符为大写字母时，表达式的值为True，否则为False。下面能正确实现这一目的的表达式是

A < ch < "Z"
B. A < ch And ch < "Z"
C. A < ch Or ch < "Z"
D. A < UCase(ch) And UCase(ch) < "Z"

查看答案

窗体上有一个Text1文本框和一个Command1命令按钮。程序的功能是在文本框中输入密码后单击命令按钮则进行密码确认，若密码正确，弹出信息框显示"密码正确"，若密码错误，弹出信息框显示"密码错误，请重新输入"，但最多允许输出3次，若还不正确，则弹出信息框显示"密码错误，不能再输入"，且命令按钮变为无效。某人编写了如下程序：Private Sub Command1_Click() Dim num As Integer num = num + 1 If Text1.Text = "123456" Then MsgBox "密码正确" ElseIf num = 3 Then Command1.Enabled = False MsgBox "密码错误，不能再输入" Else MsgBox "密码错误，请重新输入" End IfEnd Sub调试时发现有错误需要修改，下面正确的修改方案是

A. 把ElseIf num = 3 Then 改为ElseIf num >3 Then
B. 把Command1.Enabled = False 改为Command1.Enabled = True
C. 把Dim num As Integer 改为Static num As Integer
D. 把num = num + 1 改为 num = num + 3

查看答案

设x的初始值为1，并有下面程序片段： While x < 10 x = x + 1 Wend下面与上述程序片段产生结果不同的是

A. Do While x < 10 x = x + 1 Loop B. Do x = x + 1 Loop While x < 10 C. Do x = x + 1 Loop Until x > 10 Do Until x >= 10 x = x + 1

下面关于列表框Selected属性的叙述中正确的是

下面程序片段中有错误Sub pric( ) Public x As Integerx = Array(1, 2, 3, 4, 5) ……End Sub为了避免出错，正确的修改方案是

为了判断字符串变量ch中是否是一个大写字母，需要编写这样一个表达式：当ch中字符为大写字母时，表达式的值为True，否则为False。下面能正确实现这一目的的表达式是

A. Do While x < 10 x = x + 1 Loop
B. Do x = x + 1 Loop While x < 10
C. Do x = x + 1 Loop Until x > 10
Do Until x >= 10 x = x + 1