VB 利用框架、单选按钮和复选框控件在文本框中显示不同的字体格式。程序运行界面如下图。 10
现在在文本框中输入字之后、单击单选框会在文本框内立即出现效果。但是我想要用确定按钮来显示效果。求赐教(>﹏<)~~拜托拜托~~~...
现在在文本框中输入字之后、单击单选框会在文本框内立即出现效果。
但是我想要用确定按钮来显示效果。
求赐教(>﹏<)~~ 拜托拜托~~~ 展开
但是我想要用确定按钮来显示效果。
求赐教(>﹏<)~~ 拜托拜托~~~ 展开
1个回答
展开全部
各有所好。有人要立即见到效果,有人却还要等等等一下。
如果你那程序各种选择都要在按下确定按钮后才有效果,则所有的选单按钮与复选择按钮都不要与文本框关联,另外编过程吧。
If Option1.Value = True Then '表示选中它
Option1.Value = False '表示没有选中它
Text1.FontName = Option1.Caption '文本框的字体名称
End If
If OptionName(0).Value = True Then '如果是控件数组的话
Text1.FontName = OptionName(0).Caption '文本框的字体名称
End If
If Check1.Value = Checked Then '表示打上了勾
Check1.Value = Unchecked '表示无打上了勾
Text1.FontUnderline = False
End If
等等
如果你那程序各种选择都要在按下确定按钮后才有效果,则所有的选单按钮与复选择按钮都不要与文本框关联,另外编过程吧。
If Option1.Value = True Then '表示选中它
Option1.Value = False '表示没有选中它
Text1.FontName = Option1.Caption '文本框的字体名称
End If
If OptionName(0).Value = True Then '如果是控件数组的话
Text1.FontName = OptionName(0).Caption '文本框的字体名称
End If
If Check1.Value = Checked Then '表示打上了勾
Check1.Value = Unchecked '表示无打上了勾
Text1.FontUnderline = False
End If
等等
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询