Assignment Help logo
在线聊天

Loading...

Score %0 (0 correct0 incorrect62 unanswered)

Q1. 此函数和子程序打印出哪两组值？

Function GetVitals(ID As Long, Age As Long, Optional Weight As Long) As String
    GetVitals = "ID=" & ID & "Age=" & Age & "Weight=" & Weight
End Function
Sub ShowVitals()
    Dim ID As Long, Age As Long, Weight As Long
    Debug.Print GetVitals(ID:=5, Age:=20)
    Debug.Print GetVitals(ID:=6, Age:=25, Weight:=130)
End Sub
  • : 
ID=5 Age = 20 Weight=
ID=6 Age = 25 Weight=130
  • : 
ID=5 Age = 20 Weight=0
ID=6 Age = 25 Weight=130
  • : 
ID=5 Age = 20 Weight=Null
ID=6 Age = 25 Weight=130
  • : 
ID=5 Age = 20
ID=6 Age = 25 Weight=130

Q2. 此代码显示了CalledSub的第一条语句。哪个调用语句将正常工作？

Sub CalledSub(Surname, Age)

  • 调用 Calledsub "smith",26
  • calledsub (surname="smith", Age = 26)
  • calledsub (Surname:="Smith", Age:=26)
  • calledsub "smith", 26

Q3. 类和对象之间的主要区别是什么？

  • 没有实质性区别。这些术语可互换使用。
  • 类声明对象的属性。对象通过定义事件和方法来完成声明。
  • 对象是类的模板。
  • 类描述了对象的设计。对象是该设计的一个实例。

Q4. MsgBox语句显示什么值？

Sub MySub(VarA As Long, ParamArray VarB() As Variant)
MsgBox VarB(0)
End Sub
Sub ShowValue()
Call MySub(10, "First arg", 2, 3.1416)
End Sub
  • 2
  • 10
  • First arg
  • 3.1416

Q5. 将用户窗体模块放入VBA项目需要什么对象？

  • 相关的标准代码模块
  • UserForm
  • 相关的类模块
  • userForm类

Q6. 输出是什么？

Sub UseSum()
Dim TestArray() As Integer, Total As Integer
ReDim TestArray(1)
TestArray(1) = 6
ReDim TestArray(2)
TestArray(2) = 3
Total = WorksheetFunction.Sum(TestArray)
End Sub
  • 3
  • 0
  • 9
  • 6

Q7. 驱动程序子程序由Sub Driver（Y）声明。哪个语句会导致编译错误？

  • Driver x
  • call Driver(x)
  • call Driver x
  • Driver (X)

Q8. 你有几个变量要在用户窗体上显示，但一次显示的变量太多了。哪个控件最能让用户看到所有的变量？

  • 框架
  • 多页
  • TabStrip
  • 列表框

Q9. 下面是一个名为SquareIt的函数。哪个版本的名为Area的子例程会导致编译错误？

Function SquareIt(ByRef Basis As Integer) As Long
SquareIt = Basis ^ 2
End Function
  • sub Area() 
Dim Result As Long, Side As Integer
Side = 5
Result = Squarelt(Side)
End Sub
  • Sub Area() 
Dim Result As Long, Side
Side = 5
Result = SquareIt(Cint(Side))
End Sub

Q10. EmailAddress()是一个数组。它由Dim EmailAddress(10) As String声明，并且选项Base 1已生效。EmailAddress()有多少行和列？

  • 10行和10列
  • 10行和1列
  • 10行和0列
  • 1行和10列

Q11. 如果运行此代码，将选择哪个单元格？

Range("E3:312").Range("B3").Select

  • F5
  • F3
  • B3
  • E3

Q12. 哪个变量名在VBA中有效？

  • _MyVar
  • My_Var
  • My-Var
  • 1MyVar

参考链接

在命名Visual Basic模块中的过程、常量、变量和参数时，请使用以下规则：必须使用字母作为第一个字符。不能使用空格、句点（.）、感叹号（!）或字符 @、&、$、＃在名称中。名称的长度不能超过255个字符。

Q13. 以下哪个是用户定义数据类型的有效定义？

  • : 
Type CBC
Name As String
Next As String
End Type
  • : 
Type CBC
Name As String
_Next As String
End Type
  • : 
Type CBC
Name As String
@Option As String
End Type
  • : 
Type CBC
Name As String
%For As String
End Type

Q14. 复制一个用户窗体从一个项目到另一个项目的一个方法是什么？

  • :
  1. 保存并关闭具有现有用户窗体的项目。
  2. 单击“插入” > “文件”。
  3. 浏览到现有项目的位置。
  4. 右键单击它，然后选择要复制的用户窗体。
  • :
  1. 在Desing模式中打开现有用户窗体。
  2. 右键

单击窗体，然后选择“复制”。 3. 切换到另一个项目。 4. 右键单击模块，然后选择“粘贴”。

  • :
  1. 在项目资源管理器中，右键单击用户窗体，然后选择“复制”。
  2. 切换到新项目。
  3. 右键单击“用户窗体”，然后选择“粘贴”。
  • :
  1. 在Design模式中打开现有用户窗体。
  2. 单击“文件” > “导出文件”。
  3. 切换到另一个项目。
  4. 单击“文件” > “导入文件”。

Q15. Word中的宏录制器可能是用户操作的不完整记录。为什么？

  • Word的宏录制器不记录由键盘快捷键发起的操作。
  • Word的宏录制器不支持查找和替换编辑。
  • Word的宏录制器不记录通过单击Ribbon的Developer选项卡上的按钮发起的操作。
  • Word的宏录制器不记录通过鼠标指针指向文本进行选择的操作。

Q16. 子例程的错误处理程序之前应该有哪个语句？

  • End
  • Return
  • Exit Sub
  • Stop

Q17. MyArray可以容纳多少个值？

Option Base 0
Sub BuildArray()
Dim MyArray(5) As Integer
  • 0
  • 32,769
  • 5
  • 6

Q18. 哪个语句是正确的？

  • Set在类中设置一个值；Let从类中返回一个值。
  • Let在类中设置一个值；Set从类中返回一个值。
  • Let在类中设置一个值；Get从类中返回一个值。
  • Get在类中设置一个值；Set从类中返回一个值。

Q19. 声明具有作用域，有三个级别。它们是什么？

  • 模块、项目和自动化
  • 过程、私有模块和公共模块
  • 子例程、模块和项目
  • 过程、项目和全局

Q20. 在Excel中，为了使任何Visual Basic代码运行，必须选择哪两个引用？

  • MS Excel对象库和MS Office对象库
  • VBA和MS Office对象库
  • VBA和Excel对象库
  • MS Excel对象库和OLE自动化

Q21. 哪个动作会导致项目重置其变量？

  • 在调试模式下编辑当前例程的参数列表。
  • 单击运行时错误对话框中的“结束”。
  • 向工作表添加一个ActiveX控件。
  • 所有这些答案

Q22. 哪个键盘快捷键会导致VBE查找过程的声明？

  • Shift+F3
  • Alt+F（Windows）或Option+F（Mac）
  • Shift+F2
  • Ctrl+F（Windows）或Command+F（Mac）

Q23. 当您定义一个新的对象类时，在哪里为其分配名称？

  • 在类模块的名称中
  • 在类模块的代码中
  • 在标准模块的代码中
  • 在标准模块的属性中

Q24. 类模块如何指示它使用特定的接口？

  • 接口本身是类模块的一部分。
  • 通过Interface关键字和接口的名称
  • 通过Implements关键字和接口的名称
  • 通过将接口的名称作为参数传递。

Q25. 为了使Module1的内容可用于VBA项目中的其他模块，但不对任何其他VBA项目可见，需要什么？

  • 在Module1顶部设置Option Global
  • 将模块级别变量声明为私有
  • 在Module1顶部设置模块级别作用域
  • 在Module1顶部设置Option Private Module

Q26. 使用名为MyArray的数组时，设置循环控制变量的开始和结束值的首选方式是什么？

  • For i = 0 To UBound(MyArray,1)
  • For i = 1 To UBound(MyArray,1)
  • For i = LBound(MyArray,1) To UBound(MyArray,1)
  • 这取决于是否使用了选项Base 0或选项Base 1。

Q27. Test3的值是多少？

Enum TestEnum
    Test1
    Test2
    Test3
End Enum
  • 0
  • 1
  • 3
  • 2

Q28. 哪个语句声明了一个数组？

  • Dim MyArray() As Integer
  • Dim MyArray() As Array
  • Dim MyArray As Integer
  • Dim MyArray As Array

参考

Q29. 为了使用VBA代码维护不同的VBA项目，可以利用VBA的可扩展性。需要什么来启用可扩展性？

  • 将宏安全性设置为信任访问VBA项目对象模型
  • 项目的工作簿应在Ribbon的审阅选项卡中受保护
  • 包括对Microsoft VBA Extensibility 5.3的引用
  • 包括对Microsoft VBA Extensibility 5.3的引用，并将宏安全性设置为信任访问VBA项目对象模型

Q30. 如何向VBA项目添加用户

窗体？

  • :
  1. 在Visual Basic Editor的项目窗口中选择项目
  2. 单击设计模式按钮，然后选择插入模式
  • :
  1. 在Visual Basic Editor的项目窗口中选择项目
  2. 单击工具箱按钮，然后选择用户窗体
  • :
  1. 在Visual Basic Editor的项目窗口中选择项目
  2. 右键单击运行菜单，然后选择自定义
  • :
  1. 在Visual Basic Editor的项目窗口中选择项目
  2. 单击“插入” > “用户窗体”

Q31. 需要显式变量声明。MyVar在模块级别和过程级别都声明了。在运行第一个AAA()然后是BBB()之后，MyVar的值是多少？

Dim MyVar As String
Sub AAA()
Dim MyVar As String
MyVar = "Procedure AAA Scope"
End Sub
Sub BBB()
MyVar = "Procedure BBB Scope"
End Sub
  • MyVar等于“Procedure AAA Scope”
  • ISNULL(MyVar)为TRUE
  • MyVar等于“Procedure BBB Scope”
  • MyVar为空

Here are the questions converted:

Q32. 哪个代码块从类模块返回编译错误？

  • : 
Public Property Get HDL() As Double
HDL = pHDL
End Property
Public Property Let HDL(Value As Double)
pHDL = Value
End Property
  • : 
Property Get HDL() As Double
HDL = Value
End Property
Property Let HDL(Value As Double)
pHDL = Value
End Property
  • : 
Public Property Get HDL() As Double
HDL = Value
End Property
Public Property Let HDL(Value As Double)
pHDL = Value
End Property
  • : 
Public Property Get HDL() As Single
HDL = pHDL
End Property
Public Property Let HDL(Value As Double)
pHDL = Value
End Property

Q33. 如果VBA代码将FileCount声明为常量而不是变量，则代码往往运行得更快。为什么？

  • 常量的范围仅限于声明它们的过程。
  • 常量在编译时声明，而变量在运行时声明。
  • 一旦在项目中声明了常量的值，就无法更改常量的值。当FileCount是常量时，没有必要查找FileCount的当前值。
  • Const声明指定了给定常量值的最有效类型。

Q34. VBA项目必须声明四个类。需要多少个类模块？

  • 两个（一个用于属性，一个用于方法）
  • 一个（每个类都在同一个模块中声明）
  • 四个（每个类一个）
  • 根据对象返回的变量类型需要多少个类模块

Q35. 此代码显示什么？

Sub MakeErrors()
Dim Y As Variant, Z As Variant
On Error Resume Next
Y = 1 / 0
MsgBox "Y = " & Y
On Error GoTo 0
Z - (0 - 3) ^ 0.5
MsgBox "Z = " & Z
End Sub
  • 一个错误消息
  • Y 和 Z
  • Z = 在消息框中，然后是随后的错误消息
  • Y = 在消息框中，然后是随后的错误消息

Q36. 以下四个选项中的哪个代码块在单击UserForm1的CommandButton1按钮时运行？

  • : 
Private Sub CommandButton1_Click()
If FoundErrors(Me) Then _
Me.Show
End Sub
  • : 
Private Sub CommandButton1_Click()
If Not FoundErrors(UserForm1) Then _
Unload UserForm1
End Sub
  • : 
Private Sub CommandButton1_Click()
Me.Hide
Do While FoundErrors(Me)
Me.Show
Loop
End Sub
  • : 
Private Sub CommandButton1_Click()
Do While FoundErrors(UserForm1)
UserForm1.show
Loop
End Sub

第一个要求是使UserForm1加载但不可见，因此我们需要Me.Hide，这里的Me指的是UserForm1。

Q37. 哪个是正确结构化With块的方式？

  • : 
With Selection
&TypeText Text:="8/24/2019"
&TypeParagraph
&TypeText Text:="1161 Alamosa Drive"
End With
  • : 
With Selection
.TypeText Text:="8/24/2019"
.TypeParagraph
.TypeText Text:="1161 Alamosa Drive"
End With
  • : 
With Selection
TypeText Text:="8/24/2019"
TypeParagraph
TypeText Text:="1161 Alamosa Drive"
End With
  • : 
With Selection:
&TypeText Text:="8/24/2019"
&TypeParagraph
&TypeText Text:="1161 Alamosa Drive"
End With

参考

Q38. 为什么这段代码会生成“Subscript out of range”错误？

Sub Example()
    Dim MyArr() As Variant
    ReDim MyArr(3, 4)
    'some code
    ReDim Preserve MyArr(4, 4)
End Sub
  • 数组无法多次调整大小。
  • MyArr最初是用三个“行”声明的。
  • 当指定ReDim Preserve时，只能调整数组的最后一个维度。
  • 正确的语法是ReDim Preserve MyArr(0 To 4, 0 To 4)。

Q39. 哪个子例程声明不会导致编译错误？

  • Sub Called(Salary As Long, ParamArray Vals() As Variant)
  • Sub Called(ParamArray Vals() As Variant, Salary As Long)
  • Sub Called(Optional Salary As Long, ParamArray Vals() As Variant)
  • Sub Called(Salary As Long, ParamArray Vals() As String)

Q40. 当UserForm1显示在屏幕上时，用户如何在工作表或文档上输入数据或切换窗口？

  • 使用此语句显示表单：UserForm1.Show vbModal
  • 将用户表单的SpecialEffect属性设置为frmShowModal
  • 在代码中包含此语句：UserForm1.Hwnd = False
  • 将用户表单的ShowModal属性设置为False

Q41. SubA将MyVar传递给SubB。如何确保当控件返回到SubA时，MyVar具有其原始值？

  • 将SubB声明为Sub SubB(ByRef MyVar)
  • 将SubB声明为Sub SubB(MyVar)
  • 将SubB声明为Sub SubB(Static MyVar)
  • 将SubB声明为Sub SubB(ByVal MyVar)

Q42. 哪个过程声明在语法上是正确的？

  • : 
Sub MySub(VarA As String, Optional VarB _


As Variant, Optional VarC As Long)
  • : 
Sub MySub(VarA As String, Optional VarB _
As Variant, VarC As Long)
  • : 
Sub MySub(Optional VarA As String, Optional VarB _
As Variant, VarC as Long)
  • : 
Sub MySub(OPtional VarA As String, VarB _
As Variant, Optional VarC as Long)

Q43. VBA中的两种主要类型的过程是什么？

  • 函数和事件
  • 函数和作用域
  • 子过程和事件
  • 子过程和函数

Q44. 哪个代码块可以编译而不会出错？

  • Sub Decs() Dim MyFixed As String * 0 MyFixed = "A" MsgBox MyFixed End Sub
  • Sub Decs() Dim MyInt% * 1 MyInt = 7 MsgBox MyInt End Sub
  • Sub Decs() Dim MyInt% As Integer * 1 MyInt = 5 MsgBox MyInt End Sub
  • Sub Decs() Dim MyInt, MyNum As Integer MyInt = "A" MsgBox MyInt End Sub

Q45. 在Immediate窗口中，如何显示变量CountValues的当前值？

  • = CountValues= CountValues
  • | CountValues| CountValues
  • : CountValues: CountValues
  • ? CountValues? CountValues

Q46. 在哪个级别可以以以下方式声明变量：Private TopSecret As String？

  • 函数
  • 模块
  • 子过程
  • 过程

Q47. 当UserForm1显示在屏幕上时，用户如何在工作表或文档上输入数据或切换窗口？

  • 使用此语句显示表单：UserForm1.Show vbModal
  • 将用户表单的SpecialEffect属性设置为frmShowModal
  • 在代码中包含此语句：UserForm1.Hwnd = False
  • 将用户表单的ShowModal属性设置为False

Q48. SubA将MyVar传递给SubB。如何确保当控件返回到SubA时，MyVar具有其原始值？

  • 将SubB声明为Sub SubB(Static MyVar)
  • 将SubB声明为Sub SubB(ByVal MyVar)
  • 将SubB声明为Sub SubB(MyVar)
  • 将SubB声明为Sub SubB(ByRef MyVar)

Q49. 数组不能多次调整大小。

Sub Example() Dim MyArr() As Variant ReDim MyArr(3, 4) 'some code ReDim Preserve MyArr(4, 4)
End Sub Sub Example() Dim MyArr() As Variant ReDim MyArr(3, 4) 'some code ReDim Preserve MyArr(4, 4) End Sub
  • 正确的语法是ReDim Preserve MyArr(0 To 4, 0 To 4)。
  • 当指定ReDim Preserve时，只能调整数组的最后一个维度。
  • MyArr最初是用三个“行”声明的。
  • 将SubB声明为Sub SubB(ByRef MyVar)。

Q50. 哪个代码块以变量i等于5和变量X等于10结束？

  • : 
Do
X = X + 1
i = i + 1
Loop Until i < 5
End Sub
  • : 
Sub Loopi()
Dim X As Integer, i As Integer
For i = 1 To 5
X = X + 1
Next I
End Sub
  • : 
Sub Loopi()
Dim X As Integer, i As Integer
Do Until i < 5
X = X + 1
i = i + 1
Loop
End Sub
  • : 
Sub Loopi()
Dim X As Integer, i As Integer
Do
X = X + 1
i = i + 1
Loop While i < 5
End Sub

Q51. 类模块如何指示其使用特定接口？

  • 使用_Implements_关键字和接口名称。
  • 使用_Interface_关键字和接口名称。
  • 接口的名称作为参数传递。
  • 接口本身是类模块的一部分。

Q52. VBE的哪一部分可以帮助您探索VBA语法？

  • 本地窗口
  • 对象浏览器
  • 项目资源管理器
  • 可选对话框

Q53. 正在构建一个工作表的事件过程，并编辑事件过程的Sub语句中的参数列表。事件过程运行时会发生什么情况？

  • 结果与标准过程的结果相同。
  • 结果是不可预测的。
  • 过程无法编译。
  • 过程会引发运行时错误。

Q54. 根据此代码，哪个过程正确调用了子过程SumCosts？

Sub Sumosts(AcctName As String, Amount As Long)
    Range("A1") = AcctName
End Sub
  • call SumCosts "Totalcosts", 3
  • SumCosts "Totalcosts", 3
  • SumCosts("Totalcosts", 3)
  • Call SumCosts

来源

Q55. 您想要声明一个描述汽车的对象，以便您的VBA代码可以应用以下测试。您使用哪个关键字声明Cars？

If Cars(1).Make="Ford" And Cars (1).MPG > 20
    Then Cars(1).Selected = True
  • 数据框架
  • 类型
  • 对象
  • 变量

Q

  1. 此语句中的.Range("A1:E5").Select部分的目的是什么？
ActiveCell.Offset(3,4).Range("A1:E5").Select
  • 如果在找到偏移量后，指定了要选择的范围
  • 它指定了要将偏移量的内容写入的单元格范围
  • 它提供了Resize信息 - 在这种情况下，偏移返回五行五列的引用
  • 它指定了偏移量的基础的单元格范围

Q57. 在Excel中，以下两个语句的效果是什么？

Range("b3:f5, c4:d9").Select
    	Range("b3:f5", "c4:d9").Select
  • 如果在找到偏移量后，指定了要选择的范围
  • 它指定了要将偏移量的内容写入的单元格范围
  • 它提供了Resize信息 - 在这种情况下，偏移返回五行五列的引用
  • 它指定了偏移量的基础的单元格范围

Q58. VBA在编程的上下文中代表什么？

  • 非常基础应用
  • 可视基本应用程序
  • 易变的业务自动化
  • 可视化的二进制算法

Q59. 您想声明一个描述汽车的对象，以便您的VBA代码可以应用以下测试。您使用什么关键字声明Cars？

If Cars(1).Make="Ford" And Cars (1).MPG > 20
    Then Cars(1).Selected = True
  • DataFrame
  • Type
  • Object
  • Variant

Q60. 这个语句中的.Range("A1:E5").Select部分的目的是什么？

ActiveCell.Offset(3,4).Range("A1:E5").Select
  • 如果在找到偏移后指定了要选择的范围
  • 它指定了要将偏移内容写入的单元格范围
  • 它提供了Resize信息 - 在这种情况下，偏移返回五行五列的引用
  • 它指定了偏移的基础单元格范围

Q61. 在Excel中，以下两个语句的效果是什么？

Range("b3:f5, c4:d9").Select
Range("b3:f5", "c4:d9").Select
  • 如果在找到偏移后指定了要选择的范围
  • 它指定了要将偏移内容写入的单元格范围
  • 它提供了Resize信息 - 在这种情况下，偏移返回五行五列的引用
  • 它指定了偏移的基础单元格范围

Q62. 在编程的上下文中，VBA代表什么？

  • 非常基础应用
  • Visual Basic Application
  • Volatile Business Automation
  • Visualized Binary Algorithm
© 2009-2024 Assignmenthelp.net