1、必做题：在每道题正确无误后保存为结果文件（*.exe），以自己的姓名加学号后两位进行命名，然后提交作业）
请单击窗体时，在窗体上打印

请打开课本完成指定的程序设计题：例11-1（P191）、例11-2（P193）附加题（选做题，请有能力的同学完成下面的任务）

课堂演示实例的实现

附加题代码提示如下：

Option Explicit

Private Sub dh_Click()

Text1.FontSize = 20

End Sub

Private Sub Form_Resize()

Text1.Width = Form1.ScaleWidth

Text1.Height = Form1.ScaleHeight

End Sub

Private Sub green_Click()

Text1.ForeColor = vbGreen

End Sub

Private Sub ht_Click()

Text1.FontName = "黑体"

End Sub

Private Sub jc_Click()

   Text1.FontBold = Not Text1.FontBold

End Sub

Private Sub qx_Click()

   Text1.FontItalic = Not Text1.FontItalic

End Sub

Private Sub red_Click()

Text1.ForeColor = vbRed

End Sub

Private Sub st_Click()

Text1.FontName = "宋体"

End Sub

Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 2 Then

   PopupMenu color

End If

End Sub

Private Sub xh_Click()

Text1.FontSize = 12

End Sub