VBA程序开发与应用答案2023秋

第九章测试

1.Set tbar = Application.CommandBars.Add(Temporary:=True) 上述代码段的功能是：工作簿打开时，通过这段代码建立一个临时自定义工具栏。（ ）
A:对 B:错
答案:A
2.With tbar.Controls.Add(Type:=msoControlButton)
.Caption = "导入课表"
.Style = msoButtonCaption
.OnAction = "dr"
End With上述代码段的功能是：在工具栏放置按钮“导入课表”，指定要执行的子程序为dr。（ ）
A:错 B:对 3.tbar.Visible = True 上述代码段的功能是：令tbar自定义工具栏可见。（ ）
A:错 B:对 4.Weekday(Date, vbMonday) - 1上述代码段的功能是：用Weekday函数求出当前是星期几。第二个参数用vbMonday，则函数的返回值：1表示星期一、2表示星期二、……、7表示星期日。（ ）
A:错 B:对 5.Call sxl(w) 上述代码段的功能是：以w为实参，调用子程序sxl。（ ）
A:对 B:错