2. 计算机
  3. 在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1。程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示。请填空。 Private Sub Op

在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1。程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示。请填空。 Private Sub Op

admin2009-02-13  55
问题 在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1。程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示。请填空。

     Private Sub Option1_Click(1ndex As Integer)
         Select Case【  】
           Case0
              a=“宋体”
           Case 1
              a=“黑体”
           Case 2
              a=“楷体GB2312”
       End Select
       Text1.【  】=a
    End Sub
选项
答案 Index , Font或FontName或Font.Name
解析 用于控件数组拥有相同的名称，所以必须用下标来访问控件数组中的不同元素。这个属性用Index来表示。本题建立了单选按钮的控件数组，要求选择不同的单选按钮，则文本框中的字体将根据所选的单选按钮切换，所以在Select分支控制语句的Case后填：Index，表示不同的控件。第9个空应把字体值赋给Text1的FontName属性，该属性确定文本框中文字的显示格式。Name属性为Font属性的子属性，故答案中的写法是等价写法。
转载请注明原文地址:https://kaotiyun.com/show/bB1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)