我是第一次在这里发贴，也是昨天刚注册的。我现在刚在学习VB，问的问题有的幼稚，不过还是希望和大家交流下。
我做了个计算简单几何图形的程序：代码如下：
Private Sub Command1_Click()
Dim a
Dim b
If Option1.Value = True Then
a = Val(Text1.Text)
b = Val(Text2.Text)
Picture1.Print a * b
ElseIf Option2.Value = True Then
a = Val(Text1.Text)
Picture1.Print a * a
ElseIf Option3.Value = True Then
a = Val(Text1.Text)
b = Val(Text2.Text)
Picture1.Print a * b * 3.1415926
Else
a = Val(Text1.Text)
Picture1.Print a * a * 3.14158926
End If
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Load()
End Sub
Private Sub Option1_Click()
Text1.Text = ""
Text2.Text = ""
Text2.Visible = True
Picture1.Cls
End Sub
Private Sub Option2_Click()
Text1.Text = ""
Text2.Visible = False
Picture1.Cls
End Sub
Private Sub Option3_Click()
Text1.Text = ""
Text2.Text = ""
Text2.Visible = True
Picture1.Cls
End Sub
Private Sub Option4_Click()
Text1.Text = ""
Text2.Visible = False
Picture1.Cls
End Sub
遇到几个问题：1，print 的输入对象不可以是text吗？我用了不行，才换用picture的。
2，我建了四个单选option,分别对应矩形，正方形，椭圆和圆，然后下面是两个标签lable.和输入数据的text。我想当选择正方形和圆的时候就隐藏lable2和text2 。但是我用visible 做只可以隐藏text不知道为什么？
另外我想根据选择的option的不同改变lable和lable 的名称.就是选择矩形就显"请输入长""请输入宽",选择椭圆就显"请输入长半足"和"请输入短半足",请问怎么做啊!
