Динамикалық массивтер Массивтер өлшемі (яғни онда сақталатын элементтердің көлемі) алдын ала анықталмайды. Мұндай жағдайда бос массив хабарлау керек. Бірде-бір элементте болмаған массив динамикалық массив деп аталады. Ол жай массив сияқты хабарланады, процедура Dim кілтті сөзі мен Static-тілді қолдануға болады.
Dim Y(0) As Integer
Сізге керек өлшемнен үлкен массив құрғанша, динамикалық массив құрған жөн. Онда бірде-бір элемент жоқ және онда керек элемент қосасыз. Ол үшін ReDim операторы қолданылады, ол тек процедурада кездеседі.
ReDim(5)
Жасалған элементке мән беру керек. Соңына қарай массивтің элементінің санын өзгертуге болады:
ReDim(7)
Бұл оператор орындалғаннан кейін, массивте сақталған барлық мән жоғалады. Оны сақтау үшін, Preserv кілтті сөзін қолдан.
ReDim Preserv Y(7)
Тұрақтылар Тұрақталар айнымалылырмен ұқсастықтары бар-олар да хабарланады және сән меншіктеледі. Айнымалыдан айырмашылығы тұрақтының мәні қосымша бар болғанша өзгертілмейді.
Тұрақты қолдану программалуды жеңілдетеді-vdModul айнымалымен программаны жеңілдетуге және түсіну оңай.
Тұрақтыны хабалаумен қатар оған мән меншіктеледі.Ол үшін Const кілтті сөзі қолданылады.
Cost conPi=3.142
Төменгі келтірілген фрагмент тұрақтыны тәжірбиеде қолдану мүмкіндігн көрсетеді:
Cost conPi=3.142
Dim Radius As Integer
Dim Area As Double
Option Explicit
Private Sub cmdPrintArea_Click()
Radiud=3
Area=conPi*(Radius^2)
PtintArea
End Sub
Берілген фрагмент дөңгелектің ауданын есептейді, conPi тұрақтысын қолдана отырып (сол префиксі медетті емес, бірақ керек). Ағымдағы формада дөңгелектің ауданы есептеліп шығарылады, сонда:
Тұрақтылрады процедурада, сондай-ақ модульді хабарлау секциясында хабарлауға болдаы. Тұрақтана құру үшін, оны хабарлау кезінде Global кілтті сөзін рұқрсет. Мысалы, Global ConstPi=3.142
Static кілтті сөзі Айнымалыны хабарлаудың тағы бір түрі-Static кілтті сөзі.
Static X As Integer
Бұл айнымалы оған берілген соңғы мәнді, тіпті процедура аяқталса да сақталатынын білдіреді. Статикалық айнымалы жиналған сумманың ағымдағы мәнін сақтауға ыңғайлы. Егер Static кілтті сөзінің орнына Dim-ді қолдансақ, онда процедураны қосқан сайын айнымалы басқа сандық айнымалымен бірге нөлденеді. Келесі мысалды қарастырайық, бұл жерде статикалық айнымалы жұмысын көреміз Sybexкафесінде болып, сізге не керек соны алдыңыз.
1. Standard Exe типіндегі жаңа жоба құр;
2. Форма Form1-дің Caption қасиетіне Sybex кафетерийі мәнін беріңіз;
3. Форманың ортасының жоғарғы жағына жазу орнат. Қасиеттер терезесіндегі оның Name қасиетне lblQuantity мәнін, ал Caption қасиетіне Алынған кофе0 мәнін бер;
4. LblQuantity жазбасының астына батырма орнат. Оның Name қасиетіне cmdAdd, ал Caption-ға - &Тағы алып келіңіз мәнін бер;
5.Программа терезесін ашу үшін форма кострукторында CmdAdd батырмасын екі рет шертіңіз;
6.Келесі кодты cmdAdd батырмасының Сlick оқиғасының процедурасына қос:
Private SubcmdAdd_Click()
Static count As Integer
Count=count+1
LblQuantity=”кофе алынды”&Str$(Count)
End Sub
Программаны қосып және қанша кофе керек болғанша батырманы бас, сонда:
Count айнымалысы Click оқиғасының прцедурасында статикалық (Static) деп хабарланған. Осыған байланысты оның мәні оқиға арасында сақталады. Қортиындысында айнымалының қанша кофе алғандығыңыз есінде болады.
