السلام عليكم ورحمة الله وبركاته
لقد قررت أن أتعلم الفيجوال بيسك ... وبدأت فعلاً .... ولدي الكثير من الأسئلة ... لكن حبيت أن اقوم بعمل مثال .. وكل ما وجهني مشكلة أطرح لها سؤال ف المنتدى ...
طبعاً المثال التقليدي للتعلم هو دليل الهاتف .. بدأت به ...
( السؤال الأول ) .
ووزضعت زر ( حفظ ) أريد عند ضغط الزر أن تخرج رسالة ( هل تريد حفظ البيانات ) ثم يقوم بإضافة السجل إلى القاعدة المرتبطة ,,, ثم تبقى السجلات فاضية أستعداداص لإدخال بيامات أخرى ...
حاولت أستخدم هذا الكود :
Dim X As String
X = MsgBox(" åá ÊÑíÏ Ãä ÊÖíÝ ÈíÇäÇÊ ÌÏíÏÉ ", vbYesNo, " ÊäÈíå ")
If X = vbNo Then Exit Sub
Data1.Recordset.AddNew
Data1.Recordset.Update
MsgBox (" áÞÏ Êã ÍÝÙ ÇáÈíÇäÇÊ ÈäÌÇÍ ")وتطلع لي رسالة :
