在窗体上有5个控件:一个名称为Text1的文本框控件,用来显示文本;两个名称分别为Check1(设置显示文本的下划线)和Check2(设置显示文本的加粗)的复选框;两个名称分别为Option1(设置字的大小为12磅)和Option2(设置字的大小为16磅)

admin2009-02-13  36

问题 在窗体上有5个控件:一个名称为Text1的文本框控件,用来显示文本;两个名称分别为Check1(设置显示文本的下划线)和Check2(设置显示文本的加粗)的复选框;两个名称分别为Option1(设置字的大小为12磅)和Option2(设置字的大小为16磅)的单选按钮。当Check1被选中时,文本框中显示的字体加下划线,当Option2被选中时,文字框中显示的字体大小为16磅,程序运行时的界面如图20-5所示。请填空。

   Private Sub Check1_Click()
      If Check1.Value=【  】Then
         Text1.FontUnderline=True
      Else
         Text1.FontUnderline=False
      End If
   End Sub
   Private Sub Option2_Click()
      Text1.【  】
   End Sub

选项

答案1 , FontSize=16

解析 当复选框Check1被选中时,将使Text1中显示的文字加上下划线,判断复选框是否被选中,可以看它的Value属性值,当它的值为0时表示没有被选中,为1时表示被选中,为2时表示复选框变灰。要改变文本框中显示字体的大小,可设置它的FontSize属性,要把Text1中显示的字的大小变为16磅,可使用下面的语句:Text1.FontSize=16。
转载请注明原文地址:https://jikaoti.com/ti/Bkq0FFFM
0

最新回复(0)