单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub subl(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer)
z=x*x+y*y
End Sub
Private Sub Command1_Click()
Dim a As Integer
a=8
Call subl(1, 2, a)
Print a
End Sub
程序运行后,单击命令按钮,则窗体下显示的内容是______。
单选题关于自定义对话框概念的说法中,错误的是____。
单选题如果在一新建的工程中使用其他工程已设计好的窗体,可以采用( )步骤将其添加到当前工程中。
单选题下列对于软件测试的描述正确的是( ) A.软件测试的目的是证明程序是否正确 B.软件测试的目的是使程序运行结果正确 C.软件测试的目的是尽可能地多发现程序中的错误 D.软件测试的目的是使程序符合结构化原则
单选题有下面程序代码:
Private Sub Command1_Click()
Dim sign As Integer
sign=1
a=1:b=2
For k=1 To 5
c=a+sign*b
a=b:b=c
Print c;
sign=-sign
Next k
End Sub
程序运行后,单击命令按钮Command1,输出结果是
单选题在利用菜单编辑设计菜单时,为了把组合键“Alt+X”设置为“退出(X)”菜单项的访问键,可以将该菜单项的标题设置为( ) A.退出(X&) B.退出(&X) C.退出(X#)D.退出(#X)
单选题在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click( ) Dim a As Integer,b As String,c As Integer a=1234 : b=Str(a) c=Len(b) Print c End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。 A) 0 B) 5 C) 6 D) 7
单选题在窗体上画两个文本框(其名称分别为Text1和Text2)和一个命令按钮(其名称为Command1),然后编写如下两个事件过程: Private Sub Command1_Click( ) Text1.Text = "Microsoft Visual Basic" End Sub Private Sub Text1_Change( ) Text2.Text = UCase(Text1.Text) End Sub 程序运行后,单击命令按钮,则在Text2文本框中显示的内容是________。
单选题用语句Open”C:\teac.txt”For Input As#打开文件后,就可以编程序
单选题假定有如下的窗体事件过程: Private Sub Form_Click() aS=”Microsoft Integer”:bS=Right(aS,5) c$=Mid(aS,1,9):MsgBox aS,34,b$,c$,5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的是
单选题在窗体上有一个文本框Text1,Text属性值为空,然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii AsInteger) Dim strAs String,n As Integer str=UCase(Chr(KeyAscii)) n=Len(str) Text1.Text=String(n,str) End Sub 程序运行后,如果在文本框中输入字母“p”,则在文本框中显示的内容为( )。
单选题如果要将一个窗体从内存中清除,应使用的语句是( )。
单选题下列语句中正确的是{{U}} {{/U}}。
A.txt1.Text+txt2.Text=txtS.Text
B.Commandl.Name=cmdOK
C.12Label.Caption=1234
D.A=InputBox(Hello)
单选题现有如下一段程序: Private Sub Command1_Click() x=UCase(InputBox(”输入:”)) Select Case x Case”A”Tb”C” Print”考核通过!” Case”D” Print”考核不通过!” Case Else Print”输入数据不合法!” End Select End Sub 执行程序,在输入框中输入字母“B”,则以下叙述中正确的是
单选题在窗体上有一个名称为Command1的命令按钮,并有如下程序: Private Sub Command1_Click() Static X As Integer Static Y As Integer Cls Y=1:Y=Y+5:X=5+X:Print X,Y End Sub 程序执行时,单击命令按钮Command1三次后,窗体上显示的结果为( )。
单选题在窗体上画一个命令按钮Command1,然后编写下列代码: Private Sub Command1_Click() Dim Arr1(10) As Integer,Art2(10) As Integer n=3 For i=1 To 5 Arr1(i)=i Arr2(n)=2*n+i Next i Print Arr2(n);Arr1(n) End Sub 运行程序后,单击命令按钮,输出结果是( )。
单选题要使单击命令按钮与按下<Esc>键实现相同的作用,则应设置
____
属性为True。
单选题在窗体上添加一个R命令按钮,名称为Command1,然后为该命令按钮编写如下事件过程,该过的执行结果为( )。 Option Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1,2,3,4 j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next Print s End Sub A) 4321 B) 1234 C) 34 D) 12
单选题下列选项中,不属于数据管理员(DB
单选题下列正确的Visual Basic注释语句是