標題: [發問] [發問] 關於 OptionButton 循環核選問題 [打印本頁]

---

作者: mark15jill    時間: 2013-2-4 16:01     標題: [發問] 關於 OptionButton 循環核選問題

問題
若在環境中<Userform2>，點擊Button1 ，回到Userform1 ，但原先在Userform1所點擊的OptionButton1核選要怎取消？
有試著在Userform2內預先控制Userform1的Optionbutton1核選狀態消除，但似乎哪邊做錯。
麻煩各位大大教導，謝謝。
環境：
Userform1內
OptionButton1  <點選後開啟Userform2，並將Userform1隱藏>
OptionButton2  <點選後開啟Userform3，並將Userform1隱藏>

Userform2內
Button1 <點選後開啟Userform1，並將Userform2隱藏>

Userform3內
Button1 <點選後開啟Userform1，並將Userform3隱藏>

程式碼：(原先版本)
Userform1內Private Sub OptionButton1_Click()
    If OptionButton1.Value = True Then
        Me.Hide
        UserForm2.Show
    End If   
End Sub

Private Sub OptionButton2_Click()
    If OptionButton2.Value = True Then
        Me.Hide
        UserForm3.Show
    End IfEnd Sub

Userform2內
Private Sub CommandButton1_Click()
    Me.Hide
    UserForm1.Show
End Sub

Userform3內
Private Sub CommandButton1_Click()
    Me.Hide
    UserForm1.Show
End Sub

---

作者: GBKEE    時間: 2013-2-4 16:15

回復 1# mark15jill
UserForm1

1. Option Explicit
   
2. Private Sub OptionButton1_Click()
   
3.     If OptionButton1.Value = True Then
   
4.         OptionButton1.Value = False
   
5.         Me.Hide
   
6.         UserForm2.Show
   
7.     End If
   
8. End Sub
   
9. Private Sub OptionButton2_Click()
   
10.     If OptionButton2.Value = True Then
    
11.         OptionButton2.Value = False
    
12.         Me.Hide
    
13.         UserForm3.Show
    
14.     End If
    
15. End Sub

複製代碼

---

作者: mark15jill    時間: 2013-2-4 16:30

回復 2# GBKEE

大大 謝謝教導...
小弟想得太深了ˇˇ 忘記單純Value 就可以解決。
還一值在那邊Optionbutton2.Checked=false ...QQ"

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)