標題: [發問] 如何利用ToggleButton開關控制UserForm表單內的按鈕 [打印本頁]

---

作者: av8d    時間: 2012-6-29 16:33     標題: 如何利用ToggleButton開關控制UserForm表單內的按鈕

本帖最後由 av8d 於 2012-7-2 15:44 編輯

利用ToggleButton開關控制UserForm表單內的按鈕

當開啟的時候
Private Sub CommandButton10_Click()
    If TextBox1.Value <> "0000" Then
        TextBox1 = ""
    Else
        TextBox1 = ""
        Me.OLEObjects.Visible = True
        Sheets("Data").Select
        Call Music
    End If   
End Sub

當關閉的時候
Private Sub CommandButton10_Click()
    If TextBox1.Value <> "0000" Then
        TextBox1 = ""
    Else
        TextBox1 = ""
        Me.OLEObjects.Visible = True
        'Sheets("Data").Select
        'Call Music
    End If   
End Sub

---

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