请设计如下图所示窗体界面。程序运行时,在选中一个或两个复选框和一个单选按钮时, 单击命令按钮,

则对文本框中的文本内容做相应的设置。
请编写适当的事件过程,
完成上述
功能。

为什么总是让我调试呢?

第1个回答  推荐于2016-05-01
If Option1.Value = True Then Text1.FontName = "宋体"
If Option2.Value = True Then Text1.FontName = "隶书"

If Check1.Value = 1 Then
Text1.Font.Underline = True '下划线
Else
Text1.Font.Underline = False '下划线
End If

If Check2.Value = 1 Then
Text1.Font.Italic = True '斜体
Else
Text1.Font.Italic = False '斜体
End If

If Option2.Value = True And Check2.Value = 1 Then
MsgBox "隶书不能设为斜体"
Check2.Value = 0
End If
If Option2.Value = True And Check1.Value = 1 Then
MsgBox "隶书不能设为下划线"
Check1.Value = 0
End If追问

还是不对啊

追答

什么地方不对

追问

最后一段需要吗

本回答被提问者采纳
相似回答