单选题窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据：Private Sub Command1 C1ick() Dim S1 As String．s2 As String Open"c：＼d4．dat"For Append As#3 Line Input#3，s1 Line Input#3，s2 Text1．Text=s1+s2 CloseEnd Sub该程序运行时有错误，应该进行的修改是
单选题窗体上有一个名称为Picture1的图片框控件。一个名称为Label1的标签控件，如图所示。现有如下程序：PublicSubdisplay(xAsControl)IfTypeOfxIsLabelThenx.Caption="计算机等级考试"Elsex.Picture=LoadPicture("pic.jpg")EndIfEndSubPrivateSubLabel1_Click()Calldisplay(Label1)EndSubPrivateSubPicture1_Click()Calldisplay(Picture1)EndSub对以上程序，下列叙述中错误的是______。
单选题若变量a未事先定义而直接使用，变量b在定义的时候省略其数据类型，则变量a和b的数据类型分别为______。 A) Integer, Variant B) Variant, String C) Boolean, String D) Variant,Variant
单选题为了在按下Esc键时执行某个命令按钮的Click事件过程，需要把该命令按钮的一个属性设置为True，这个属性是
A. Value
B. Default
C. Calicel
D. Enabled
单选题窗体上有文本框Text1，执行下列程序后在文本框输入123abc，单击按钮后输出结果为______。
Private Sub From_Load()
Text1.Text=" "
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Char=Chr(KeyAscii)
KeyAscii=Asc(UCase(Char))
Eud Sub
Private Sub Command1_Click()
Print Text1.Text
End Sub
单选题编写如下程序：
Private Sub Command1_Click()
Dim a As Integer，b As Integer
a=3：b=2
If a*b0
End Sub
程序运行后，单击命令按钮Command1，输出结果为
单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序： Private Sub Command1_Click() Dim x, y, z As Integer x = 1:y = 2:z = 3 Text1. Text= " " Call P1(x, y, z) Text1.Text = Str(z) End Sub Sub P1 (ByVal a As Integer, ByVal b As Integer, c As Integer) a= a + b b= b + c c= a + b End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是
单选题窗体上有名称为Command1的命令按钮和名称为Text1的文本框 Private Sub Commandl_Click() Text1．Text=“程序设计” Text1．SerFocus End Sub Private Sub Text1_GotFocus() Text1．Text=”等级考试” End Sub 运行以上程序，单击命令按钮后
单选题某线性表最常用的运算是插入和删除，插入运算是指在表尾插入一个新元素，删除运算是指删除表头第一个元素，那么最节省运算时间的存储方式是，
单选题为了使一个复选框被禁用(灰色显示)，应把它的Value属性设置为______。
A.0
B.1
C.2
D.False
单选题用来设置文字字体是否为粗体的属性是( )。
单选题下列程序在运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click() Dim x(10) For i=1 To 10 x(i)=10-i+1 Next i For i=10 To 1 Step-2 Print x(i) Next i End Sub
单选题关于自定义数据类型，下面叙述中不正确的是{{U}} {{/U}}。
A. 自定义数据类型必须在窗体模块或标准模块的通用声明段进行声明
B. 在窗体模块中定义自定义数据类型时必须使用Private关键字
C. 自定义数据类型只能在窗体模块的通用声明段进行声明
D. 自定义数据类型中的元素的数据类型可以是系统提供的基本数据类型或已声明的自定义数据类型
单选题编写如下程序： Private Sub Commandl_Click() Dim m As Integer,n As Integer m=1：n=0 Do While m<20 n=m+n：in=3*m+1 Loop Print m，n End Sub 程序运行后，单击命令按钮Command1，输出结果为
单选题在窗体上画一个文本框，其名称为Text1，然后编写如下过程： Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Text1_KeyUp(KeyCode As Integer, Shift As integer) Print Chr(KeyCode+2) End Sub 程序运行后，把焦点移到文本框中，此时如果敲击“A”键，则输出结果为
单选题使用通用对话框控件时，要在打开的对话框的标题栏上显示“保存文件”，应把这4个汉字赋给的属性变量是
单选题某人设计了如下程序用来计算并输出7!(7的阶乘)
Private Sub Command1_Click()
t=0
For k=7 To 2 Step-1
t=t*k
Nest
Print t
End Sub
执行程序时，发现结果是错误的，下面的修改方案中能够得到正确结果的是______。
单选题以下关于队列的叙述中正确的是______。
A.在队列中只能插入数据
B.在队列中只能删除数据
C.队列是先进后出(FILO)的线性表
D.队列是先进先出(FIFO)的线性表
单选题窗体的MouseUp事件过程如下： Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single，Y As Single) End Sub 关于以上定义，以下叙述中错误的是
单选题有如下函数过程：Function f1(x As Integer)As LongDim s As Long，i As Integers=0For i=1To xs=s+iNext if1=sEnd Function在窗体上添加一个命令按钮，名为Command1，并编写事件过程调用该函数，则输出结果为( )。Private Sub Command1_Click()Dim i As Integer，sum As LongFor i=1To5sum=sum+f1(i)Next iPrint sumEnd Sub