รบกวนอาจารย์ช่วยเพิ่ม Code ให้หน่อยค่ะ
กระทู้เก่าบอร์ด อ.สุภาพ ไชยา

 289   3
URL.หัวข้อ / URL
รบกวนอาจารย์ช่วยเพิ่ม Code ให้หน่อยค่ะ

ตาม Code ข้างล่างนี้ เวลาพิมพ์ข้อความใน Subform จะ show ข้อมูลให้ค่ะ แต่พอสั่งพิมพ์ ตาม Code ข้างล่างนี้ไม่รับค่ะ ไม่ทราบว่า ต้องเพิ่มอะไรตรงไหนหรือเปล่าค่ะ

If Me.cbowhatTitle <> "" Then
If strWhere <> "" Then
strWhere = strWhere & "AND Title='" & Me.cbowhatTitle & "'"
Else
strWhere = "Title='" & Me.cbowhatTitle & "'"
End If
End If

ขอบคุณมากค่ะ

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

1 @R02829
สิ่งที่ทำให้ print ไม่ออำเพราะว่า ใส่ * สุ่มหาข้อมูล เข้าเข้าใจว่า คำสั่งนี้ จะทำงานเฉพาะเลือกมาจาก combo ไม่จะไม่ทำงานให้โดยการใช้ * หา ให้แล้วออกทาง Report
2 @R02833
ลองเป็นแบบนี้ดูครับ

If Me.cbowhatTitle <> "" Then
If strWhere <> "" Then
strWhere = strWhere & "AND Title Like '*" & Me.cbowhatTitle & "*'"
Else
strWhere = "Title Like '*" & Me.cbowhatTitle & "*'"
End If
End If
3 @R02842
ได้ค่ะแล้ว อาจารย์ ขอบคุณมากๆค่ะ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.1196s