اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

مساعده في نوافذ الرسائل


abo3aesha_2014

الردود الموصى بها

2 ساعات مضت, abo3aesha_2014 said:

أريد معرفة الأكواد التى تضاف للـ MasgBox وتتسبب في ظهور علامة الاستفهام أو العلامات الأخري بجوار النص

وكذلك الأكواد الخاصة بإصدار أصوات نوافذ الرسائل

Snap 2017-04-24 at 11.56.27.png

وهذا مثال.. 

MsgBox "سوف يتم الخروج من البرنامج" & vbCrLf & "هل تريد الاستمرار؟", vbYesNo Or vbQuestion

Untitled.png

تم تعديل بواسطه sandanet
  • Like 1
رابط هذا التعليق
شارك

3 ساعات مضت, jjafferr said:

وعليكم السلام:smile:

 

لما تكون في VBA ، ابحث عن هذه الكلمة msgbox ، وسترى مثال في اسفل النافذة ، والتفاصيل في اعلا النافذة:smile:

 

جعفر

أولا جزاك الله خيرا
أخوك مبتدئ جدا وما فهمت كلامك :rol:
أين أبحث ؟؟

1 ساعه مضت, sandanet said:

وهذا مثال.. 


MsgBox "سوف يتم الخروج من البرنامج" & vbCrLf & "هل تريد الاستمرار؟", vbYesNo Or vbQuestion

Untitled.png

جزاك الله خيرا
ضبطت معي لحد كبير لكن بقي إصدار الصوت

رابط هذا التعليق
شارك

39 دقائق مضت, Shivan Rekany said:

اليك هذا

Beep
 

إليك الكود أين أضع Beep

Private Sub ÃãÑ0_Click()
If MsgBox("سيتم الخروج من البرنامج" & vbCrLf & "هل تريد الإستمرار ؟", vbYesNo Or vbQuestion) Then
DoCmd.Close
End If
End Sub

 

رابط هذا التعليق
شارك

اولا اشوف انه الكود تبعك فيها نواقص

وهو = vbYes

اي يعني لازم سيكون كالاتي

Beep
If Msgbox("سيتم الخروج من البرامج" & vbcrlf & "هل تريد الاستمرار ؟" , vbyesno + VbQuestion ) = vbYes then

تقبل تحياتي

رابط هذا التعليق
شارك

أخي ابو عائشه:smile:

 

انت لما تكتب الكود ، فهذه النافذة تُسمى نافذة اكواد VBA ، ويمكنك ان تبحث عن اي امر تريده مساعدة فيه ، بطريقتين (لإصدارات الاكسس 2000 الى 2010) :

  1. في هذه النافذة حقل في اعلى اليمين تكتب الامر اللي تريد تبحث عنه ، فتخرج لك نافذة فيها معلومات عن الكلمة التي تبحث عنها ،
  2. او تكتب اي امر في نافذة الاكواد ، مثلا: msgbox وتضع مؤشر الكتابة على اي جزء من الكلمة ، ثم تضغط على الزر F1 ، فتأتيك النافذة كما في الرقم 1 اعلاه ، بمعلومات عن msgbox.

من الرقم ا او 2 ، سترى جميع الاوامر الخاصة بالامر msgbox:smile:

 

الآن بالنسبة الى الامر msgbox ، فهناك اوامر تنبيه ، والتي تصدر صوت تنبيه كذلك ، وكل أمر له الشكل/الايقونة الخاص به (وهذا كان سؤال موضوعك)، مثلا:

MsgBox "تجربة بصوت", vbYesNo + vbCritical
او
MsgBox "تجربة بصوت", vbYesNo + vbExclamation
او
MsgBox "تجربة بصوت", vbYesNo + vbInformation

 

ولتكملة الموضوع ، فان الصوت يأتي من اصوات الوندوز ، ويمكنك ان تغيره من هنا (فالسهم يؤشر على صوت Critical ، والذي تناديه من الكود اعلاه بـ vbCritical):

00.z_0021.jpg.fbbf46f8cdb06c69b8b5732334dd31c3.jpg

.

وطبعا تستطيع استعمال أمر Beep كما قال عنه أخي شفان ، في اي مكان من البرنامج:smile:

 

جعفر

 

  • Like 3
رابط هذا التعليق
شارك

منذ ساعه, jjafferr said:

أخي ابو عائشه:smile:

 

انت لما تكتب الكود ، فهذه النافذة تُسمى نافذة اكواد VBA ، ويمكنك ان تبحث عن اي امر تريده مساعدة فيه ، بطريقتين (لإصدارات الاكسس 2000 الى 2010) :

  1. في هذه النافذة حقل في اعلى اليمين تكتب الامر اللي تريد تبحث عنه ، فتخرج لك نافذة فيها معلومات عن الكلمة التي تبحث عنها ،
  2. او تكتب اي امر في نافذة الاكواد ، مثلا: msgbox وتضع مؤشر الكتابة على اي جزء من الكلمة ، ثم تضغط على الزر F1 ، فتأتيك النافذة كما في الرقم 1 اعلاه ، بمعلومات عن msgbox.

من الرقم ا او 2 ، سترى جميع الاوامر الخاصة بالامر msgbox:smile:

 

الآن بالنسبة الى الامر msgbox ، فهناك اوامر تنبيه ، والتي تصدر صوت تنبيه كذلك ، وكل أمر له الشكل/الايقونة الخاص به (وهذا كان سؤال موضوعك)، مثلا:


MsgBox "تجربة بصوت", vbYesNo + vbCritical
او
MsgBox "تجربة بصوت", vbYesNo + vbExclamation
او
MsgBox "تجربة بصوت", vbYesNo + vbInformation

 

ولتكملة الموضوع ، فان الصوت يأتي من اصوات الوندوز ، ويمكنك ان تغيره من هنا (فالسهم يؤشر على صوت Critical ، والذي تناديه من الكود اعلاه بـ vbCritical):

00.z_0021.jpg.fbbf46f8cdb06c69b8b5732334dd31c3.jpg

.

وطبعا تستطيع استعمال أمر Beep كما قال عنه أخي شفان ، في اي مكان من البرنامج:smile:

 

جعفر

 

أخي جعفر

أحسن الله إليك وبارك لك في عمرك وزادك فهما وعلما

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information