第十四章
Dim butt1 As CommandBarControl上述语句的功能是:语句声明模块级对象变量butt1。( )。
答案:对
With butt1 .Caption = "统计" '按钮标题 .FaceId = 16 '按钮图符 .Style = msoButtonIconAndCaption '图文型按钮 .OnAction = "tj" '执行的过程 End With上述语句的功能是:在工具栏上添加“统计”按钮,为按钮指定一个图符,并指定要执行的过程为“tj”( )。
答案:对
tbar.Visible = True Worksheets("第1项").Activate 上述语句的功能是:设置工具栏的可见属性,选择“第1项”为当前工作表。( )。
答案:对
Private Sub Workbook_SheetActivate(ByVal Sh As Object) Application.SendKeys "%X{F6}" If Sh.Name = "总分" Then butt1.Enabled = False Else butt1.Enabled = True End IfEnd Sub上述语句的功能是:SheetActivate事件在工作簿的当前工作表改变时产生,在此激活功能区的“加载项”选项卡,对工具栏中按钮的可用性进行控制。如果当前工作表为“总分”,则使工具栏“统计”按钮不可用,否则可用。( )。
答案:对
Application.DisplayAlerts = True 上述语句的功能是:打开删除确认。( )。
答案:对

温馨提示支付 ¥3.00 元后可查看付费内容,请先翻页预览!
点赞(0) dxwkbang
返回
顶部