Visual Basic негізі Оқу-әдістемелік құрал Орал, 2013



бет9/12
Дата07.01.2022
өлшемі0,57 Mb.
#19744
1   ...   4   5   6   7   8   9   10   11   12

7-сурет




Объект

Қасиеті

Мәні

Text1

Text

Бос ету

Text2

Text

Бос ету

Text3

Text

Бос ету

Label1

Caption

1 - айнымалы

Label2

Caption

2 - айнымалы

Label3

Caption

Нәтиже

Label4

Caption

Қосу (+)

Label5

Caption

Алу (-)

Label6

Caption

Кӛбейту (*)

Label7

Caption

Бӛлу (/)

Command1

Caption

Іске қосу

Command2

Caption

Шығу

OptionButton1,OptionButton2,

OptionButton3, OptionButton4







- Command1 элементін екі рет шертіп, ашылған код терезесіне келесі процедураны енгізіңіз:



Private Sub CommandButton1_Click()

Dim Per, Vt

Per=Val(Text1.Text)

Vt=Val(Text2.Text)

If Option1.Value=True Then

Text3.Text=Per+Vt

End If

If Option2.Value=True Then

Text3.Text=Per-Vt

End If


If Option3.Value=True Then

Text3.Text=Per*Vt

End If

If Option4.Value=True Then

Text3.Text=Per/Vt

End If


End Sub

Тапсырмалар:

  1. Енгізілген датадан қазіргі уақыт аралығында қанша секунд, минут, сағат, күн, апта, ай, тоқсан, жыл бар екендігің анықтау жобасын құру.

  2. Үш орынды кездейсоқ тандалған екі санның қосындысын анықтау.

  3. Үшбұрыштың берілген катеттері бойынша гипотенузасы мен ауданын табу.

  4. Кездейсоқ берілген санның жұп немесе тақ екендігін анықтау.

  5. 1 ден 20 дейінгі сандардың қосындысын шығару.

  6. Калькулятор бағдарламасын құру.



Бақылау сҧрақтары:

  1. Label объектісінің қасиеттері.

  2. TextBox объектісінің қасиеттері.

  3. Таймер объектісінің оқиғалары.

  4. Формада жиі қолданылатын оқиғалар.

  5. Айнымалылар дегеніміз не? 6. Айнымалыларға қолданылатын қызметші сӛздер.



ІІІ тарау

ШАРТТЫ ЖӘНЕ ТАҢДАУ ОПЕРАТОРЛАРЫ




3.1. Тәуелді және тәуелсіз айырып-қосқыштар

VB процедураларында операторлық орындалу ретін басқарып отыратын тармақталу процестерін ұйымдастырылуда шартсыз Goto, шартты If…Then…Else және таңдау Select Case операторлары қолданылады.

Тармақталу процестерін тӛменде берілген құрылымдарды қолданып ұйымдастыруға болады.

If операторын қолдану арқылы:


  1. If шарт Then оператор

Егер шарт орындалса, онда басқару Then операторына жазылған операторға барады, әйтпесе –келесі қатарға ӛтеді

  1. If шарт Then 1-оператор Else 2-оператор

Егер шарт орындалса, басқару 1-операторға барады, әйтпесе 2операторға барады. 3. Шартсыз кӛшу ( Goto ) операторын қолдану арқылы: If шарт Then Goto n

Егер шарт орындалса, онда басқару n-ші қатарға ӛтеді, әйтпесе келесі қатарға беріледі.



Мысал 1: Visual Basic программалау ортасында квадрат теңдеуді шешу қосымшасын жасау.

  • Visual Basic ортасын ашып, жаңадан проект құрыңыз.

  • Формаға келесі элементтерді орналастырыңыз және қасиеттерін ӛзгертіңіз:


8-сурет




Объект

Қасиеті

Мәні

Form1

Caption

Квадрат теңдеуді







шешу

TextBox1

Text

-

TextBox2

Text

-

TextBox3

Text

-

Label1

Caption

A=

Label2

Caption

B=

Label3

Caption

C=

Label4

AutoSize

WordWrap

Alignment


True

True


2-Center

Command1

Caption

OK

Command1_Click процедурасына ӛтіп, квадрат теңдеуді шешу процедурасын толтырыңыз: Private Sub Command1_Click()

a = Val(Text1.Text) b = Val(Text2.Text) c = Val(Text3.Text) D = b ^ 2 - 4 * a * c

If D < 0 Then Label4.Caption = "мәні жоқ"

If D = 0 Then

X = b / (2 * a)

Label4.Caption = "X=" + Str(X)

End If


If D > 0 Then

X1 = (-b - Sqr(D)) / (2 * a)

X2 = (-b + Sqr(D)) / (2 * a)

Label4.Caption = "x1= " + Str(X1) + Chr(13) + "x2= " + Str(X2) End If

End Sub

Программада берілген бірнеше пунктің ішінен екі түрлі жолмен жүзеге асыруға болады: жалауша және ауыстырып-қосқыш объектілері арқылы.



OptionButton (ауыстырғыш) компоненті жанындағы ауыстырғышты орнату арқылы пайдаланушыға ұсынылған мәліметтер топтамасы ішінен тек бір ғана пунктін таңдауына мүмкіндік береді. Негізгі оқиғасы – Click.

Value қасиеті – топтамадағы ауыстырғышты таңдау (қалыпты жағдайда True мәнін қабылдайды).



CheckBox (жалауша) компоненті пайдаланушыға ұсынылатын топтамалар ішінен бір немесе бірнеше пунктіні таңдауына мүмкіндік береді. Негізгі оқиғасы - Click. Бұл объектінің негізгі қасиеттері ауыстырғыш қасиеттерімен бірдей келеді.

Style - формада орналасқан жалаушаның сыртқы түрін басқаратын қасиет. Ол екі мән қабылдайды. Бұл қасиеттің қалыпты жағдайдағы мәні - Standard, жалаушаның таңдалғандығын кӛрсететін мән – Graphical.



OptionButton объектісінен айырмашылығы Value қасиетінің үш мән қабылдай алуында ғана.



Кҥйі

Value қасиетінің мәні

Unchecked (Сброшен)

0(vbUnchecked)

Checked (Установлен)

1(vbChecked)

Grayed (Недоступен)

2 (vbGrayed)

Ауыстырып-қосқыштарды кӛрнекі түрде біріктіру үшін Frame объектісін қолдануға болады.

Frame (Жақтау) объект ішіне басқа объектілерді топтастырып орналастыру үшін қолданылады. Негізгі оқиғасы – DragDrop. Frame объектісінің ішіне орналасқан объектілер топтасып, осы объектінің кейбір қасиеттерін қабылдап алады. Мысалы, бұл объектіні жылжытса, ішінде топтастырылған объектілер де бірге жылжиды. Сондай-ақ, Frame объектісінің кӛрінбейтін етіп қойса немесе ӛшіріп қойса, онда ішіндегі объектілерде кӛрінбейді немесе ӛшіп қалады.

Frame объектісінің ішіне кӛбінесе OptionButton, CheckBox объектілерін орналастырады. Әсіресе жақтау ішінде ауыстырғыштарды жиі орналастырып, қосымша орындалғанда оның біреуін орнатса, онда қалған ауыстырғыштар автоматты түрде ажыратылып қалады. Сондықтан, әртүрлі мақсаттарда қолданылатын ауыстырғыштарды бӛлек-бӛлек топтастырып, әрқайсысын әр жақтау ішіне орналастырады.

Frame объектісінің негізгі қасиеттері ретінде Caption, Enabled, Name,Visible қасиеттерін атап ӛтуге болады.

Ескерту: Frame объектісі соңынан қойылса, оның арғы жағындағы объектілерді кӛрсету үшін жанама мәзірден Send To Back командасын орындау керек.



Мысал 2: Жазуды қалың не курсив шрифтімен шығару жобасын құру.

  • Visual Basic ортасын ашып, жаңадан жоба құрыңыз.

  • Формаға келесі элементтерді орналастырыңыз және қасиеттерін ӛзгертіңіз:






Достарыңызбен бөлісу:
1   ...   4   5   6   7   8   9   10   11   12




©emirsaba.org 2024
әкімшілігінің қараңыз

    Басты бет