If dateTtime.Text = "" Then
Me!dateTtime = Now()
End If
if dateTtime.text="" then
Me!dateTtime = Now()
endif
ทางเลือกเดียว คำสั่งเดียว
1)
b = iif(a > 0, a)
2)
If a < 0 Then a = 0
ทางเลือกเดียว มากกว่า 1 คำสั่ง
If a < 0 Then
a = 0
b = 1
End If
สองทางเลือก ทั่วไป
If a < 0 Then
a = 0
b = 1
Else
b = 0
a = 1
End If
สองทางเลือก แต่ละทางเลือกมี 1 คำสั่ง
1)
a = iif(a < 0, 0, 1)
2)
If a < 0 Then a = 0 Else a = 1
มากกว่า สองทางเลือก
If isnull(a) Then
a = 0
b = 2
ElseIf a < 0 Then
a = 0
b = 1
ElseIf a = 0 Then
a = Null
b = 1
Else
a = 1
b = 0
End If
* ข้อสังเกต
- บางวิธีต้องจบด้วย end if ถึงจะสมบูรณ์
- บางวิธีห้ามจบ ด้วย end if เด็ดขาด
- บางวิธีเขียนด้วย iif ( ไอ สองตัว )
* คำแนะนำ การพิจารณาว่าเราควรจะใช้แบบใด
- อ่านง่ายไม่มั่ว ประหยัดไฟล์
- ตามตัวอย่างที่ให้ไปมันแค่ง่ายๆ เวลานำไปใช้งานจริง คุณอาจต้องนำมันไปซ้อนๆ กัน หรือนำมันไปวางในวงของลูป ต้องดูความเหมาะสมด้วยว่า มันจะทำให้อ่านง่ายมั้ย จะตรวจทานจะ debug ได้ง่ายมั้ย จะปรับปรุงเพิ่มเติมหรือแก้ไขในภายหลังลำบากหรือไม่
ขอบคุณครับ
บางตัวอย่างยังไม่เคยใช้เลย แต่ที่แน่ ๆ ขอเก็บไว้เป็นตัวอย่างก่อนดีกว่า
หนูไม่มีความรู้เรื่องโค้ดคำสั่งเลยค่ะ
แต่พอมาศึกษา Tips ที่อาจาย์แนะนำ ตลอดจนโค้ดต่างๆในบอร์ดนี้ ทำให้หนูเริ่มเข้าใจคำสั่งของโค้ดต่างๆได้บ้างพอสมควร แต่คงไม่สามารถสร้างประโยคคำสั่งขึ้นมาเองได้หรอก อย่างมากก็แค่เอาหลายๆตัวอย่าง มาลองดัดแปลงผสมกัน ผิดบ้างถูกบ้าง ทำให้รู้ว่าทุกตัวอักษรในคำสั่งนั้นล้วนมีความหมายทั้งสิ้น(มั่วไม่ได้เลย) ขอให้แนะนำTips อื่นๆอีกนะคะ
ขอบคุณมากๆค่ะ
