如何用VB编辑一个文本编辑器?

Question

1.使用VB的控件编写一个文本编辑器。
1.能打开 保存 新建及查找 替换字符 ，能改变字体的大小 字体 颜色等功能。
3.界面友好。

Answer 1

Private Sub Bold_Click()
Text1.FontBold = True
End Sub

Private Sub Clean_Click()
Text1.Text = ""
End Sub

Private Sub Display_Click()
Text1.Text = inpext
End Sub

Private Sub Exit_Click()
End
End Sub

Private Sub Font20_Click()
Text1.FontSize = 20
End Sub
Private Sub Input_Click()
inpt = InputBox("请输入一段文字", "输入对话框")
inptext = inptext & inpt
End Sub

Private Sub Italic_Click()
Text1.FontItalic = True
End Sub

Private Sub Normal_Click()
Text1.FontBold = False
Text1.FontItalic = False
Text1.FontUnderline = False
Text1.FontSize = 10
End Sub

Private Sub Under_Click()
Text1.FontUnderline = True
End Sub