Question

vb的optionbutton怎么用

将option1，option2的caption值输送到
listbox
怎么做
程序怎么写？

Answer 1

OptionButton 控件

OptionButton 控件显示一个可以打开或者关闭的选项。

说明

在选项组中用 OptionButton 显示选项，用户只能选择其中的一项。在 Frame
控件、PictureBox 控件或者窗体这样的容器中绘制 OptionButton 控件，就可以把这些控件分组。为了在
Frame 或者PictureBox 中将 OptionButton 控件分组，首先绘制 Frame 或
PictureBox，然后在内部绘制 OptionButton 控件。同一容器中的 OptionButton
控件为一个组。

Private Sub Option1_Click()
    Text1 = "1"
End Sub

Private Sub Option2_Click()
    Text1 = "10"
End Sub

Private Sub Option3_Click()
    Text1 = "100"
End Sub

Answer 2

me里,记住,一定要同一个Frame里画它们,这样的话只会有一个OptionButton被选中,其他的都不会被选中,就算你改选中另一个也是一样,永远只会有一个被选中,这是自动的,不用你去初始化,你只要初始化一下哪个按钮被选中就行了,记住只能设置其中一个被选中,这个就在VB左下方中间的属性窗口里设置一下Value值就可以了.如果你要用复制-粘贴的方法生成OptionButton控件数组,那你在每次粘贴前都要选点一下Frame,选中Frame再CTRL+V粘贴生成控件数组
你上面的
Private Sub optR_Click(Index As Integer)
Dim a As Integer
a = Index
optR(0).Value = False
optR(1).Value = False
optR(2).Value = False
optR(3).Value = False
optR(4).Value = False
optR(5).Value = False
optR(6).Value = False
optR(7).Value = False
optR(a).Value = True （debug说出错在此句上）

End Sub
通通不要,多此一举

Answer 3

Private Sub Option1_Click()
Listbox.AddItem Option1.Caption
End Sub
Private Sub Option2_Click()
Listbox.AddItem Option2.Caption
End Sub

追问

不行啊

追答

你的listbox是什么空间，listview还是listbox

把Optionbutton的name和list的name说清楚哦

Answer 4

Private Sub Option1_Click()
Listbox.AddItem "男“
End Sub
Private Sub Option2_Click()
Listbox.AddItem ”女"
End Sub