กระทู้เก่าบอร์ด อ.สุภาพ ไชยา
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
ขอบคุณมากค่ะ
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
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
ได้ค่ะแล้ว อาจารย์ ขอบคุณมากๆค่ะ
Time: 0.1196s