1
ห้องสนทนาทั่วไป / : สอบถามกล่องเครื่องมือคำสั่งผสมครับ
« เมื่อ: 03 ธ.ค. 63 , 12:03:30 »
ใช้การสร้างเงือนไข เอาได้ไหมเช่น
สมมุติคอมโบชื่อ comboname และ Option ชื่อ Opt1 ถึง 4
Private Sub ComboName_AfterUpdate()
If Me.ComboName.Value = 1 Then
Me.Opt1 = True
ElseIf Me.ComboName.Value = 2 Then
Me.Opt2 = True
ElseIf Me.ComboName.Value = 3 Then
Me.Opt3 = True
ElseIf Me.ComboName.Value = 4 Then
Me.Opt4 = True
End If
End Sub
สมมุติคอมโบชื่อ comboname และ Option ชื่อ Opt1 ถึง 4
Private Sub ComboName_AfterUpdate()
If Me.ComboName.Value = 1 Then
Me.Opt1 = True
ElseIf Me.ComboName.Value = 2 Then
Me.Opt2 = True
ElseIf Me.ComboName.Value = 3 Then
Me.Opt3 = True
ElseIf Me.ComboName.Value = 4 Then
Me.Opt4 = True
End If
End Sub
โพสต์นี้ได้รับคำขอบคุณจาก: Pubg Mobile