PDA

View Full Version : سوال: آیا می توان برای این مسج باکس کد نوشت


alifatehi
یک شنبه 30 تیر 1387, 01:16 صبح
سلا م ایا می شود برای این MsgBox کد نویسی کرد.

این مسج باکس فارسی است :

می خوام وقتی تایید انتخاب می شود از برنامه خارج شود

نکته دیگه ایا بدرد می خوره
راستی این مسج باکس توی این سایت پیدا کردم
Mbt925
یک شنبه 30 تیر 1387, 01:34 صبح
توسط خصوصیت Result این کنترل می تونید به دکمه کلیک شده پی ببرید و عملیات دلخواه رو انجام بدید.

هیچ کنترلی بد نیست.
r0ot$harp
یک شنبه 30 تیر 1387, 11:54 صبح
دوست عزیز کد مربوط به خاصیت Result اینگونه می شود .


Private Sub Command1_Click()
MsgBoxEx1.Buttons = 102
MsgBoxEx1.Title = "خروج"
MsgBoxEx1.Prompt = "آيا مي خواهيد خارج شويد؟"
MsgBoxEx1.Button1Caption = "تاييد"
MsgBoxEx1.Button2Caption = "انصراف"
MsgBoxEx1.RightAligned = True
MsgBoxEx1.Show

If MsgBoxEx1.Result = 6 Then Print "تاييد"
If MsgBoxEx1.Result = 7 Then Print "انصراف"

End Sub

باتشکر احسان
alifatehi
دوشنبه 31 تیر 1387, 20:27 عصر
دوستان عزیز جواب نداد

منظورم این بود که زمانی تائیید زده می شود خارج بشود از برنامه

راستی دیروز داخل یک سیستم دیگه امتحانکردم گزینه مسج باکسم به طور اتوماتیک فارسی شد؟؟؟؟؟؟؟؟؟؟
r0ot$harp
دوشنبه 31 تیر 1387, 22:25 عصر
دوستان عزیز جواب نداد

منظورم این بود که زمانی تائیید زده می شود خارج بشود از برنامه

راستی دیروز داخل یک سیستم دیگه امتحانکردم گزینه مسج باکسم به طور اتوماتیک فارسی شد؟؟؟؟؟؟؟؟؟؟


Private Sub Command1_Click()
MsgBoxEx1.Buttons = 102
MsgBoxEx1.Title = "خروج"
MsgBoxEx1.Prompt = "آيا مي خواهيد خارج شويد؟"
MsgBoxEx1.Button1Caption = "تاييد"
MsgBoxEx1.Button2Caption = "انصراف"
MsgBoxEx1.RightAligned = True
MsgBoxEx1.Show

If MsgBoxEx1.Result = 6 Then end
If MsgBoxEx1.Result = 7 Then Print "انصراف"

End Sub
alifatehi
سه شنبه 01 مرداد 1387, 00:16 صبح
ببخشید منظورم این بود کدی که شما معرفی کردید اون چیزی که می خواستم نبود منظور من این بود وقتی دکمه تایید رو بزنم از برنامه خارج بشود .

و در مورد سوال دوم اصلا ارتباطی با کد شما نداشت منظورم این بود علت این که در بعضی از سیستم ها ( بدون هیچ گونه تغییرات در کد نویسی برای فارسی شدن پیغام msgbox ) این پیغام به صورت فارسی است
r0ot$harp
سه شنبه 01 مرداد 1387, 01:11 صبح
ببخشید منظورم این بود کدی که شما معرفی کردید اون چیزی که می خواستم نبود منظور من این بود وقتی دکمه تایید رو بزنم از برنامه خارج بشود .

و در مورد سوال دوم اصلا ارتباطی با کد شما نداشت منظورم این بود علت این که در بعضی از سیستم ها ( بدون هیچ گونه تغییرات در کد نویسی برای فارسی شدن پیغام msgbox ) این پیغام به صورت فارسی است

دوست عزیز من واقعا دارم دیوانه می شم :گریه::گریه::گریه::متعجب::متع ب: دوست من شما مگه کدی نمی خواهی که وقتی رو تایید زد برنامه خارج بشه خوب منم نوشتم دیگه هرموقع رو دکمه بزنی و کاربر تایید کنه از برنامه خارج می شه .


باتشکر احسان
alifatehi
سه شنبه 01 مرداد 1387, 06:35 صبح
خوب جواب نمی ده
اوبالیت به بو
سه شنبه 01 مرداد 1387, 09:38 صبح
خوب جواب نمی ده

شما End رو نوشتي؟


If MsgBoxEx1.Result = mbYes Then
End
End If
amir_hacker
سه شنبه 01 مرداد 1387, 15:06 عصر
شما End رو نوشتي؟


If MsgBoxEx1.Result = mbYes Then
End
End If

ببخشید مگه شما اسم دکمه ها رو عوض نکردید؟یا کد دکمه ها درست کد نویسی کردید؟