下列数据类型中，不属于VBA的是（    ）。

试卷相关题目

• 1下列叙述中，错误的是（    ）。

  A.宏能够一次完成多个操作

  B.可以将多个宏组成一个宏组

  C.可以用编程的方法来实现宏

  D.宏命令一般由动作名和操作参数组成

  开始考试点击查看答案
• 2窗体Caption属性的作用是（    ）。

  A.确定窗体的标题

  B.确定窗体的名称

  C.确定窗体的边界类型

  D.确定窗体的字体

  开始考试点击查看答案
• 3用于获得字符串S最左边4个字符的函数是（    ）。

  A.Left(S,4)

  B.Left(S,1,4)

  C.Leftstr(S,4)

  D.Leftstr(S,0,4)

  开始考试点击查看答案
• 4窗体中有3个命令按钮，分别命名为Commandl、Command2和Command3。当单击Commandl按钮时，Command2按钮变为可用，Command3按钮变为不可见。下列Commandl的单击事件过程中，正确的是（    ）。

  A.Private Sub Commandl_C1ick()Command2.Visible=TrueCommand3.Visible=FalSeEnd Sub

  B.Private Sub Commandl_Click()Command2.Enabled=TrueCommand3.Enabled=FalseEnd Sub

  C.Private Sub Commandl_Click()Command2.Enabled=TrueCommand3.Visible=FalseEnd Sub

  D.Private Sub Commandl_Click()Command2.Visible=TrueCommand3.Enabled=FalseEnd Sub

  开始考试点击查看答案
• 5执行语句：MsgBox "AAAA"，vbOKCancel+vbQuestion，"BBBB"之后，弹出的信息框（    ）。

  A.标题为“BBBB”、框内提示符为“惊叹号”、提示内容为“AAAA”

  B.标题为“AAAA”、框内提示符为“惊叹号”、提示内容为“BBBB”

  C.标题为“BBBB”、框内提示符为“问号”、提示内容为“AAAA”

  D.标题为“AAAA”、框内提示符为“问号”、提示内容为“BBBB”

  开始考试点击查看答案
• 6下列数组声明语句中，正确的是（    ）。

  A.Dim A[3,4] As Integer

  B.Dim A(3,4) As Integer

  C.Dim A[3;4] As Integer

  D.Dim A(3;4) As Integer

  开始考试点击查看答案
• 7在窗体中有一个文本框Textl，编写事件代码如下：Private Sub Form_Click()X=val(Inputbox("输入x的值"))Y=1If X<>0 Then Y=2Textl.Value=YEnd Sub打开窗体运行后，在输入框中输入整数12，文本框Textl中输出的结果是（    ）。

  A.1

  B.2

  C.3

  D.4

  开始考试点击查看答案
• 8在窗体中有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：Private Sub Commandl_Click()For I=1 To 4x=3For j=1 To 3For k=1 To 2x=x+3Next kNext jNext ITextl.value=Str(x)End Sub打开窗体运行后，单击命令按钮，文本框Textl输出的结果是（    ）

  A.6

  B.12

  C.18

  D.21

  开始考试点击查看答案
• 9在窗体中有一个命令按钮Commandl，编写事件代码如下：Private Sub Commandl_Click()Dim s As IntegerS=P(1)+P(2)+P(3)+P(4)debug.Print SEnd SubPublic Function P(N AS Integer)Dim Sum As IntegerSum=0For i=1 To NSum=Sum+iNext iP=SumEnd Function打开窗体运行后，单击命令按钮，输出结果是（    ）。

  A.15

  B.20

  C.25

  D.35

  开始考试点击查看答案
• 10下列过程的功能是：通过对象变量返回当前窗体的Recordset属性记录集引用，消息框中输出记录集的记录（即窗体记录源）个数。Sub GetRecNum()Dim rs As ObjectSet rs=Me.RecordsetMsgBox ___________End Sub程序空白处应填写的是（    ）。

  A.Count

  B.rs.Count

  C.RecordCount

  D.rs.RecordCount

  开始考试点击查看答案