Question

这是一道VB程序设计题，望同仁们帮忙解答！谢谢啦！！

Answer 1

Private Sub Command1_Click()
If Check1.Value = 1 Then Text1.FontBold = True Else Text1.FontBold = False '加粗
If Check2.Value = 1 Then Text1.FontItalic = True Else Text1.FontItalic = False '倾斜
If Check3.Value = 1 Then Text1.FontUnderline = True Else Text1.FontUnderline = False '下划线
End Sub

追问

直接编程就可以了？不要简述了么？

追答

添加三个check控件 分别设置其caption属性为 加粗，倾斜，下划线
然后添加一个textbox 和commandbutton

Answer 2

这么简单的东西。。。 你还要帮忙，无语了。。。

追问

表无语撒，很简单你就回答一下呗