这道vb题目问题出在哪里？

来源：百度知道 编辑：UC知道 时间：2024/05/25 11:13:47
建一个工程，要求如下－－
1.框架Frame1中有一个复选框数组，可以选择粗体、斜体对标签中的文字进行修饰。
2、框架Frame2中有一个单选钮数组，可以选择宋体、楷体对标签中文字进行修饰。
3.标签Label1“Visual basic 程序设计”，宋体，常规，三号，文字对齐方式居中。
程序设计如下：
Private Sub Form_Load()
Label1.Caption = "Visual Basic程序设计"
Label1.FontName = "宋体"
Label1.FontItalic = False
Label1.FontBold = False
Label1.FontSize = 18
Label1.Alignment = 2
End Sub

Private Sub option1_cllck(index As Integer)
Select Case index
Case 0
Label1.FontName = "宋体"
Option1(1).Value = False
Case 1
Label1.FontName = "楷体_GB2312"
Option1(0).Value = False
End Select
End Sub

Private Sub Check1_Click(index As Integer)
Select Case index
Case 0
If Check1(0).Value = 1 Then
Label1.FontBold = True
Else
Label1.FontBold = False
End If
Case 1
If Check1(1).Value = 1 Then
Label1.FontItalic = True
Else

Private Sub Option1_Click(Index As Integer)
Label1.FontName = IIf(Index, "楷体_GB2312", "宋体")
End Sub

Private Sub Check1_Click(Index As Integer)
Label1.FontBold = Check1(0).Value
Label1.FontItalic = Check1(1).Value
End Sub

这样写就简单多了

=============================

//option1_cllck
这个cllck怎么点？是click

//过程声明与同名事件或过程的描述不匹配？
那应该是你没有使用控件数组，你把Option2和Check2删除掉，然后分别Option1和Check1，再粘贴回来，提示是否建立控件数组时选择是，这样就可以了

//标签文字字号为三号，怎么去设置？（fontsize好像行不通哦）
Form_load中已经用代码设置过了，正是用的FontSize

1.楼主，我照搬你的代码也画了相应控件，初次运行时没有发现有什么你说的编译错误，但我发现怎么宋体和楷体改不成功，原来是你的option控件的事件写错了，是click事件，不是cllck事件。改完后一切正常。
2.vb无法用中文字号，必须是数字，你得找出和三号一样大小的数字字号才可以用fontsize。
-------------------------------------
楼主，你不知道怎么建立控件数组吗？你把原先窗体是那个的option控件都删了，然后重新画一个option1控件，再选中这个控件右键点复制，再在窗体的空白处点粘贴，此时会提示你是否要建立控件数组，你点是就可以了。这样就算建立控件数组。

Private Sub Option1_Click(index As Integer)
Select Case index