رفتن به مطلب
  • 0

تایپ حروف بجای عدد


m.sepehr

سوال

سلام.

دو تا عددو می خوام با هم جمع کنم, وقتی برنامه اجرا میشه و می خوام عدد بزنم تا با هم جمع کنه , بجای عددها , حروف می زنه.

ممنون می شم اگه راهنمایی بفرمایید؟ 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

2 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

در 9 ساعت قبل، m.sepehr گفته است :

سلام.

دو تا عددو می خوام با هم جمع کنم, وقتی برنامه اجرا میشه و می خوام عدد بزنم تا با هم جمع کنه , بجای عددها , حروف می زنه.

ممنون می شم اگه راهنمایی بفرمایید؟ 

سلام دوست عزیزم، 

اول از همه دوتا تکست باکس توی دیزاینز ایجاد میکنیم با یک باتن

کد های زیر رو مینویسیم به همین صورت ک میگم

Sub Globals

Private EditText1 As EditText

Private EditText2 As EditText

Dim num1 As Int

Dim num2 As Int

Dim result As String

End Sub

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

Sub jam_Click

   If (EditText1.Text <> "" And EditText2.Text <> "") Then

     num1 = EditText1.Text

     num2 = EditText2.Text

     result = num1+num2

     Msgbox(res,"جمع")

 Else 
 
    Msgbox("عددی وراد نشده است","خطا")

 End If

End Sub

به همین راحتی

لینک ارسال
به اشتراک گذاری در سایت های دیگر

در در 6 آذر 1399 در 17:00، m.sepehr گفته است :

سلام.

دو تا عددو می خوام با هم جمع کنم, وقتی برنامه اجرا میشه و می خوام عدد بزنم تا با هم جمع کنه , بجای عددها , حروف می زنه.

ممنون می شم اگه راهنمایی بفرمایید؟ 

سلام 

اگر میخواید در ادیت تکست فقط عدد بزنید باید در قسمت دیزاینر روی ادیت تکست کلیک کنید و input type رو از روی text بردارید و به number تغییر بدید

به همین راحتی

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...