10.17-rasm
Dastur kodi Option Explicit
Private Sub Command1_Click()
Dim stra, strb As String
Dim inta, intb As Integer
Dim strC
stra = Text1.Text
strb = Text2.Text
strC = Text3.Text
Text4.Text = stra & strb
inta = Val(stra)
intb = Val(strb)
Text5.Text = Str(inta + intb)
Text6.Text = Len(strC)
Text7.Text = Trim(strC)
Text8.Text = UCase$(strC)
Text9.Text = InStr(strC, stra)
Text10.Text = Left(strC, 10)
Text11.Text = StrReverse(strC)
End Sub
Private Sub Command2_Click()
End
End Sub
10.18-rasm
10.19-rasm
10.15. Massivlar
Massiv - bu o‘zgaruvchi, unda bir vaqtda bir tipdagi bir necha qiymatlar saqlanadi. U o‘zini bir tipdagi indeksi o‘zgaruvchilar yig‘indisi hisoblanadi. Massivning qo‘llaniladigan indeksi soni xar xil bo‘lishi mumkin. Ko‘pinchalik bir yoki ikki indeksli massivlar qo‘llaniladi, ba’zan -uch indeksli, undan ko‘p sonli indekslar kam uchraydi. VB 60tagacha indekslar qo‘llashi mumkin. Massivning indekslar soni massivning razmerini belgilaydi. Bir indeksli massiv bir o‘lchovli massiv deyiladi. Ikki indeksli –ikki o‘lchovli va hokazo.
Katta sonli massivlar katta xotirani egallaydi, shuning uchun ularni qo‘llashda ehtiyot bo‘lish kerak. Massiv qo‘llashdan avval uni operator Dim yordamida e’lon qilish lozim va unda massivda qiymatlar qaysi tip da saqlanishini ko‘rsatish kerak. Hamma qiymatlar massivda bir tipdagi ma’lumotlar turiga qarashli bo‘lishi majburiy. Bu chegaralashni amaliyotda chetlab o‘tish mumkin, buning uchun massiv e’lon qilinganda Variant tipidan foydalanish mumkin, bunda massiv elementlari xar xil tipdagi qiymatga ega bo‘lishi mumkin.
Quyida massivni e’lon qilish operatorining sintaksisi: