با سلام .. دوست عزیز ahmad1610 ورود شما رو به این انجمن تبریک میگم ... در مورد سوالتون باید بگم شما باید متغیری تعریف کنید مثل op که کلیه عملیات مربوط به ماشین حساب رو انجام میده ...
فرض کنید میخواهید 2 عدد 12 رو با 14 جمع کنید . کد هاش به صورت زیر میشه :
کد های مربوط به عملیات جمع :
کدهای دکمه مساوی :کد:op = "+" A = txtInput.text txtInput.text = Empty
کدها تموم شد ... حالا بعد از وارد کردن عدد 12 بر روی دکمه + کلیک کنید و بعد عدد 14 را وارد کنید و بر روی دکمه مساوی کلیک کنید میبینید که حاصل رو محاسبه میکند ..کد:Select Case op case "*" C = A * txtInput.Text Case "+" C = Val(A) + Val(txtInput.text) case "/" C = A / txtInput.Text Case "-" C = A - txtInput.Text End Select Txtinput.text = Val(C)
برای نوشتن عدد 2 رقمی با استفاده از دکمه هم میتونید از کد زیر کمک بگیرید :
مثلا برای دکمه عدد 1 :
کد:txtInput.text = txtinput.text + "1"






پاسخ با نقل قول

Bookmarks