发布网友 发布时间:2022-03-27 09:47
共2个回答
热心网友 时间:2022-03-27 11:16
代码:
PrivateSubCommand1_Click()
IfMe.Command1.Caption="加上下划内线"Then
Text1.FontUnderline=True
Me.Command1.Caption="去掉容下划线"
Else
Text1.FontUnderline=False
Me.Command1.Caption="加上下划线"
EndIf
EndSub
PrivateSubForm_Load()
Me.Command1.Caption="加上下划线"
EndSub
扩展资料:
CommandButton命令按钮最常用的事件是鼠标点击(Click)事件,当点击按钮时,犹如发出了一道命令,而这也正是“命令按钮”这个说法的由来。
在VisualBasic操作界面中,CommandButton(命令按钮)控件在程序中主要作为按钮进行使用。默认的名称为CommandX(X为1、2、3,等等),命名规则为CmdX(X为用户自定义的名字,如CmdCopy、CmdPaste,等等)。
当一个按钮的Cancel属性设置为True时,按ESC键与单击此命令按钮的作用相同,因此,这个命令按钮被称为取消按钮。在一个窗体中,只允许一个命令按钮的Cancel属性为True。
热心网友 时间:2022-03-27 12:34
&符号