• 搜标题
  • 搜题干
  • 搜选项
0 / 200字
单项选择题

编写如下程序：Private Sub Commandl-Click() Dim x As Integer x=10 Print funl(x，12)+x End Sub Private Function funl(m As Integer，11 As Integer)As Integer If n>10 Then m=n funl=m+n End Function程序运行后，单击命令按钮Commarid1，输出结果为( )。

A．30
B．32
C．34
D．36
题目列表

你可能感兴趣的试题

单项选择题

以下关于VB特点的叙述中，错误的是( )。

A．VB采用事件驱动的编程机制
B．VB程序能够以解释方式运行
C．VB程序能够以编译方式运行
D．VB程序总是从Form_Load事件过程开始执行
单项选择题

如果把程序的启动对象设置为：Sub Main，则Sub Main过程( )。

A．只能写在Forml窗体中代码的最前面
B．可以写在Forml窗体中代码的任何位置
C．只能写在某个标准模块的代码中
D．可以写在任何窗体或标准模块的代码中
单项选择题

设窗体上有3个图像框：Image1、Image2、Image3，并有下面的程序代码： Private Sub Form—Load() lmagel．Picture=LoadPicture(“LEAF．bmp”) Image2．Picture=LoadPicture(“OPEN．bmp”) Image3．Visible=False End Sub Private Sub Imagel—Click() Image2．Picture=Imagel．Picture End Sub Private Sub Image2一Click() Image3．Picture=Image2．Picture Image2．Picture=Image1．Picture Imagel．Picture=Image3．Picture End Sub在程序运行期间单击Image2，则在窗体上看到的结果是( )。

A．在Image3中显示Image2中的图片
B．Image1、Image2中原有图片被交换了
C．Image1、Image2中都是原来Imege1中的图片
D．Image1、Image2中都是原来Imege2中的图片
单项选择题

在VB中，函数过程与子程序过程的区别之一是( )。

A．函数过程必须有参数，而子程序过程可以没有
B．函数过程的参数传递只采用值传递，而子程序过程只采用地址传递
C．在程序中，子程序过程调用的代码可以写在表达式中，而函数过程不能
D．函数过程有返回值，而子程序过程没有
单项选择题

设子程序过程定义的首部为：Public Sub S(X As Integer，Y As Single)则以下正确的调用形式为( )。

A．Call S 5，4．8
B．Call Sub(5，4．8)
C．Sub 5，4．8
D．S 5，4．8
单项选择题

阅读程序： Option Base l Sub P(b()As Integer) For i=l To 4 b(i)=2*i Next iEnd SubPrivate Sub Form-Click() Dim a(4)As Integer For i=1 To 4 a(i)=i+4 Next i P a For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序，单击窗体，输出结果为( )。

A．2 4 6 8
B．5 6 7 8
C．10 12 14 16
D．4 8 12 16
单项选择题

设有以下过程： Private Sub pmc(x As Integer，Optional Y As Integer) Print X，Y End Sub针对此过程，下面正确的过程调用语句是( )。

A．Call proc(a!，23)
B．Call proc x％，12
C．proc b％
D．x=proc(12)
单项选择题

窗体上有一个名称为Commandl的命令按钮，一个名称为Textl的文本框。编写如下程序： Private Sub Commandl—Click() Dim x As Integer X=val(InputBox(“输入数据”)) Textl=Str(X+fun(x)+fun(x)) End Sub Private Function fun(ByRef n As Integer) If n Mod 3=0 Then n=n+n Else n=n * n End If fun=n End Function对于上述程序，以下叙述中错误的是( )。

A．语句fun=n有错，因为n是整型，fun没有定义类型
B．运行程序，输入值为5时，文本框中显示655
C．运行程序，输入值为6时，文本框中显示42
D．ByRef表示参数按址传递
单项选择题

编写如下程序：Private Sub Command1_Click() Dim x As Integer，Y As Integer x=InputBox(“输入第一个数”) Y=InputBox(“输入第二个数”) Call f(x，y) Print x，yEnd S1lbSub f(As Integer,ByVal b As Integer) a=a*2 x=a+b b=b+100 End Sub程序运行后，单击命令按钮Command1，并输入数值10和15，则输出结果为( )。

A．10 115
B．20 1 15
C．35 15
D．20 15
单项选择题

窗体上有一个名称为Command1的命令按钮，并有如下程序代码： Private Sub Commandl_Click() Static a a=1：b=2：c=3 Call f(a，b，c) Print a；b；c End Sub Sub f(ByVal x，ByRef y，z) x=x+1 y=y+1 z = z + 1 End Sub运行程序，单击命令按钮，窗体上显示的是( )。

A．1 3 3
B．1 3 4
C．2 3 3
D．2 3 4
单项选择题

以下关于过程的叙述中，错误的是( )。

A．在Sub过程中不能再定义Sub过程
B．事件过程也是Sub过程
C．过程调用语句的形参个数必须与实参个数相同
D．函数过程一定有返回值
单项选择题

编写如下程序：Private Sub Commandl-Click() Dim x As Integer x=10 Print funl(x，12)+x End Sub Private Function funl(m As Integer，11 As Integer)As Integer If n>10 Then m=n funl=m+n End Function程序运行后，单击命令按钮Commarid1，输出结果为( )。

A．30
B．32
C．34
D．36
单项选择题

编写如下程序： Private Sub Commandl—Click() Dim x As Integer，y As Integer x=10 y=20 Call funl(x，y) Print x；yEnd SubPrivate Function funl(ByVal nl As Integer，11 As Integer)As Integer m=m*m n =n+nEnd Funetion程序运行后，单击命令按钮Command1，输出结果为( )。

A．10 25
B．10 40
C．100 25
D．100 40
单项选择题

以下关于菜单的叙述中错误的是( )。

A．对于同一窗体中的菜单，各菜单项的名称必须唯一
B．对于同一窗体中的菜单，各菜单项的标题必须唯一
C．菜单中各菜单项可以是控件数组元素
D．弹出式菜单的编辑、定义在菜单编辑器中进行
单项选择题

按照下表建立菜单：
单击菜单的事件过程如下：Private Sub mnul_Click(Index As Integer) Seleet Case Index Casel Print“选中菜单项1” Case2 If nmul(2)．Checked=True Then mnul(2)．Checked=False Else mnul(2)．Checked=True Else If Case3 Print“选中菜单项3” End SeleetEnd sub关于上述程序，以下叙述中错误的是( )。

A．各子菜单项组成一个名称为mnul的控件数组
B．不论选中菜单项1、2或3，均执行mnul_Click事件过程
C．Case 2分支的语句没有必要，因为该菜单项的“复选”属性已被设置
D．程序中的Index是系统自动产生的
单项选择题

在用菜单编辑器设计菜单时，必须输入的项是( )。

A．标题
B．快捷键
C．索引
D．名称
单项选择题

以下打开Visual Basic菜单编辑器的操作中，错误的是( )。

A．执行“编辑”菜单中的“菜单编辑器”命令
B．执行“工具”菜单中的“菜单编辑器”命令
C．单击工具栏中的“菜单编辑器”按钮
D．右击窗体，在弹出的快捷菜单中选择“菜单编辑器”命令
单项选择题

以下说法中正确的是( )。

A．任何时候都可以用Ctrl+E键打开菜单编辑器
B．只有当某个窗体为当前活动窗体时，才能打开菜单编辑器
C．只有当代码窗口为当前活动窗口时，才能打开菜单编辑器
D．任何时候都可以用标准工具栏的”菜单编辑器”按钮打开菜单编辑器
单项选择题

如果一个顶级菜单项的访问键为D，则以下等同于单击该菜单项的操作为( )。

A．按Ctrl+D键
B．按Alt+D键
C．按D键
D．按Shift+D键
单项选择题

下列关于菜单项的描述中，错误的是( )。

A．通过内缩符号(…)设置菜单项的层次
B．通过Enabled属性设置菜单项的有效性
C．菜单项的索引号可以不连续
D．菜单项的索引号必须从1开始
单项选择题

为了显示弹出式菜单，要使用( )。

A．窗体的PopupMenu方法
B．窗体的OpenMenu方法
C．菜单的PopupMenu方法
D．菜单的OpenMenu方法
单项选择题

下列关于利用通用对话框产生的文件对话框的相关属性的描述中，错误的是( )。

A．InitDir属性用于设置对话框中显示的起始目录
B．Filter属性用于设置对话框默认的过滤器
C．DefaultExt属性用于设置对话框中默认的文件类型
D．FileTitle属性用于存放对话框中所选择的文件名
单项选择题

通用对话框Filter属性的作用是( )。

A．设置对话框的标题
B．指定对话框所选择的文件名
C．指定对话框的打开方式
D．指定对话框中显示的文件类型
单项选择题

窗体上有一个名称为CDl的通用对话框，一个名称为。rextl的文本框，窗体的单击事件过程如下： Private Sub Form—Click() CDI．DialogTitle=“改变颜色” CDl．Color=Forml．BackColor CDI．Action=3 Text1．BackColor=CDl．Color End Sub 运行程序时，单击窗体，则以下叙述中错误的是( )。

A．通用对话框的标题被改为“改变颜色”
B．通用对话框被打开为颜色对话框
C．若选择颜色对话框中的“取消”按钮，则文本框的背景色改为窗体背景色
D．若选择颜色对话框中的“确定”按钮，则文本框的背景色改为在颜色对话框中选中的颜色
单项选择题

利用通用对话框控件打开字体对话框的操作是( )。

A．把通用对话框控件的Action属性设置为4
B．把通用对话框控件的Action属性设置为5
C．调用通用对话框控件的OpenFont方法
D．调用通用对话框控件的ShowText方法
单项选择题

在窗体上画一个通用对话框，其名称为CommonDialog1，则下列与CommonDialogl．ShowOpen方法等效的语句是( )。( )。

A．CommonDialogl．Action=1
B．CommonDialogl．Action=2
C．CommonDialog1．Action=3
D．CommonDialogl．Action=4
单项选择题

假定在窗体上添加了一个通用对话框控件，其名称为CDI，并有如下程序段： CD1．ShowOpen CD1．DefaultExt=”doc”在打开文件的对话框中选择了“c：＼filel．txt”文件，则FileTitle属性的值是( )。

A．filel．doc
B．filel．txt
C．c：＼filel．txt
D．c：＼filel．doc
微信扫码免费搜题