题库
题库
A．代码窗口
B．属性窗口
C．工程资源管理器窗口
D．工具箱窗口
| 单选题 | 在面向对象方法中，不属于“对象”基本特点的是（ ）。 | 查看答案 |
| 单选题 | 下列叙述中正确的是（ ）。 | 查看答案 |
| 单选题 | 在窗体上有两个名称分别为 Text1、Text2 的文本框，一个名称为 Command1 的命令 按钮。运行后的窗体外观如图所示。  设有如下的类型和变量声明： Private Type Person name As String*8 major As String*20 End Type Dim p As Person 设文本框中的数据已正确地赋值给 Person 类型的变量 p，当单击“保存”按钮时，能 够正确地把变量中的数据写入随机文件 Test2.dat 中的程序段是（ ）。 |
查看答案 |
| 单选题 | 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim I, Num Randomize Do For I=1 To 1000 Num=Int(Rnd*100) Print Num; Select Case Num Case 12 Exit For Case 58 Exit Do Case 65, 68, 92 End End Select Next I Loop End Sub 上述事件过程执行后，下列描述中正确的是（ ）。 |
查看答案 |
| 单选题 | 执行下列语句 strInput=InputBox ("请输入字符串"，"字符串对话框"，"字符串") 将显示输入对话框。此时如果直接单击“确定”按钮，则变量 strInput 的内容是（ ）。 |
查看答案 |
| 单选题 | 以下不能输出“Program”的语句是（ ）。 | 查看答案 |
| 单选题 | 窗体上有 Command1、Command2 两个命令按钮。现编写以下程序： Option Base 0 Dim a( ) As Integer, m As Integer Private Sub Command1_Click( ) m=InputBox("请输入一个正整数") ReDim a(m) End Sub Private Sub Command2_Click( ) m=InputBox("请输入一个正整数") ReDim a(m) End Sub 运行程序时，单击 Command1 后输入整数 10，再单击 Command2 后输入整数 5，则 数组 a 中元素的个数是（ ）。 |
查看答案 |
| 单选题 | 有三个关系 R、S和 T 如下： 由关系 R 和S通过运算得到关系 T，则所使用的运算为（ ）。 |
查看答案 |
| 单选题 | 下列叙述中正确的是（ ）。 | 查看答案 |
| 单选题 | 某人为计算 n!(0<n<=12)编写了下面的函数过程： Private Function fun(n As Integer) As Long Dim p As Long p=1 For k=n-1 To 2 Step-1 p=p*k Next k fun=p End Function 在调试时发现该函数过程产生的结果是错误的，程序需要修改。下面的修改方案中有 3 种是正确的，错误的方案是（ ）。 |
查看答案 |
| 单选题 | 假定有以下循环结构 Do Until 条件表达式 循环体 Loop 则以下正确的描述是（ ）。 |
查看答案 |
| 单选题 | 若变量 a 未事先定义而直接使用（例如：a=0），则变量 a 的类型是（ ）。 | 查看答案 |
| 单选题 | 一个栈的初始状态为空。现将元素 1、2、3、4、5、A、B、C、D、E 依次入栈，然后再依次出栈，则元素出栈的顺序是（ ）。 | 查看答案 |
| 单选题 | 表达式 2*3^2+4*2/2+3^2 的值是（ ）。 | 查看答案 |
| 单选题 | 数据流图中带有箭头的线段表示的是（ ）。 | 查看答案 |
| 单选题 | 设窗体上有一个列表框控件 List1，含有若干列表项。以下能表示当前被选中的列表 项内容的是（ ）。 |
查看答案 |
| 单选题 | 在窗体上画一个命令按钮和一个标签，其名称分别为 Command1 和 Labcl1，然后编 写如下事件过程： Private Sub Command1_Click( ) Counter=0 For i=1 To 4 For j=6 To 1 Step -2 Counter=Counter+1 Next j Next i Label1.Caption=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是（ ）。 |
查看答案 |
| 单选题 | 设a=4，b=5，c=6，执行语句 Print a<b And b<c 后，窗体上显示的是（ ）。 | 查看答案 |
| 单选题 | 在窗体上画一个名称为 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 程序运行后，单击命令按钮，在文本框中显示的值是（ ）。 |
查看答案 |
| 单选题 | 在窗体上画一个名称为 Command1 的命令按钮，再画两个名称分别为 Label1、Label2 的标签，然后编写如下程序代码： Private X As Integer Private Sub Command1_Click( ) X=5: Y=3 Call proc(X, Y) Label1.Caption=X Label2.Caption=Y End Sub Private Sub proc(a As Integer, ByVal b As Integer) X=a*a Y=b+b End Sub 程序运行后，单击命令按钮，则两个标签中显示的内容分别是（ ）。 |
查看答案 |