กระทู้เก่าบอร์ด อ.Yeadram
1,039 5
URL.หัวข้อ /
URL
เมื่อไม่มี Path ให้ Control ไม่แสดงอะไร
คือผมทำฟอร์ม ที่มีการโชว์รูปภาพ ตาม Path ที่เก็บใน Record
แต่เมื่อ Record นั้น ไม่มี Path ที่เก็บ ก็จะไม่โชว์รูป ตามโค๊ตนี้
Private Sub Form_Current()
If IsNull(ImageFile_path) Then
CustImage.Picture = False
Else
CustImage.Picture = Me.ImageFile_path
End If
End Sub
บรรทัดที่เป็นสีแดง ผมต้องเขียนยังงัยให้ มันไม่โชว์รูปครับ ปัญหาคือ เวลาเลือก
Record ที่มี Path มันก็แสดงรูป เปลี่ยนรูป ตามปกติ แต่พอเลือกไปที่ Record
ที่ไม่มี Path มันก็จะโชว์รูปเดิมรูปล่าสุด ผมอยากให้มันเป็นว่างๆ ไปเลย ต้องกำหนด
ให้ CustImage.Picture = อะไรครับ ขอบคุณครับ
แต่เมื่อ Record นั้น ไม่มี Path ที่เก็บ ก็จะไม่โชว์รูป ตามโค๊ตนี้
Private Sub Form_Current()
If IsNull(ImageFile_path) Then
CustImage.Picture = False
Else
CustImage.Picture = Me.ImageFile_path
End If
End Sub
บรรทัดที่เป็นสีแดง ผมต้องเขียนยังงัยให้ มันไม่โชว์รูปครับ ปัญหาคือ เวลาเลือก
Record ที่มี Path มันก็แสดงรูป เปลี่ยนรูป ตามปกติ แต่พอเลือกไปที่ Record
ที่ไม่มี Path มันก็จะโชว์รูปเดิมรูปล่าสุด ผมอยากให้มันเป็นว่างๆ ไปเลย ต้องกำหนด
ให้ CustImage.Picture = อะไรครับ ขอบคุณครับ
5 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R16440
Error ที่ RePaint เลยครับอาจารย์
3 @R16441
โอเคเลย คำว่า Repaint ของอาจารย์ทำให้ผมนึกวิธีได้แล้วครับ
คือซ่อนมันซะเลย
แต่ยังงัย ถ้ามันมีวิธี ก็ยังอยากรู้อยู่ดี ว่ามันใช้คำสั่งอะไรครับ
ขอบคุณครับ
คือซ่อนมันซะเลย
Private Sub Form_Current()
If IsNull(ImageFile_path) Then
CustImage.Visible = False
Else
CustImage.Visible = True
CustImage.Picture = Me.ImageFile_path
End If
End Sub
แต่ยังงัย ถ้ามันมีวิธี ก็ยังอยากรู้อยู่ดี ว่ามันใช้คำสั่งอะไรครับ
ขอบคุณครับ
4 @R16446
CustImage.Picture = ""
5 @R16452
555 ง่ายแค่นี้เอง
ได้ผลอย่างที่ต้องการเลยครับ ขอบพระคุณอาจารย์ TTT อีกครั้งครับ
ได้ผลอย่างที่ต้องการเลยครับ ขอบพระคุณอาจารย์ TTT อีกครั้งครับ
Time: 0.2568s
ก่อน Else หรือหลัง end if