السلام عليكم ورحمة الله
لدي نموذج طريقة عرضة:نماذج مستمرة وبه عدة حقول منها الاسم-المدفوعات-الديون وكذلك زر حذف أريد عند تحديد السجل والنقر على الزر يظهر لي الاسم الذي أود حذفه في الرسالة التي ستظهر في الكود التالي
Private Sub DELETE_RECORD_Click()
Rem
Dim intNewCustomer As Integer, strTitle As String
Dim intMsgDialog As Integer, strMsg As String
strTitle = "لوحة التحكم في أقساط أولياء الأمور"
strMsg = "هل تود حذف السجل الحالي"
strMsg = strMsg & Chr(13) & "إذا أردت الحذف فأنقر على نعم"
strMsg = strMsg & Chr(13) & Chr(13) & "وإلاّ فأنقر على لا"
intMsgDialog = vbYesNo + vbExclamation
intNewCustomer = MsgBox(strMsg, intMsgDialog, strTitle)
If intNewCustomer = vbYes Then
DoCmd.RunCommand acCmdDeleteRecord
Else
DoCmd.CancelEvent
End If
Exit_ComBox_QUIT_Click:
Exit Sub
Err_ComBox_QUIT_Click:
MsgBox Err.Description
End Sub