打印本文   关闭窗口

高校等考试题天天练二级VB]10月27日

作者：佚名  文章来源：不详  点击数  更新时间：2008/4/18 14:49:25  文章录入：杜斌  责任编辑：杜斌

知识点：程序填空（四） 下面程序用来设置文本框中文字效果，单击选中复选框（check1）时，文本框(Text1)中文字变为粗体，再次单击时，取消粗体效果。请填空完善它。 Dim s As   (7)   Private Sub Check1_Click()   s = Not s   If   (8)   Then     Text1.FontBold = True   Else     Text1.FontBold = False   End If End Sub Private Sub Form_Load() Text1.Text = "计算机" Check1.  (9)   = 0  ‘初始复选框未被选中 s = False End Sub

打印本文   关闭窗口