کنترل مقدار نوع داده که از تکس باکس فرم دریافت می شود

[eppagh]

نیاز دارم مقداری که از فرم از تکس باکس وارد برنامه می شود حتما عدد نه نوشته باشد.
ولی هرکاری می کنم و هرجور عمل می کنم نوع داده مقداری که از تکس باکس می رسد text است و تبدیل هم نمی شود.
راه چاره چیست؟

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[iranweld]

سلام

برای بررسی بهتر فایل رو ضمیمه کنید

[eppagh]

خیلی ساده ش اینه که یه فرم دارم که درش یک textbox هست. می خوام مطمئن بشم که از اون تکست باکس عدد وارد برنامه میشه. یعنی کاربر به جای 2 ننویسه b. می خوام اگر این اشتباه رخ داد قبل از اینکه بره داخل کد و vba خطای نوع داده بده به فارسی به کاربر اعلام کنم که درستش کنه.

[Ali Parsaei]

سلام،
ببينيد اين به درد مي خورد:

Private Sub TextBox1_Change()
If Not IsNumeric(Me.TextBox1.Value) And TextBox1.Value <> "" Then
        MsgBox "فقط عدد وارد کنيد"
    TextBox1.Value = ""
    TextBox1.SetFocus
    End If
End Sub 

[eppagh]

متشکرم با این کار کرد. در واقع من داشتم به عنوان متغیر کنترل می کردم ولی شما خود مقدار رو کنترل کردید و نوع داده ش رو سنجیدید.