题库
题库
| 单选题 | 在窗体上画一个命令按钮和一个文本框（名称分别为Command1和Textl），并把窗体的KeyPreview属性设置为True，然后编写如下代码： Dim SaveAll As String Private Sub Form_Load() Show Textl.Text="" Textl.SetFocus End Sub Private Sub Command1_Click() Textl.Text=LCase (SaveAll) +SaveAl1 End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后，直接用键盘输入：VB，再单击命令按钮，则文本框中显示的内容为（ ）。 |
查看答案 |
| 单选题 | 以下关于菜单的叙述中，错误的是（ ）。 | 查看答案 |
| 单选题 | 以下关于过程及过程参数的描述中，错误的是（ ）。 | 查看答案 |
| 单选题 | 支持子程序调用的数据结构是（ ）。 | 查看答案 |
| 单选题 | 软件按功能可以分为：应用软件、系统软件和支撑软件（或工具软件）。下面属于应用软件的是（ ）。 | 查看答案 |
| 单选题 | 在窗体上画两个文本框（名称分别为Textl和Text2）和一个命令按钮（名称为Command1），然后编写如下事件过程： Private Sub Command1_Click() x=0 Do While x<50 x=(x+2) * (x+3) n=n+1 Loop Textl.Text=Str(n) Text2.Text=Str(x) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为（ ）。 |
查看答案 |
| 单选题 | 执行以下程序段 a$ = "Visual Basic Programming" b$ = "C++" c$ = UCase(Left$(a$,7)) & b$ & Right$(a$,12) 后，变量c$的值为（ ）。 |
查看答案 |
| 单选题 | 下面叙述中错误的是（ ）。 | 查看答案 |
| 单选题 | 语句Dim a(-3 To 4,3 To 6)As Integer定义的数组的元素个数是（ ）。 | 查看答案 |
| 单选题 | 以下关于函数过程的叙述中，正确的是（ ）。 | 查看答案 |
| 单选题 | 以下叙述中错误的是（ ）。 | 查看答案 |
| 单选题 | 设在工程文件中有一个标准模块，其中定义了如下记录类型： Type Books Name As String * 10 TelNum As String * 20 End Type 在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是（ ）。 |
查看答案 |
| 单选题 | 数据库应用系统中的核心问题是（ ）。 | 查看答案 |
| 单选题 | 在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序： Private Sub func(L As Label) L.Caption="1234" End Sub Private Sub Form_Load() Label1.Caption="ABCDE" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Label1) Label2.Caption=a End Sub 程序运行后，单击命令按钮，则在两个标签中显示的内容分别为 |
查看答案 |
| 单选题 | 在窗体上画一个命令按钮，名称为Command1，然后编写如下代码： Option Base 0 Private Sub Command1_Click() Dim A1 (4) As Integer, A2 (4) As Integer For k=0 To 2 A1 (k+1) = InputBox("请输入一个整数") A2 (3-k) = A1(k+1) Next k Print A2(k) End Sub 程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为（ ）。 |
查看答案 |
| 单选题 | 以下说法中正确的是（ ）。 | 查看答案 |
| 单选题 | 耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是（ ）。 | 查看答案 |
| 单选题 | 执行语句Dim X, Y As Integer后，（ ）。 | 查看答案 |
| 单选题 | 设有以下程序： Private Sub Form_Click() x=50 For i=1 To 4 y=InputBox("请输入一个整数") y=Val(y) If y Mod 5 = 0 Then a=a+y x=y Else a=a+x End If Next i Print a End Sub 程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为（ ）。 |
查看答案 |
| 单选题 | 某二叉树有5个度为2的结点，则该二叉树中的叶子结点数是（ ）。 | 查看答案 |