ПоәК 042-14 07 20. 130/03-2012 03. 09. 2012ж. №1 басылым

Берілген тақырыпты түсіндіргенде мұғалім Студенттерді басқару элементтерінің көмегімен компонент терезесі бағдарламаның интерфейсімен жобаланатынына көңіл аударту керек. Бірақ толық бағдарлама үшін ол жеткіліксіз. Басқару элементтерін басқараын және қандай да әрекеттерді орындататын бағдарламаның кодын жазу қажет. Барлық жоғарғы деңгейдегі тілдердің бағдарламалық коды мыналардан тұрады:

• 
  айнымалы;
  
• 
  өрнек;
  
• 
  опреаторлар;
  
• 
  құрлымды басқарушылар;
  
• 
  функциялар;
  
• 
  кластар және объекттер.
  

• 
  айнымалылар, айнымалылардың атауы және есептің ұсынылған талаптарына сай атауларды;
  
• 
  Visual Basic жүйесінің негізгі берілгендер типтері;
  
• 
  айнымалыларды сипаттау аймағы;
  
• 
  айнымалылардың әрекеттеу аймағын;
  
• 
  жиымдар;
  
• 
  тұрақтылар;
  
• 
  меншіктеу операторлары;
  
• 
  бағдарламада түсініктемелерді қолдану;
  
• 
  бір қатарда операторларды жазу ережесі және ұзын қатарларды түсіруді қолдану;
  
• 
  With нұсқауы.
  

Dim X As String * 3 Х айнымалысын 3 символға дейін шектейміз.

Private Sub Form _Load ()

X=”123456”

MsgBox X Выдает 123

End Sub

Visual Basic айнымалыларды статистикалық анықтауға мүмкіндік береді. Прцедурадан шығарда статистикалық айнымалылардың мазмұны сақталады. Процедураны жаңадан шақырған кезде айнымалы соңғы рет процедурадан шығардағы мәнін меншіктейді. Айнымалының мазмұны жадты пішін мен модуль сақталған уақытта да сақталып тұрады. Айнымалыларды сатистикалық айнымалы ретінде сипаттау үшін Dim сөзінің орнына Static сөзді қолданады.

Static Айнымалы_аты As Мәліметтер _типі

Private Sub

Command1­­_Click ()

Static А As integer

Dim D As integer

A=A+1

B=B+1

Print A

Print B

End Sub

Command1­­-ді әр кезде шерткен А статистикалық айнымалысы 1-ге артып отырады, ал статистикалық емес В айнымалысы әр шерткен сайын қайтадан баптандырылады, сондықтан оның мәні шығарылатын кезде 1-ге тең.

Білім мен білікке қойылатын талаптар: Студенттер процедура түсінігін, процедураны сипаттауға қойылатын талаптарды, процедураның көріну аймағын білуі керек; процедураларды оқиғаларды өңдеу үшін қолдана білуді, қолданушы процедураларын қолдануды, бағдарламаның коды терезесінде жұмыс істеуді білуі керек.

Бағдарламалау барысында біріншіден оңай күйін келтіруге, ал екіншіден басқа процедураларды құғанда қолданылатын, бағдарламалық кодты кішірек логикалық бөліктерге бөлуге мүмкіндік беретін процедуралар кеңінен қолданылады. Visual Basic-те процедураның келесі түрлері берілген:

• 
  Sub
  
• 
  Function
  
• 
  Property
  

Оның синтаксисі мына түрде болып келеді:

Оқиғаларды өңдейтін процедуралар Visual Basic пішімдерінде орналасқан объектілермен немесе пішімнің өзімен байланысқан және өздерімен байланысқан оқиға басталуымен ғана орындалады. Формамен байланысқан Sub процедурасының оқиғағасы үшін келесі синтаксис берілген:

Синтаксисте көрсетілгендей, оқиғаны өңдеу прцедуралары атауында Form сөзінен тұрады, содан кейін барып (_) символы және оқиға орналасқан. Мысалы, форманы жүктегенде орындалатын процедура аты, Form_Load болады, ал «тышқанды» шерту арқылы орындалатын процедура үшін формада Form_Click деп беріледі.

• 
  жоба бағыттауышы терезесінің басқару панеліндегі батырмаға шерту арқылы;
  
• 
  View(Вид) – Code (Код) командасы арқылы;
  
• 
  Формадағы компонентті немесе форманың өзін екі рет шерту арқылы.
  

O
bject

Visual Basic – те бағдарламалық кодтарды жазудың жеңілдігі редактор жасақтаушыға автоматты түрде қажетті операторлар тізімін, функцияларды, объектілер қасиеттерін ұсынады. Мысалы, пішінннің басқару элементтерінің атауын енгізу барысында экранда сол объектінің қасиеттер тізімі пайда болады. (5.9 - сурет). Сендерге тізімдегі қажетті қасиеттке тышқанды екі рет шерту жергілікті, ол бағдарламалық код орналастырады.

[Private] [Public] [Static] Function (Процедура аты, аргументтер) [As type]

Операторлар

Function

Шаршының ауданың есептейтін процедураны қарастырайық.

Function Square (A As Integer) As Long

Square=A^2

End Function

Бұл процедураны шақыру үшін пішінде мына кодты пайдалануға болады:

Private Sub Text1_Change ( )

Text2.Text=Square(Text1.Text)

End Sub