Page 1 of 1

UserForm

Posted: Thu Jan 23, 2014 11:56 pm
by diamondbom
ผมอยากจะขอทราบวิธีการใช้ ComboBox ใน UserForm หน่อยครับ
ผมใช้ With ComboBox แล้วมันไม่ขึ้นครับ :flw:

Re: UserForm

Posted: Fri Jan 24, 2014 8:12 am
by snasui
:D แนบไฟล์ตัวอย่างที่เป็นปัญหามาด้วย ระบุ Procedure และบรรทัดที่เป็นปัญหาให้ชัดเจนครับ

Re: UserForm

Posted: Fri Jan 24, 2014 8:45 am
by diamondbom
Private Sub ComboBox1_Change()

With UserForm1.ComboBox1
.AddItem "A"
.AddItem "B"
End With

End Sub

ผมใช้โค้ดนี้ตามหนังสือครับแต่ใช้ใน UseForm แล้วที่ ComboBox ไม่มีอะไรขึ้นเลยครับ

Re: UserForm

Posted: Fri Jan 24, 2014 9:42 am
by snasui
snasui wrote: :D แนบไฟล์ตัวอย่างที่เป็นปัญหามาด้วย ระบุ Procedure และบรรทัดที่เป็นปัญหาให้ชัดเจนครับ
:D ทำตามที่ผมระบายสีไว้ในข้อความด้านบนครับ

Re: UserForm

Posted: Fri Jan 24, 2014 3:53 pm
by diamondbom
เพิ่งเริ่มเขียนน่ะครับ จะเอาไปประยุกต์ทำโปรเจค

Re: UserForm

Posted: Fri Jan 24, 2014 7:03 pm
by snasui
:D จากไฟล์ที่แนบมาลองคีย์ค่าใด ๆ ลงไปใน ComboBox แล้วคลิก Dropdown ก็จะเห็นว่ามีการเพิ่มรายการเข้ามาให้แล้วครับ