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

2020-06-22 社会 144阅读
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
声明:你问我答网所有作品(图文、音视频)均由用户自行上传分享,仅供网友学习交流。若您的权利被侵害,请联系fangmu6661024@163.com