单选题在窗体上有一个名为CD1的通用对话框,为了在运行程序时打开保存文件对话框,则在程序中应使用的语句是______。
单选题有关多文档界面(Multiple Document Interface)的不正确描述是
单选题设变量MyName(字符串型),Age(整型)分别表示一个人的姓名和年龄,要设计一个逻辑表达式,当该人姓张,并且超过60岁,则表达式的值为True,下面正确的是______。
单选题设有数组定义语句:Dim a(5) As Integer,List1为列表框控件。下列给数组元素赋值的语句错误的是( )。 A) a(3)=3 B) a(3)=InputBox("input data") C) a(3)=List1.ListIndex D) a=Array(1,2,3,4,5,6)
单选题以下合法的VB变量名是______。
A.#_1
B.123_a
C.string
D.x_123
单选题窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。PrivateSubCommand1Cliek()DimstrAsString,sAsString,kAsIntegers=Text1:str=""Fork=List1.ListCount-1To0Step-1IfInStr(List1.List(k),s)>0Thenstr=str&List1.List(k)&""EndIfNextkIfstr=""ThenText2="没有匹配项目"ElseText2=strEndIfEndSub程序运行时,在Text1中输入"京",单击命令按钮,则在Text2中显示的内容是()。
单选题在一个窗体上添加一命令按钮控件,名为Command1,事件过程如下,则执行结果是( )。 Option Base 1 Private Sub Command1_Click() Dim a(5) As Integer Dim k As Integer Dim total As Integer a(1)=2 a(2)=5 a(3)=4 a(4)=10 a(5)=6 For k=1 To 5 tota11=tota1+a(k) Next k Print tota1 End Sub
单选题下面关于完全二叉树的叙述中,错误的是 ______。A) 除了最后一层外,每一层上的结点数均达到最大值B) 可能缺少若干个左右叶子结点C) 完全二叉树一般不是满二叉树D) 具有结点的完全二叉树的深度为[log2+1]
单选题运行下列语句后,输出的结果是( )。 Option Base 1 Dim a i=1 a=Array(1,-2,9,0,-1,9) Do k=a(i) For m=10 To k Step-2 n=k+m Next m Print n+m i=i+1 Loop While Abs(m+n)<>27
单选题设有如下用户定义数据类型: Type Student Number As String Name As String Age As Integer End Type 则下列代码中能正确引用该类型成员的是
单选题结构化程序设计的基本原则不包括( )。
单选题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim array1(10,10)As Integer Dim i As Integer,j As Integer For i=1 To 3 For i=2 To 4 array1(i,j)=i+j Next j Next i Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是( )。
单选题在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如
Private Sub Command1_Click()
CommonDialogl. Flags = vbOFNHideReadOnly
CommonDialogl. Filter =" All Files(*.*)|*. * |Text Files(*.txt)|*. txt
CommonDialogl. FilterIndex = 1
CommonDialogl. ShowOpen
MsgBox CommonDialogl. FileName End Sub
程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是
A. All Files(*.*)
B. Text Files(*.txt)
C. Batch Files(*.bat)
D. All Files(*. *)|Text Files(*.txt)
单选题在窗体上建立通用对话框需要添加的控件是
____
。
单选题设工程中有2个窗体:Form1、Form2,Form1为启动窗体。Form2中有菜单,其结构如表。要求在程序运行时,在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后,隐藏Form1,显示Form2。若口令为"Teacher",所有菜单都可见;否则看不到"成绩录入"菜单项。为此,某人在Form1窗体文件中编写如下程序:PrivateSubText11_KeyPress(KeyAsciiAsInteger) IfKeyAscii=13Then IfText1.Text="Teacher"Then Form2.input.Visible=True Else Form2.input.Visible=False EndIf EndIf Form1.Hide Form2.ShowEndSub程序运行时发现刚输入口令时就隐藏了Form1,显示了Form2,程序需要修改。下面修改方案中正确的是( )。
单选题在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后,单击命令按钮,在输入对话框中输入123,则在窗体上输出的内容为( ) A) 123345 B) 468 C) 123 D) 345
单选题设置复选框或单选钮的标题对齐方式的属性是( )。 A) Aligh B) Style C) Alignment D) Sorted
单选题下列可以激活属性窗口的操作是___________。
A.用鼠标双击窗体的任何部位
B.执行“工程”菜单中的“属性窗口”命令
C.按Ctrl+F4键
D.按F4键
单选题窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序:PrivateSubcommand1_Click()DimnIfText1.Text<>"123456"Thenn=n+1Print"口令输入错误"&n&"次"EndIfEndSub希望程序运行时得到下图1所示的效果,即:输入口令,单击“确认口令”命令按钮,若输入的口令不是“123456”,则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是下图2所示的效果,程序需要修改。下面修改方案中正确的是______。图1图2
单选题执行以下程序段后,整型变量C的值为______。 a=24 b=328 Select Case b/10 Case 0 c=a*10+b Case 1 to 9 c=a*100+b Case 10 to 99 c=a*10000+b End Select
