单选题：在窗体上画一个名称为Textl的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：Priva

  • 题目分类：VB
  • 题目类型：单选题
  • 查看权限：VIP
题目内容：
在窗体上画一个名称为Textl的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：
Private Sub Command1_Click()
n=Val(Textl．Text)
If n\2=n／2Then
f=f1(n)
Else
f=f2(n)
EndIf
Printf：n
End Sub
Public Function f1(ByRef x)
X=X$X
f1=x+x
End Function
Public Function f2(ByVal X)
X=X*X
f2=x+x+x
End Function
程序运行后，在文本框中输入6，然后单击命令按钮，窗体上显示的是（　　） A．72 36
B．108 36
C．72 6
D．108 6
参考答案：
答案解析：

在窗体上画两个组合框，其名称分别为Comb01、Comb02，然后画两个标签，名称分别为Label1、Label2，如图

在窗体上画两个组合框，其名称分别为Comb01、Comb02，然后画两个标签，名称分别为Label1、Label2，如图所示。程序运行后，如果在某个组合框中选择

分类：VB  题型：单选题
查看答案

窗体上命令按钮Command1的事件过程如下：Private Sub Command1_Click()Dim total

窗体上命令按钮Command1的事件过程如下：Private Sub Command1_Click()Dim total As Integertotal=s(1

分类：VB  题型：单选题
查看答案

用以下语句所定义的数组元素的个数是Dim a(-1 to 5)as Integer（　　）

用以下语句所定义的数组元素的个数是Dim a(-1 to 5)as Integer（　　）A．5 B．6 C．7 D．8

分类：VB  题型：单选题
查看答案

设有如下程序：Option Base 0Private Sub Form_Click0Dim aDimiAsIntege

设有如下程序：Option Base 0Private Sub Form_Click0Dim aDimiAsIntegera=Array(1，2，3，4，5，6

分类：VB  题型：单选题
查看答案

在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：Option Base 0Private Sub Co

在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：Option Base 0Private Sub Command 1_Click()Dim A

分类：VB  题型：单选题
查看答案