กระทู้เก่าบอร์ด อ.Yeadram
1,402 1
URL.หัวข้อ /
URL
อยากทราบวิธีทำให้ ComboBox แสดงภาพ ครับ
จาก ปัญหาที่ว่า ComboBox ไม่บันทึกค่าลงในฟอร์ม
ผมได้พยายามหาทางและแก้ไขได้แล้วนั้น ข้อมูลต่างๆสามารถลิ้งได้ครับ
แต่ติดในส่วนของไฟล์รูปภาพซึ่งผมสั่งให้บันทึกเป็น Attachment นั้น Error
(เพื่อต้องการให้แทรกรูปและแสดงได้บนฟอร์มแม่ของมัน)
ฟอร์มรายการอุปกรณ์ ที่จะนำมาทำเป็น ComboBox
ฟอร์มที่นำ ComboBox นั้นมาใช้
จะเห็นได้ว่าข้อมูลอื่นๆมาหมดครับ แต่รูปไม่มา
ตอนใช้งานจริงจะขึ้นฟ้องด้วยครับว่า
code ที่ผมใช้ดึง comboBox ครับ
ผมจะต้องแก้ไขหรือใช้คำสั่งอย่างไรครับเพื่อให้สามารถแสดงรูปได้ และไม่ Error
- Folder Pic = PicSmall โดยจะอยู่คู่กับไฟล์นี้เสมอ
- เคยทดสอบลบ PicSmall ทิ้ง แต่ในฟอร์มรายการอุปกรณ์ยังแสดงรูปอยู่ไม่ขึ้น error ใดๆ
- เคยทดลองแก้ code เป็น Me.Image1.Picture = \\PicSmall\ & Me.CB01.Column(6)
แต่ก็ยังขึ้น Error เหมือนเดิม
ไฟล์ผมแนบมาจาก Google Drive ครับ
ฐานข้อมูล Gauge (3)
รบช่วยดูหรือชี้แนะแนวทางหน่อยนะครับ
ขอบคุณมากมายครับ
ผมได้พยายามหาทางและแก้ไขได้แล้วนั้น ข้อมูลต่างๆสามารถลิ้งได้ครับ
แต่ติดในส่วนของไฟล์รูปภาพซึ่งผมสั่งให้บันทึกเป็น Attachment นั้น Error
(เพื่อต้องการให้แทรกรูปและแสดงได้บนฟอร์มแม่ของมัน)
ฟอร์มรายการอุปกรณ์ ที่จะนำมาทำเป็น ComboBox
ฟอร์มที่นำ ComboBox นั้นมาใช้
จะเห็นได้ว่าข้อมูลอื่นๆมาหมดครับ แต่รูปไม่มา
ตอนใช้งานจริงจะขึ้นฟ้องด้วยครับว่า
code ที่ผมใช้ดึง comboBox ครับ
Option Compare Database
Private Sub Form_Load()
Call ReLoadCombo
End Sub
Private Sub ReLoadCombo()
Me.memo11.Value = Me.CB01.Column(2)
Me.memo12.Value = Me.CB01.Column(3)
Me.memo13.Value = Me.CB01.Column(4)
Me.memo14.Value = Me.CB01.Column(5)
Me.Image1.Picture = Me.CB01.Column(6)
End Sub
Private Sub CB01_Click()
Me.memo11.Value = Me.CB01.Column(2)
Me.memo12.Value = Me.CB01.Column(3)
Me.memo13.Value = Me.CB01.Column(4)
Me.memo14.Value = Me.CB01.Column(5)
Me.Image1.Picture = Me.CB01.Column(6)
End Sub
ผมจะต้องแก้ไขหรือใช้คำสั่งอย่างไรครับเพื่อให้สามารถแสดงรูปได้ และไม่ Error
- Folder Pic = PicSmall โดยจะอยู่คู่กับไฟล์นี้เสมอ
- เคยทดสอบลบ PicSmall ทิ้ง แต่ในฟอร์มรายการอุปกรณ์ยังแสดงรูปอยู่ไม่ขึ้น error ใดๆ
- เคยทดลองแก้ code เป็น Me.Image1.Picture = \\PicSmall\ & Me.CB01.Column(6)
แต่ก็ยังขึ้น Error เหมือนเดิม
ไฟล์ผมแนบมาจาก Google Drive ครับ
ฐานข้อมูล Gauge (3)
รบช่วยดูหรือชี้แนะแนวทางหน่อยนะครับ
ขอบคุณมากมายครับ
1 Reply in this Topic. Dispaly 1 pages and you are on page number 1
Time: 0.4034s
ข้องใจตั้งนานนนน
หาคำตอบก็นานนน
กระทู้นี้
https://www.thai-access.com/yeadram_view.php?topic_id=60
http://www.thai-access.com/yeadram_view.php?topic_id=1084
ก็อ่านผ่านมาไม่รู้แล้วกี่รอบ ก็ปล่อยผ่านไปเนื่องจากไม่สนตัวแปลที่ว่า Showpic
แต่พึ่งเข้าใจนี่ว่ามัน error บอกว่าหารูปไม่เจอ แล้วทำไมไม่ใส่ค่าแบบนี้ไปล่ะ
Me.Image1.Picture = CurrentProject.Path & "\PicSmall\" & Me.CB01.Column(6)
จะไปใส่แค่ \\ แบบในวินโดว์ได้ไง ^^
ขอขอบคุณ thai-access แห่งนี้และทุกๆท่านมากครับ (โดยเฉพาะ 2กระทู้ด้านบน)