نگهداشتن اجرای برنامه تا ورود یک مقدار توسط کاربر [بایگانی]

View Full Version : نگهداشتن اجرای برنامه تا ورود یک مقدار توسط کاربر

A.Farzin

یک شنبه 27 خرداد 1386, 18:47 عصر

با سلام

اگر نخواهیم از Inputbox استفاده کنیم، چگونه می‌توان اجرای برنامه را در خط جاری آن تا زمان ورود یک مقدار از سوی کاربر متوقف کرد.
منظورم استفاده از رویداد Keypress یا KeyDown نیست چون در این رویدادها، اجرای برنامه متوقف نمی‌شود در حالیکه من میخواهم نه اجرای این رویداد جاری به پایان برسد و نه رویدادهای دیگر اجرا شوند.

ممنون

noorsoft

یک شنبه 27 خرداد 1386, 19:59 عصر

یک فرم دیگه به پروژه اضافه کن و با دستور زیر نمایش بده این دستور باعث میشه تا فرم دوم بسته نشده ادامه برنامه اجرا نشه
FORM2.SHOw 1

noorsoft

دوشنبه 28 خرداد 1386, 09:10 صبح

Private Sub Command1_Click()
Form2.Show
Enabled = False
Do While Form2.Visible
DoEvents
Loop
Unload Form2
Enabled = True
SetFocus
End Sub