中国石油大学华东vb选择题题库(6)

End Sub

程序运行后，单击命令按钮Command1，输出结果为( )。

A. 40 19 B. 40 18 C. 21 64 D. 20 64

正确答案：B，你的答案：B， √

18. 下列循环中，可以正常结束的是( )。 A. i＝1 Do i＝i＋1 Loop Until i＝10 B. i＝10 Do i＝i－2 Loop Until i＝1 C. i＝10 Do i＝i＋1 Loop While i>1 D. i＝10 Do i＝i＋1 Loop Until i<1

正确答案：A，你的答案：A， √

19. 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As String

a＝InputBox(\请输入一个二进制数\ n＝Len(a) For i＝1 To n

Dec＝Dec * 2＋______(a， i， 1) Next i Print Dec End Sub

程序功能为：单击命令按钮，将产生一个输入对话框，此时如果在对话框中输入一个二进制数，并单击\确定\按钮，则把该二进制数转换为等值的十进制数。这个程序不完整，应在\处填入的内容是( )。

A. Mid B. Val C. Right D. Left

正确答案：A，你的答案：A， √

20. 有如下程序： Private Sub Form_Click() Dim S As String

S = InputBox(\请输入一个字符串：\ For i = 1 To Len(S) \\ 2

If Mid(S, i, 1) <> Mid(S, Len(S) - i + 1, 1) Then Print \ Exit Sub End If Next i Print \End Sub

运行程序，单击窗体，在输入对话框中输入abcscba，则输出结果为 A. abc B. Yes C. cba D. No

正确答案：B，你的答案：B， √

21. 假定有以下循环结构。则以下正确的描述是( )。 Do Until 条件表达式 循环体 Loop

A. 如果\条件表达式\的值不为0，则至少执行一次循环体 B. 如果\条件表达式\的值恒为0，则无限次执行循环体 C. 不论\条件表达式\的值是否为\真\，至少要执行一次循环体 D. 如果\条件表达式\的值是0，则一次循环体也不执行 正确答案：B，你的答案：B， √

22. 下面程序的执行结果是( )。 Private Sub Command1_Click() a＝0 k＝1 Do While k<4 x＝k ^ k ^ a k＝k＋1

Print x； Loop End Sub

A. 1 4 9 B. 1 4 27 C. 1 1 1 D. 0 0 0

正确答案：C，你的答案：C， √

23. 在窗体上画一个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load() Show Text1.Text＝\ Text1.SetFocus End Sub

Private Sub Form_Click() Dim a As String， s As String a＝Text1.Text s＝\

For k＝1 To Len(a)

s＝UCase(Mid(a， k， 1))＋s Next k Text1.Text＝s End Sub

程序运行后，在文本框中输入一个字符串，然后单击窗体，则文本框中的内容(

A. 为原字符串的逆序字符串

B. 与原字符串中字符顺序相同，但所有字母均转换为大写 C. 为原字符串的逆序字符串，且所有字母转换为大写 D. 与原字符串相同

正确答案：C，你的答案：B， ×

24. 窗体上有一个名称为Command1的命令按钮，其单击事件过程如下： Private Sub Command1_Click() Dim s As Double s = 0: i = 1 Do While i < 6 s = s + i / (i + 1) i = i + 1 Loop Print s End Sub

该事件过程的功能是计算一个表达式的值，该表达式是

)。

A. 1/2+2/3+3/4+4/5+5/6 B. 1/2+2/3+3/4+4/5 C. 1+1/2+2/3+3/4+4/5+5/6 D. 1+1/2+2/3+3/4+4/5

正确答案：A，你的答案：C， ×

25. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程。程序运行后，单击命令按钮，在文本框中显示的值是( )。 Private Sub Command1_Click() Dim i As Integer， n As Integer For i＝0 To 50 i＝i＋3 n＝n＋1

If i>10 Then Exit For Next

Text1.Text＝Str(n) End Sub A. 3 B. 4 C. 2 D. 5

正确答案：A，你的答案：A， √

1. Visual Basic有3种工作模式．在________模式下，可以修改代码，但不可以修改窗体界面 A. 设计 B. 运行 C. 编译 D. 中断

正确答案：D，你的答案：D， √

2. 在使用Visual Basic工具箱时，如果工具箱没有出现在窗口中，应在________菜单操作使它可见。 A. 窗口 B. 文件 C. 视图 D. 编辑

正确答案：C，你的答案：C， √

3. 如果要在窗体上画一个标签，应在工具箱窗口中选择的图标是________。 A.

B. C. D.

正确答案：B，你的答案：B， √

4. 下列说法错误的是________

A. 方法是对象的一部份

B. 在调用方法时，对象名是不可缺少的 C. 方法是一种特殊的过程和函数 D. 方法的一般调用格式为 对象名.方法名 正确答案：B，你的答案：B， √

5. 要将命令按钮设置为不可见应设置________属性

A. Visible B. Enabled C. Caption D. Value

正确答案：A，你的答案：A， √

6. 单击窗体上的关闭按钮，将触发________事件。

A. Form_Unload B. Form_Load C. Form_GotFocus D. Form_Initialize

正确答案：A，你的答案：A， √

7. 要能获得文本框中被选取文本的起始字符位置，可是用________属性？ A. Text B. SelStart C. SelLength D. SelText

正确答案：B，你的答案：B， √

8. 表达式int(Rnd*99+1)产生随机数的范围是________。

A. [1,100) B. [1,99) C. [1,99] D. [1,100]

正确答案：C，你的答案：C， √

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库中国石油大学华东vb选择题题库(6)在线全文阅读。