คุณสมบัติ NewRecord

นำไปใช้กับ

คุณสามารถใช้คุณสมบัติ NewRecord เพื่อกําหนดว่า ระเบียนปัจจุบัน เป็นระเบียนใหม่หรือไม่ จํานวนเต็มแบบอ่านอย่างเดียว

นิพจน์.NewRecord

นิพจน์ จำเป็น นิพจน์ที่ส่งกลับวัตถุใดวัตถุหนึ่งในรายการ นําไปใช้กับ

ข้อสังเกต

คุณสมบัติ NewRecord จะใช้การตั้งค่าต่อไปนี้

เมื่อผู้ใช้ได้ย้ายไปยังระเบียนใหม่ การตั้งค่าคุณสมบัติ NewRecord จะเป็น จริง ไม่ว่าผู้ใช้จะได้เริ่มแก้ไขระเบียนหรือไม่

ตัวอย่าง

ตัวอย่างต่อไปนี้แสดงวิธีใช้คุณสมบัติ NewRecord เพื่อกําหนดว่าระเบียนปัจจุบันเป็นระเบียนใหม่หรือไม่ กระบวนงาน NewRecordMark จะตั้งค่าระเบียนปัจจุบันเป็นตัวแปร intnewrec ถ้าระเบียนเป็นระเบียนใหม่ จะมีข้อความปรากฏขึ้นเพื่อแจ้งให้ผู้ใช้ทราบ คุณสามารถเรียกใช้กระบวนงานนี้เมื่อเหตุการณ์ Current สําหรับฟอร์มเกิดขึ้น

Sub NewRecordMark(frm As Form)
    Dim intnewrec As Integer
    intnewrec = frm.NewRecord
    If intnewrec = True Then
    MsgBox "You're in a new record." _
        & "@Do you want to add new data?" _
        & "@If not, move to an existing record."
    End If
End Sub