Settbar=Application.CommandBars.Add(Temporary=True)tbar.Visible=True上述代码段的功能是：建立临时自定义工具栏tbar，并设置其他属性为可见