เขียน in ใน vb
กระทู้เก่าบอร์ด อ.Yeadram

 1,222   3
URL.หัวข้อ / URL
เขียน in ใน vb

เราสามารถเขียน in เหมือนใน query ใน vb ได้หรือเปล่าครับ
Text1 in (1,2,3,4,5)
รูปแบบประโยคเป็นอย่างไร

อย่างเช่น ต้องการตรวจสอบว่า Text1 มีค่า = 1 หรือ 2 หรือ 3 หรือ 5 หรือ 8 หรือ 9 ต้องเขียนอย่างไรครับ

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

1 @R08704
ตอนนี้ผมเขียนงี้อยู่ครับ
btnSave.Visible =(Text1 = 1 or Text1 = 2 or Text1 = 5 or Text1 = 6)
ใครมีวิธีเขียนให้สั้นกว่านี้ และ สะดวกหากต้องการเพิ่มหรือลดตัวเลข หรือเปล่าครับ
2 @R08705
ถ้า Text1 ให้ค่าเป็นอักษรตัวเดียว ก็ใช้แบบนี้ได้
btnSave.Visible = (Text1 Like "[1256]")

ถ้า Text1 ให้ค่ามากกว่าอักษรตัวเดียว และถ้ามีเงื่อนไขเยอะ จะลองวิธีนี้ก็ได้
btnSave.Visible = ( InStr(" 1 2 5 6 11 12 15 16 21 22 25 26", " " & Text1 & " ") <> 0 )
3 @R08721
ขอบคุณครับ...
ตอนแรกผมใช้
Select case Text1
Case 1,2,5,6
End Select

แต่วิธีของคุณสันติสุขก็เก๋ดี ประยุกต์ใช้

แล้วยังมีวิธีอื่นอีกปะครับ แบบพวก array อะไรเนี่ยไม่แน่ใจว่าใช้ได้เปล่าครับ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3096s