VBA程序开发与应用答案2023

第十三章测试

1.tbar.Visible = True上述语句的功能是：使自定义工具栏tbar处于显示可见状态。（ ）。
A:对 B:错
答案:A
2.With tbar.Controls.Add(Type:=msoControlButton)
.Caption = "数据统计"
.Style = msoButtonCaption
.OnAction = "tj"
End With上述语句的功能是：在自定义工具栏tbar上添加按钮，设置按钮的标题当前年龄、类型，指定要执行的过程（tj）。（ ）。
A:对 B:错 3.ny = Trim(Cells(k, 3))
上述语句中Trim函数的功能是：Trim 函数可删除文本字符串中的所有空格，单词之间的单个空格除外。（ ）。
A:对 B:错 4.Year(Date)
上述语句中Year函数的功能是：Year 函数可用于返回日期/时间值的年部分，从 1900 开始。（ ）。
A:对 B:错 5.Set tbar = Application.CommandBars.Add(Temporary:=True)
With tbar.Controls.Add(Type:=msoControlButton)
.Caption = "当前年龄"
.Style = msoButtonCaption
.OnAction = "age"
End With
上述语句的功能是：在自定义工具栏tbar上添加按钮，设置按钮的为不可用状态。（ ）。
A:对 B:错 6.在Excel“开发工具”选项卡“控件”组的“插入”下拉列表中，单击“其他控件”按钮，可以添加所需要控件。（ ）。
A:错 B:对