在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程：记录类型定义如下：下列叙述中正确的是（ ）。

A． 记录类型animal不能在Form1中定义，必须在标准模块中定义

B． 如果文件c：/vbTest．dat不存在，则Open命令执行失败

C． 由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾

D． 语句“Put#1,,rec”将animal类型的两个数据元素写到文件中

[单选题]在窗体上有一个名称为Command1的命令按钮，并编写有如下事件过程：程序执行时，单击命令按钮，实现的功能是（ ）。A． 命令按钮移动到距窗体左边界、上边界各500的位置B． 命令按钮向左、上方向各移动500C． 窗体移动到距屏幕左边界、上边界各500的位置D． 窗体向左、上方向各移动500

[单选题]在窗体上画一个命令按钮(名称为Command1)，编写如下事件过程： Private Sub Command1_Click() b=5 c=6 Print a=b+c End Sub 程序运行后，单击命令按钮，输出的结果是： ______。A．a=11B．a=b+cC．a=D．假

[单选题]在窗体画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c=1234 c1=Trim(Str(c)) For i=1 To 4 Print Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： 1 12 123 1234 则在下划线处应填入的内容为______。A．Rght(c1, i)B．Left(c1, i)C．Mid(c1, i, 1)D．Mid(c1, i, i)

[单选题]在窗体上画一个名称为Command1命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）c = “ABCD”F．or n= 1 To 4Print （ ）NextE．nd Sub程序运行后，单击命令按钮，要求在窗体上显示如下内容（ ）。DCDBCDABCD则在（ ）处填入的内容为。A．Left（c,n）B．Right（c,n）C．Mid（c,n,1）D．Mid（c,n,n）

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Private Sub Command1_Click（）a$ = "software and hardware"b$ = Right（a$, 8）c$ = Mid（a$, 1, 8）MsgBox a$, , b$, c$, 1E．nd Sub运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是（ ）。A．software and hardwareB．softwareC．hardwareD．1

[单选题]在窗体上画一个命令按钮，名称为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 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是______。A．software and hardwareB．softwareC．hardwareD．1

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim a() a=Array("机床"，"车床"，"钻床"，"轴承")Print a(2) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承

[主观题]在窗体上面一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Commandl_Click()t=0：m=1：Sum=0D．ot=t+(8)Sum=Sum+(9)m=m+2Loop While (10)Print SumE．nd Sub该程序的功能是，单击命令按钮，则计算并输出以下表达式的值：1+(1+3)+(1+3+5)+…+(1+3+5+…+39) 请填空。

[单选题]在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command_Click() Static b As Integer b=b+1 End Sub运行程序，第3次单击命令按钮后，变量b的值为______。A．0B．1C．2D．3

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Private Sub Commandl_Click() Dim a() a=Array(“机床”，“车床”，“钻床”，“轴承”) Print a(2) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承