CheckBox Error
กระทู้เก่าบอร์ด อ.Yeadram

 1,253   5
URL.หัวข้อ / URL CheckBox Error

ช่วยอน่อยครับ เรื่องคำสั่ง
คือผมทำตัว CheckBox เพื่อเลือกรายการที่ต้องการ แล้วให้ออกเป็น Report
มีปัญหาว่าถ้าข้อมูลที่เป็นตัวเลข ( 920021 ) จะเลือกได้ไม่ Error
แต่ถ้าข้อมูลที่มีตัวหนังสือ ( E2002L ) รวมอยู่ด้วยจะ Error

Private Sub Command36_Click()
'Debug.Print "contact = " & Me.number

   If IsChecked(Me.number) = False Then
      colCheckBox.Add CLng(Me.number), CStr(Me.number)
   Else
      colCheckBox.Remove (CStr(Me.number))
   End If
   Me.Check34.Requery
End Sub


ขอบคุณครับ
โดย: paitoon เมื่อ: 26 ก.ย. 2554 , 15:24

5 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R11105
CLng("E2002L") ก็จะเกิด Type Mismatch ครับ เพราะมันแปลงตัวอักษร E และ L ให้เป็นค่าตัวเลขไม่ได้ ถ้าจะแปลง คุณต้องกำจัด E และ L ออกไปก่อนให้เหลือแต่ตัวเลขล้วนๆ
โดย: สันติสุข เมื่อ: 26 ก.ย. 2554 , 16:17
2 @R11134
ขอบคุณครับ
แล้วมีคำสั่งอื่นที่สามารถอ่านได้ทั้ง 2 อย่าง คือตัวอักษรและตัวเลขไหมครับ
โดย: paitoon เมื่อ: 27 ก.ย. 2554 , 15:22
3 @R11136
ลองแปลงเป็น Text ดูสิครับ ใช้ CStr()
โดย: Sak เมื่อ: 27 ก.ย. 2554 , 15:37
4 @R11139
ปัญหาคือผมไม่รู้ว่าจุดประสงค์ต้องการทำอะไรครับ ทำไมถึงใช้ CLng( )
โดย: สันติสุข เมื่อ: 27 ก.ย. 2554 , 17:03
5 @R11140
colCheckBox.Add CLng(Me.number), CStr(Me.number)

ตรงนี้ทำไมต้อง add Me.number 2 ครั้ง
เหมือนสับสนอยู่นะครับ ไป copy code ใครมาทำต่อโดยไม่เข้าใจหรือเปล่าครับ
โดย: PichaiTC เมื่อ: 27 ก.ย. 2554 , 17:08
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3272s