单选题工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是：Public x As Integer Private Y As Integer窗体文件的程序代码是：Dim a As IntegerPrivate Sub Form_Load0 DimbAs Integer a：2：b=3：：x=10：y=20End SubPrivate Sub Command1_Click() a=a+5：b=b+5：X=X+5：y=y+5 Print a；b；x；y End Sub 运行程序，单击窗体上的命令按钮，则在窗体上显示的是
单选题在Visual Basic中，表达式3*2＼5 Mod 3的值是( )。
单选题在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：
Private Sub Command1_Click()
CommonDialog1.Flags=vbOFNHideReadOnly
CommonDialog1.Filter="All Files(*.*)|*.*|Text Files(*.txt)|*.txt
CommonDialog1.FilterIndex=1
CommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
End Sub
程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是
单选题要将名为MyForm的窗体显示出来，正确的使用方法是( ) A．MyForm.Show B．Show.MyForm C．MyForm Load D．MyForm Show
单选题窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数组Command1，其下标从左到右分别为0、1、2、3，窗体外观如图所示。命令按钮的事件过程如下：PrivateSubCommand1_Click(IndexAsInteger)SelectCaseIndexCase0CD1.Action=1Case1CD1.ShowSaveCase2CD1.Action=5Case3EndEndSelectEndSub对上述程序，下列叙述中错误的是()A．单击“打开”按钮，显示打开文件的对话框B．单击“保存”按钮，显示保存文件的对话框C．单击“打印”按钮．能够设置打印选项，并执行打印操作D．单击“退出”按钮，结束程序的运行
单选题下列程序的功能是调用字体对话框来设置文本框中的字体，单击Command1按钮弹出对话框，进行相应的字体、字号等的设置，然后单击“确定”按钮退出对话框，则文本框中将发生哪些变化( )。 Private Sub Command1_Click() CommonDialogl．CancelError=True CommonDialogl．Flags=3 OnErrorResumeNext CommonDialogl．ShowFont Text1．Font．Name=CommonDialog1．FontName Text1．Font．Size=CommonDialog1．FontSize Text1．Font．Bold=CommonDialog1．FontBold Text1．Fom．Italic=CommonDialog1．FontItalic Text1．Font Underline=ommonDialog1．FontUnderline Text1．FontStrikethru=ommonDialog1．FontStrikethru Text1．ForeColor=CommonDialog1．Color EndSub
单选题为了使列表框中的项目分为多列显示，需要设置的属性为
单选题数据库的安全性是指保护数据库，以防止不合法的使用而造成的数据泄露、更改或破坏，下列的措施中，______不属于实现安全性的措施。
单选题算法一般都可以用哪几种控制结构组合而成______。
A.选择、分支、递归
B.顺序、循环、选择
C.循环、递归、选择
D.顺序、选择、嵌套
单选题在设计阶段，如果双击窗体上的一个文本框控件，则在代码窗口中显示该控件的事件过；所对应的事件是
单选题以下过程的功能是从数组中寻找最大值：Private Sub FindMax(a()As Integer, ByRef Max As
Integer) Dim s As Integer, f As Integer Dim i As
Integer s=LBound(a) f＝UBound(a) Max=a(s) For i＝s To
f If a(i)＞Max Then Max=a(i) NextEnd
Sub以下关于上述过程的叙述中，错误的是______。
A.语句Call FindMax(a,m)可以调用该过程，其中的a是数组，m是Integer类型变量
B.For循环次数等于a数组的元素数
C.过程末尾应该增加一条返回最大值的语句FindMax=Max
D.参数Max用于存放找到的最大值
单选题窗体不拥有下列 ______ 事件。
单选题下列程序段的执行结果为
____
。
a=75
If a＞60 Then i=1
If a＞70 Then i=2
If a＞80 Tnen i=3
If a＜90 Then i=4
Print "i=";i
单选题有如下语句序列：Dim a，b As Integer Print aPrint b执行以上语句序列，下列叙述中错误的是( )。
单选题下述语句的运行结果是______。
Dim a
i=0
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
单选题关系运算中的选择运算是( )。 A) 从关系中找出满足给定条件的元组的操作 B) 从关系中选择若干个属性组成新的关系的操作 C) 从关系中选择满足给定条件的属性的操作 D) A)和B)都对
单选题要设定文本框内的文字内容是否允许修改，应该设置的属性是( )。
单选题在窗体上添加一命令按钮，名称为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
单选题Visual Basic程序中分隔各语句的字符是______。 A) ' B) : C) / D) _
单选题为达到把a、b中的值交换后输出的目的，某人编程如下： Private Sub Command1_Click() a％＝10：b％＝20 Call swap(a，b) Print a,b End Sub Private Sub swap(ByVal a As Integer,ByVal b As hteger) c＝a：a＝b：b＝c End Sub 在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是( )。