Muallif:
Virginia Floyd
Yaratilish Sanasi:
5 Avgust 2021
Yangilanish Sanasi:
1 Iyul 2024
![Visual Basic.NET -da ikkita raqamni qanday qo'shish kerak - Jamiyat Visual Basic.NET -da ikkita raqamni qanday qo'shish kerak - Jamiyat](https://a.vvvvvv.in.ua/society/kak-slozhit-dva-chisla-v-visual-basic.net-14.webp)
Tarkib
Ushbu maqolada siz ikkita raqamning yig'indisini hisoblash uchun oddiy Visual Basic dasturini yozishni o'rganasiz. Dasturni ishga tushirish uchun sizga Visual Studio 2017 kabi Visual Basic kompilyatori kerak.
Qadamlar
1 Visual Basic muharririni oching. Kodni keyinroq sinab ko'rish uchun kodingizni tuzatadigan dasturingiz borligiga ishonch hosil qiling (masalan, Visual Basic 2017).
- Agar sizda Visual Basic muharriri bo'lmasa, Notepad ++ dan foydalaning yoki Visual Basic 2017 -ni yuklab oling.
2 Kodning birinchi qatorini kiriting. Kirish Xususiy sinf shakli 1 Visual Basic muharririda va keyin bosing ↵ Kirish... Bu satr quyidagi kod satrlarini belgilaydi.
- Visual Basic -dagi "Maxsus sinf" yorlig'i HTML -dagi html> yorlig'i bilan bir xil.
3 O'zgaruvchilarni o'rnating. Yig'indini topish uchun ikkita tamsayı qo'shish kerak, shuning uchun Visual Basic raqamlarni o'zgaruvchi sifatida tan olishi kerak. Buning uchun:
- Kirish Shaxsiy pastki tugma1_Click (jo'natuvchi sifatida, EventArgs sifatida) va bosing ↵ Kirish.
- Kirish Tutqich (Button1_Click) va bosing ↵ Kirish.
- Kirish Dim sum butun son sifatida va bosing ↵ Kirish.
- Kirish Butun son sifatida va bosing ↵ Kirish.
- Kirish Dim b butun son sifatida va bosing ↵ Kirish.
4 Bo'sh joylar uchun istisnolarni o'rnating. Bunday holda, agar biror raqam kiritilmagan bo'lsa, dastur xato qiladi. Buning uchun:
- Kirish Label4.Visible = To'g'ri va bosing ↵ Kirish.
- Kirish Agar TextBox1.Text = "" Keyin va bosing ↵ Kirish.
- Kirish Label4.Visible = False va bosing ↵ Kirish.
- Kirish MessageBox.Show ("Kechirasiz, maydon bo'sh bo'lishi mumkin emas.") va bosing ↵ Kirish.
- Kirish TextBox 1. Focus () va bosing ↵ Kirish.
- Kirish Agar tugasa va bosing ↵ Kirish.
5 Raqamlarni kiritish uchun matn qutilarini yarating. Buning uchun:
- Kirish a = qiymat (TextBox1.Text) va bosing ↵ Kirish.
- Kirish b = qiymat (TextBox2.Text) va bosing ↵ Kirish.
- Kirish sum = (a + b) va bosing ↵ Kirish.
- Kirish Label4.Text = "" & a & "va" & b & "yig'indisi" & sum & "ga teng." va bosing ↵ Kirish.
6 Tugmani bosish qismini yoping. Kirish Sub tugatish va bosing ↵ Kirish.
7 Yangi bo'lim yaratish. Kirish Maxsus pastki shakl1_Load (jo'natuvchi sifatida, e EventArgs sifatida) MyBase.Load -ni boshqaradi. va bosing ↵ Kirish.
8 "Noto'g'ri" va "yorliq" teglarini kiriting. Kirish Label4.Visible = False, bosing ↵ Kirish, keyin kiriting Sub tugatish va bosing ↵ Kirish .
9 Oxirgi bo'limni yarating. Kirish Shaxsiy pastki tugma2_Click (jo'natuvchi sifatida, EventArgs sifatida) tugmani boshqaradi 2. bosing. va bosing ↵ Kirish.
10 Matn maydonlariga havolalar qo'shing. Bu tugallangan dasturga raqamlarni qo'shadi. Buning uchun:
- Kirish TextBox1.Text = "" va bosing ↵ Kirish.
- Kirish TextBox2.Text = "" va bosing ↵ Kirish.
- Kirish Label4.Text = "" va bosing ↵ Kirish.
- Kirish TextBox 1. Focus () va bosing ↵ Kirish.
11 Raqam qo'shish uchun buyruq yarating. Kirish Sum = Val (TextBox1.Text) + Val (TextBox2.Text) va bosing ↵ Kirish.
12 "Sum" buyrug'ini kiriting. Kirish TextBox3.Text = Sum va bosing ↵ Kirish.
13 Kodni yoping. Kirish Sub tugatish va bosing ↵ Kirishoxirgi bo'limni yopish uchun yozing Yakuniy sinfbutun dasturni yopish uchun.
14 Dasturni tuzating. Nosozliklarni tuzatish yorlig'iga o'ting, Nosozliklarni tuzatishni boshlash -ni bosing va disk raskadrovka tugashini kuting. Dastur to'liq tuzatilgandan so'ng, uchta matnli maydon va tugma bilan oyna ochiladi; Endi raqamlarni yuqori ikkita qutiga kiriting va raqamlarni qo'shish uchun tugmani bosing.
- Agar kod oddiy matn muharririda yozilgan bo'lsa, disk raskadrovka yorlig'i bo'lmaydi.Bunday holda, disk raskadrovka qilish va ishga tushirish uchun Visual Studio 2017 -da yozgan kodni oching.
- Agar kod Notepad yoki TextEdit -da yozilgan bo'lsa, faylni ".txt" yoki ".text" emas, ".vb" formatida saqlang.
Maslahatlar
- Visual Studio 2017 -ni Microsoft -dan bepul yuklab olish mumkin.
- Notepad yoki TextEdit -da kodning harakatlanishini osonlashtirish uchun kodning har xil bo'limlari chiziq bilan belgilanishi mumkin.
Ogohlantirishlar
- Visual Basic katta -kichiklarga sezgir emas, lekin bu erda kodda ko'rsatilgan joyni katta harf bilan yozib ko'ring.