单选题假定通过复制、粘贴操作建立了一个命令按钮数组Command1,以下说法中错误的是( )。
单选题以下关于变量作用域的叙述中,错误的是( )。
单选题下列不是Visual Basic的工作模式是______。
单选题下列叙述中正确的是
单选题窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Command1_Click( Dim arr_x(5,5)As Integer For i=1 To 3 For i=2 To 4 arr_x(i,j)=i*j Next i Next i Print arr_x(2,1);arr_x(3,2);arr_x(4,3)End Sub 运行程序,并单击命令按钮,窗体上显示的内容为
单选题窗体上有一个命令按钮和一个文本框,程序执行后,在文本框中输入12345,单击命令按钮后的输出结果为______。
PriVate Sub Command1_Click()
Dim A As Integer, B As Integer
Text1.SelStart=2:Text1.SelLength=2
A=Val(Text1.SelText):B=Len(Text1.Text)
Print A*B
End Sub
单选题在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,然后编写如下程序: Dim S1 As String,S2 As String Private Sub Form_Load() Text1.Text="" Text2.Text="" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) S2=S2 & Chr(Keycode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) S1=S1 & Chr(KeyAscii) End Sub Private Sub Command1_Click() Text1.Text=S2 Text2.Text=S1 S1="" S2="" End Sub 程序运行后,在Text1中输入“abc”,然后单击命令按钮,在文本框Text1和Text2中显示的内容分别为______。
单选题下列关于菜单项的描述中,错误的是
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Ctick() Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i=1 To 5 Sum=Sum+a(i) Next i x=Sum /5 For i=1 To 5 If a(i)>x Then Print a(i); Next i End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是( )。
单选题窗体上有一个名称为CD1的通用对话框控件和由4个命令按钮组成的控件数组Command1,其下标从左到右分别为0、1、2、3。窗体外观如图所示。命令按钮的事件过程如下:PrivateSubCommand1_Click(IndexAsInteger)SelectCaseIndexCase0CD1.Action=1Case1CD1.ShowSaveCase2CD1.Action=5Case3EndEndSelectEndSub对上述程序,下列叙述中错误的是______。
单选题在窗体上画一个命令按钮,名称为Commad1,然后编写如下事件过程: Private Sub Command1 Click() a$="software and bardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox a$,,b$,c$,1 End Sub 运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是
单选题以下叙述中错误的是 ______。
A. 下拉式菜单和弹出式菜单都用菜单编辑器建立
B. 在多窗体程序中,每个窗休都可以建立自己的菜单系统
C. 除分隔线外,所有菜单项都能接收Click事件
D. 如果把一个菜单项的Enabled属性设置为False,则该菜单项不可用
单选题下列程序段,在运行时最后输出的内容是( )。
a=2
c=1
AAA:
c=c + a
If c<10 Then
Print c
GoTo AAA
Else
Print "10以内的奇数显示完毕"
End If
单选题编写如下两个事件过程。 Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序,如果按“A”键,则程序输出的结果是
单选题下列程序段的执行结果为_______。 I=0 For G=10 To 19 Step 3 I=I+1 Next G Print I
单选题窗体上有一个Text1文本框,并编写了下面事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) KeyAscii=KeyAscii+3 End Sub 程序运行时,在文本框中输入字符“A”,则在文本框中实际显示的是
单选题设有如下一段程序: Private Sub Command1_Click() Static a As Variant a:Array("one","two","three","four","five") Print a(3) End Sub 针对上述事件过程,以下叙述中正确的是( )。
单选题假定在窗体上添加了一个通用对话框控件,其名称为CD1,并有如下程序段:
CD1.ShowOpen
CD1.DefaultExt="doc"
在打开文件的对话框中选择了”c:/file1.txt"文件,则FileTitle属性的值是______。
单选题以下叙述中错误的是______。
A.在通用过程中,多个形式参数之间可以用逗号作为分隔符
B.在Ptint方法中,多个输出项之间可以用逗号作为分隔符
C.在Dim语句中,所定义的多个变量可以用逗号作为分隔符
D.当一行中有多个语句时,可以用逗号作为分隔符
单选题设有如下变量声明: Dim TestDate AS Date
为变量TestDate正确赋值的表达方式是
A. TestDate=#1/1/2002#
B. TestDate=#"1/1/2002"#
C. TestDate=Date("1/1/2002")
D. TestDate=Format(m/d/yy,"1/1/2002")
