حالت موضوعی | حالت خطی

***CPSD Admin***

با سلام

یکی از مواردی که گاهاً مد نظر قرار میگیرد , محدود نمودن ورود داده های عددی توسط کاربر در داخل یک فیلد میباشد , به طور مثال در حالتی که بخواهیم کاربر تنها مجاز به ورود عدد به داخل یک فیلد باشد

Idea

جهت انجام این امر راه حل های متفاوتی وجود دارد که هر یک به تناسب میتواند مورد استفاده قرار گیرد , به طور مثال در داخل یک فرم فرضی و با در نظر گرفتن نام فیلد به عنوان SampleField میتوان از کدهای زیر استفاده نمود :

کد: 

Private Sub SampleField_KeyPress(KeyAscii As Integer)

    Select Case KeyAscii

      Case Asc("0") To Asc("9"), vbKeyBack

      Case Else

        KeyAscii = 0

    End Select

End Sub

و یا :

کد: 

Private Sub SampleField_KeyUp(KeyCode As Integer, Shift As Integer)

    If KeyCode = vbKeyReturn Then Exit Sub

    If IsNumeric(SampleField.Text) = False Then MsgBox "Only Number"

End Sub

میتوان با توجه به شرایط و صورت مساله مطرح شده , از تلفیق دو روش فوق نیز استفاده به عمل آورد

موضوعات مرتبط با این موضوع...
موضوع		نویسنده	پاسخ	بازدید	آخرین ارسال
	نکاتی در خصوص دریافت ورودی	CPSD Admin	0	12,725	۵ اسفند ۱۳۸۹ ۱۰:۱۴ عصر آخرین ارسال: CPSD Admin

حالت موضوعی \| حالت خطی محدود نمودن داده ورودی به عدد
نویسنده	پیام