回复 楼主 ycpyxl
你主要是想获取文本框填入的数据用于计算吧?直接读取即可。如
dim diameter as single
diameter=val(text1.text)
'获取你输入的值,并转换为可用于计算的浮点型,然后该用什么公式就把diameter套进公式里去算
Private Sub cmdCaculation_Click()
'处理点击“计算”按钮的事件
If Option1.Value=True Then
'使用与单选钮1相应的公式
Exit Sub
End if
If Option2.Value=True Then
'使用与单选钮2相应的公式
Exit Sub
End if
'其他单选钮照此操作
End Sub