题库
题库
A．1
B．5
C．27
D．45
| 单选题 | 以下关于窗体的描述中，错误的是 | 查看答案 |
| 单选题 | 以下叙述中错误的是 | 查看答案 |
| 单选题 | 以下关于过程及过程参数的描述中，错误的是 | 查看答案 |
| 单选题 | 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x = 0 n = InputBox("") For i = 1 To n For j = 1 To i x = x + 1 Next j Next i Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是 |
查看答案 |
| 单选题 | 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city = Array("北京", "上海", "天津", "重庆") Print city(1) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是 |
查看答案 |
| 单选题 | 在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程： Private Sub Command1_Click() a$ = "software and hardware" b$ = Right(a$, 8) c$ = Mid(a$, 1, 8) MsgBox a$, , b$, c$, 1 End Sub 则在弹出的信息框的标题栏中显示的信息是 |
查看答案 |
| 单选题 | 在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程： Private Sub TxtA_KeyPress(keyascii as integer) …… End Sub 若焦点位于文本框中，则能够触发KeyPress事件的操作是 |
查看答案 |
| 单选题 | 在窗体上画一个名称为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(ByVal a As Integer, ByVal b As Integer) X = a * a Y = b + b End Sub 程序运行后，单击命令按钮，则两个标签中显示的内容分别是 |
查看答案 |
| 单选题 | 假定有以下函数过程： Function Fun(S As String) As String Dim s1 As String For i = 1 To Len(S) s1 = UCase(Mid(S, i, 1)) + s1 Next i Fun = s1 End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim Str1 As String, Str2 As String Str1 = InputBox("请输入一个字符串") Str2 = Fun(Str1) Print Str2 End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串"abcdefg"，则单击"确定"按钮后在窗体上的输出结果为 |
查看答案 |
| 单选题 | 以下关于菜单的叙述中，错误的是 | 查看答案 |
| 单选题 | 窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。 设有如下的类型声明 Type Person name As String*8 major As String*20 End Type 当单击"保存"按钮时，将两个文本框中的内容写入一个随机文件Test29.dat中。设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是 |
查看答案 |
| 单选题 | 在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click() s = 0 For i = 1 To 15 x = 2 * i - 1 If x Mod 3 = 0 Then s = s + 1 Next i Label1.Caption = s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是 |
查看答案 |
| 单选题 | 以下不能在"工程资源管理器"窗口中列出的文件类型是 | 查看答案 |
| 单选题 | 设在窗体上有一个名称为Command1的命令按钮，并有以下事件过程： Private Sub Command1_Click() Static b As Variant b= Array(1,3,5,7,9) …… End Sub 此过程的功能是把数组b中的5个数逆序存放（即排列为9,7,5,3,1）。为实现此功能，省略号处的程序段应该是 |
查看答案 |
| 单选题 | 在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是 | 查看答案 |
| 单选题 | 下列可作为Visual Basic变量名的是 | 查看答案 |
| 单选题 | 一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程，其定义格式为： Form1中定义的过程： Private Sub frmFunction1() …… End Sub Form2中定义的过程： Public Sub frmFunction2() …… End Sub mdlFunc中定义的过程： Public Sub mdlFunction() …… End Sub 在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是 |
查看答案 |
| 单选题 | 执行如下语句： a = InputBox("Today", "Tomorrow", "Yesterday", , , "Day before yesterday", 5) 将显示一个输入对话框，在对话框的输入区中显示的信息是 |
查看答案 |
| 单选题 | 函数String（n, "str"）的功能是 | 查看答案 |
| 单选题 | 在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签，然后编写如下代码： Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n = 10 z = n + z y = y + z x = x + z Label1.Caption = x Label2.Caption = y Label3.Caption = z End Sub 运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是 |
查看答案 |