Snasui Excel Forum

Posted: **Tue Feb 13, 2018 3:41 pm**

Private Sub CommandButton1_Click()
Label1.Caption = CheckBox1.Caption & (" ")
Label1.Caption = CheckBox2.Caption & (" ")
Label1.Caption = CheckBox3.Caption & (" ")
Label1.Caption = CheckBox4.Caption & (" ")
Label1.Caption = CheckBox5.Caption & (" ")
Label1.Caption = CheckBox6.Caption & (" ")
Label1.Caption = CheckBox7.Caption & (" ")
End Sub

จากในไฟล์แนบ เมือผมคลิก Checkbox แต่ละตัวค่ามันแสดงออกตามที่กำหนด แต่พอผมกลับไปคลิกตัวแรก มันกลับไม่ส่งค่าการแสดง ของ Checkbox อันแรกครับ ผมควรแก้ยังไงดีครับ ขอบคุณมากครับ

Posted: **Tue Feb 13, 2018 8:02 pm**

คลิก ChekBox แล้วจะให้เกิดสิ่งใดก็ต้องเขียน Code ใน Event Click ของ CheckBox นั้นครับ เช่น

Code: Select all

Private Sub CheckBox1_Click()
    If CheckBox1.Value = True Then
        Label1.Caption = CheckBox1.Caption
    End If
End Sub

Private Sub CheckBox2_Click()
    If CheckBox2.Value = True Then
        Label1.Caption = CheckBox2.Caption
    End If
End Sub

Posted: **Wed Feb 14, 2018 8:10 am**

snasui wrote: Tue Feb 13, 2018 8:02 pm คลิก ChekBox แล้วจะให้เกิดสิ่งใดก็ต้องเขียน Code ใน Event Click ของ CheckBox นั้นครับ เช่น
Code: Select all
Private Sub CheckBox1_Click()
    If CheckBox1.Value = True Then
        Label1.Caption = CheckBox1.Caption
    End If
End Sub

Private Sub CheckBox2_Click()
    If CheckBox2.Value = True Then
        Label1.Caption = CheckBox2.Caption
    End If
End Sub

อ๋อขอบคุณครับอาจารย์ คือจะมีกี่ Check ก็ต้องวาง Code ดังกล่าวลงไปใช่ไหมครับ ขอบคุณมากครับ

Posted: **Wed Feb 14, 2018 7:25 pm**

jullathep wrote: Wed Feb 14, 2018 8:10 am อ๋อขอบคุณครับอาจารย์ คือจะมีกี่ Check ก็ต้องวาง Code ดังกล่าวลงไปใช่ไหมครับ ขอบคุณมากครับ

ถูกต้องครับ

Posted: **Thu Feb 15, 2018 8:15 am**

snasui wrote: Wed Feb 14, 2018 7:25 pm
jullathep wrote: Wed Feb 14, 2018 8:10 am อ๋อขอบคุณครับอาจารย์ คือจะมีกี่ Check ก็ต้องวาง Code ดังกล่าวลงไปใช่ไหมครับ ขอบคุณมากครับ
ถูกต้องครับ

ขอบพระคุณครับ ท่านอาจารย์

Snasui Excel Forum

สอบถามเรื่องการแสดงผลใน Label เมื่อ Click Checkbox

สอบถามเรื่องการแสดงผลใน Label เมื่อ Click Checkbox

Re: สอบถามเรื่องการแสดงผลใน Label เมื่อ Click Checkbox

Re: สอบถามเรื่องการแสดงผลใน Label เมื่อ Click Checkbox

Re: สอบถามเรื่องการแสดงผลใน Label เมื่อ Click Checkbox

Re: สอบถามเรื่องการแสดงผลใน Label เมื่อ Click Checkbox