Visual Basic программалау ортасы туралы

КІРІСПЕ
І ТАРАУ. VISUAL BASIC ПРОГРАММАЛАУ ОРТАСЫ
1.1. Орта.
1.2 Программалық код терезесі. Оқиғалар
1.3. Таймер
ІІ ТАРАУ. ПРОГРАММАЛАУ ЭЛЕМЕНТТЕРІ
2.1. Берілгендер типтері. Айнымалылар.
Стандартты функциялар.
2.2. Цикл. Циклден ерте шығу
2.3. EXE . Файл құру
ІІІ ТАРАУ. МӘЗІР ҚҰРУ. ФОРМАЛАРМЕН ЖҰМЫС
3.1. Мәзір құру және онымен жұмыс
3.2. Мәзір пункттерін орындайтын жылдам клавиштер тағайындау
3.3 Көп құжатты (MDI) формалар
IV ТАРАУ. МОДУЛЬДІК ПРОЦЕДУРАЛАР
4.1. Function типті модульдік функция құру
4.2. Sub типті модульдік процедура кұру

Қорытынды

Пайдаланған әдебиеттер
Бүгінгі Visual Basic – C++, Delphi сияқты дамытылған, визуальды программалау жүйесі. VB құрамында бірнеше жүз кілттік сөздер бар, олар түрлі операторлар (нұсқаулар, командалар), стандартты функциялар және арнайы символдармен толықтырылған. Пайдаланушылар олардың көбін қолдана бермейді де.
Visual Basic’ тің толық нұсқасы және программалау ортасының ықшамдалған нұсқасы Microsoft Visual for Application (қолданбалы Визуал Бейсик) атымен Microsoft Word, Excel, Access және т.б. қосымшалар құрамына кірістірілген.
Диплом жұмысы кіріспе бөлімнен, бес тараудан және қорытынды бөлімнен тұрады.
Бірінші тарауда Visual Basic ортасы және олармен жұмыс істеу тәсілдері таныстырылған. Екінші тарауға Visual Basic- те пайдаланылатын негізгі берілгендер типтері, айнымалылар және программалау құрылымдары енгізіліп, олармен жұмыс істеу тәсілдері көрсетілген.
Үшінші және төртінші тарауларда редактор мәзірін дайындау, калькулятор, сұхбаттық терезелер құру, Visual Basic ортасында жұмыс істеуге болатын түрлі қосымшаларды кірістіру, модульдік процедуралар дайындау және т.б. тәсілдер көрсетіліп, түрлі интерфейстер құрылған.
Бесінші тарауға VB’те берілгендер қорымен жұмыс элементтері енгізілген.
        
        МАЗМҰНЫ
КІРІСПЕ
І ТАРАУ. VISUAL BASIC ПРОГРАММАЛАУ ОРТАСЫ
1.1. Орта.
1.2 Программалық код терезесі. Оқиғалар
1.3. Таймер
ІІ ТАРАУ. ПРОГРАММАЛАУ ЭЛЕМЕНТТЕРІ
2.1. Берілгендер типтері. Айнымалылар.
Стандартты функциялар.
2.2. Цикл. ... ерте ... EXE – Файл ... ... ... ... ФОРМАЛАРМЕН ЖҰМЫС
3.1. Мәзір құру және онымен жұмыс
3.2. Мәзір пункттерін ... ... ... ... Көп ... (MDI) ... ... МОДУЛЬДІК ПРОЦЕДУРАЛАР
4.1. Function типті модульдік функция құру
4.2. Sub ... ... ... ... әдебиеттер
КІРІСПЕ
Бүгінгі Visual Basic – C++, Delphi ... ... ... ... VB құрамында бірнеше жүз ... ... бар, ... операторлар (нұсқаулар, командалар), стандартты функциялар және
арнайы символдармен толықтырылған. Пайдаланушылар ... ... ... де.
Visual Basic’ тің толық нұсқасы және программалау ортасының ықшамдалған
нұсқасы Microsoft Visual for Application (қолданбалы Визуал Бейсик) ... Word, Excel, Access және т.б. ... ... ... ... ... ... бес тараудан және қорытынды бөлімнен
тұрады.
Бірінші тарауда Visual Basic ... және ... ... ... тәсілдері
таныстырылған. Екінші тарауға Visual Basic- те ... ... ... ... және ... ... енгізіліп,
олармен жұмыс істеу тәсілдері көрсетілген.
Үшінші және төртінші тарауларда редактор мәзірін дайындау, калькулятор,
сұхбаттық терезелер құру, Visual Basic ... ... ... ... ... ... ... процедуралар дайындау және т.б.
тәсілдер көрсетіліп, түрлі интерфейстер құрылған.
Бесінші ... ... ... ... жұмыс элементтері енгізілген.
І ТАРАУ. VISUAL BASIC ПРОГРАММАЛАУ ОРТАСЫ
1.1. Орта.
Visual Basic (VB) ... ... ... орнатылған соң оны
іске қосу Windows терезесі арқылы әдеттегідей ... ... Visual Basic 5.0. Бұл ... Project ... ... программасы іске қосылады да, экранда Microsoft Visual
Basic, оның ... ... ... New Project ... ... терезесі көрінеді (1.1-сурет). Терезеге үш қосымша ... New ... Existing ... Resent ... ... Жаңа ... терезесі.
New бетіне енгізілген проект типтері:
- Standart.EXE (стандартты ехе-файл);
- VB Application Wizard (Қолданбалы VB шебері);
- Add-In ... ... ... Web – ... құруға мүмкіндік туғызатын ActiveX файдары,
т.б.
Бұрын не жақында ... ... ... не ... қосымша
беттерінің бірінен іске қосуға болады, (проект – ... ... ... ... тағы ... ... пайдаланылатынын көрсететін
терезесі бар арнайы файл. Программа проект ішінде ... ... ашу үшін New Project ... орналастырылған Standart
EXE белгішесін таңдап, Ашу (Открыть) түймесін шерту жеткілікті. ... ... бар, ... (Жетілдірудің) біртұтас ортасы
(IDE, Integrated Development ... не Visual Basic ... деп ... ... ... ... ... Орта деп атайды (1.2-
сурет). Егер компоненттердің кейбірі көрінбесе, оларды арнайы ... ... қиын ... ... ... ... ... негізгі мәзір (Menu);
2- аспаптар панелі (Toolbar);
3- проект терезесі (Project ... ... ... (Form ... қасиеттер терезесі (Proporties);
6- элементтер панелі (Toolbox);
7- форма конструкторы (Project Container);
[design] – ... ... ... (ол Project 1 ... ... (тез, ... орындау) терезесін шығару да мүмкін,
оған қосымша ортада форма макетін (Form Layout Window) ... ... ... ... ... ... панелінде соңғысын қосуға
арналған арнайы түйме де бар.
Панельдер мен терезелерді жылжыту не формасын өзгерту ... ... ... ... ... ... Егер терезенің шекарасы
басқа терезенің шекарасымен біріктірілетіндей етіп ... ол ... ... ... ... ... терезелерді кеңейту, олармен
жұмыс істеу қиын емес.
Visual Basic – бірнеше ... ... ... ... ... ... ... орындалады. Ортада жұмыс істеу командалары мәзірлерге
енгізілген. ... ... ... ... ... ... ... орналастырылған.
Стандартты түймелер:
- Standart.exe типті проектіні іске қосу (Add Standart EXE Project);
- ... қосу (Add ... ... ашу (Open ... Проектіні сақтау (Save Project);
- Көшіру (Copy);
- Кірістіру (Paste);
- ... ... ... (Project ... Қасиеттер терезесін шығару (Proporties Window);
- Программаны іске қосу (Start);
- Программа жұмысын аяқтау (End);
- ... ... (Menu ... ... панелі (Toolbox), т.б.
Проект. Проект терезесі
Visual Basic - қосымшалар құруға арналған күрделі программа. Онда жиі
қолданылатын компоненттер (сыңарлар): ... ... ... элементтері,
модуль және т.б.
Проект (Project) – ... ... ... ... мен ... панелі пайдаланылатынын көрсететін арнайы файл.
Қосымша құрайтын барлық объектілер проект арқылы басқарылады және ... ... үшін Project ... ... ... ... ... шамалас (1.3-сурет). Оған енгізілген проект, форма
бумаларын ашуға не ... ... Ол үшін ... ... ауыстырып
қосқыш белгілерін шертсе болғаны.
1.3-сурет. Проект терезесі
1 - View Code түймесі;
2 - View Object ... - ... ... ... ... белгішесін ашу жабу / түймесі
(Toggle Forders).
View Code түймесі шертілген кезде, программа жазылатын (не ... Basic ... ... ... Оны ... код ... деп
не қысқаша код терезесі деп атайды.
Форманы экранға шығарудың бір әдесі – View Object түймесін шерту.
Проект ... ... ... проект пен форма, олардан соң
жақшалар ... Visual ... ... ... ... ... қойылады. Алғашқы рет меншіктелетін атаулар: Project1, Form1. Форма
дайындалып, форма мен проект жаңа атаулар бойынша ... ... олар ... өзгертіліп қойылады.
Кейде проект терезесі экранда көрінбеуі де мүмкін. Оны ашу үшін View ... Explorer ... беру ... ... ... ... соң оны ... керек. Жаңа проектіні ашу
командасы: File – New Project.
Форма. Пайдаланушы интерфейсі.
Форма – интерфейс құру үшін ... ... ... ... ... Ол ... ... терезесінің ішінде
орналастырулы тұрады.
Информатикада ... деп ... жүйе ... ... ... арасындағы информацияны алмастыру құралдары мен оларда ... ... ... (interface - ілесу, түйістіру). Visual Basic’
те пайдаланушы интерфейсі - форма және программа құру үшін онда ... ... ... ... ... не оған орнатылған элементке сәйкес
орындалатын программа бөлігі де пайдаланушы ... ... ... ... ең ... ... Үлкен қосымша үшін оны
арнайы ұжымдар дайындайды.
Форма және онда орнатылған элементтер объектілер (нысандар) делінеді.
Обьектілер арқылы ... ... ... Visual ... жоғарғы талап
бойынша жұмыс істеуінің негізгі ерекшелігі.
Visual Basic ортасы іске қосылған кезде, ... ... ... ... ... Оны тандап, оңға не төмен қарай кеңейту қиын емес.
Форма және оған ... ... өз ... бар. ... ... ... ... (Қасіеттер) терезесінде көрінеді.
Экранда форма көрінбесе, оны ... ... ... – Object не Shift + F7
командаларының бірін беру керек (Project терезесінің сәйкес түймесін не
Form1 қатарын екі рет ... де ... ... Form1 терезесіне қосымша Form2 терезесін шығару ... Ол ... – Add ... беру ... «Add Form» ... ... ... Ашу түймесі
шертілген кезде, жаңа ... ... ... Project1 ... ... кірістіріліп қойылады. Form1 терезесін қайта ... ... бір ... ... терезесі
Қасиет (сипаттама) – айнымалылардың ерекше ... Ол ... ... ... ... ... ... қасиеттер
объектінің ағымдық күйін анықтайды, мысалы: объектіге атау ... ... ... үстіне мәтін жазу, жазылатын мәтіннің шрифті мен өлшемін
өзгерту, т.б. Олар ... ... ... не ... мән беру (меншіктеу)
делінеді. Әр объектінің қасиеттер терезесі бар. ... сол жақ ... ... ... оң ... ... ... жазылып қойылған.
Мысалы, форманың қасиеттері 1.4-суретте көрсетілген.
1.4-сурет. Форма қасиеттері терезесі
Ондағы:
Name (атау) – объект атауы. Ол – Visual Basic ... ең ... ... VB жұмыс істеуі кезінде объектіні осы атау ... ... ... ... ... түрде берілген атауын (Form1)
өзгертіп, басқа атау беруге болады. Форманың іс - әрекеті ... ... үшін ... мазмұнға сай етіп енгізіп, алдына frm (form) ... ... ... жөн, ... форма квадрат теңдеуді шешуге
пайдаланылатын ... ... ... ... ... атауын енгізу. Ол
үшін қасиет атын (Name) тандап, мәнін (Form1) екі рет шерту керек. Курсор
мән ... ... ... ... Del ... ... өшіріп, жаңа
мәнді клавиатура арқылы теріп алса болғаны.
Ескерту. Қасиеттің автоматты ... ... ... ... болуы да
ықтимал. Бұл кезде мәндер жолының оң ... ... ... ... Оны ашып, көрінген тізімнен қажеттісін тандау керек.
Borderstyle ... ... ... ... жиек ... ... оның оң жағындағы тілсызық түймесін шертіп, тізімді ... соң ... мәні ... ... ... өзгертуге болады (size - өлшем), 0-
None мәні орнатылса, форма өлшемін өзгерту мүмкін емес (none – ешқандай).
Caption (Тақырып, ... ... - ... терезесінің тақырыбына
енгізілетін мәтінді орнату қасиеті. Алғашқы кезде ... ... үшін Form1 сөзі ... ... Оны ... не ... ... қиын емес. Бұл кезде форма ... да осы ... ... мәні ... соң КҚ ... ... қойған жөн.)
Font қасиеті екі рет шертілген кезде формада пайдалануға болатын
әдеттегідей Шрифт терезесі көрінеді ... ... ... ... ... оның ... мен өлшемін тандап, ОК түймесін
шерту жеткілікті. (Шрифті Caption ... мән ... ... тандау
керек).
Window State қасиетінің мәні үшін 2 – maximized ... ... ... ... ... ол толық экрандық етіледі. т.б.
Объект қасиетін іске қосу режимінде программалық код ... ... ... бір ... ... ... ... үшін оны қасиеттер
терезесінде тандап, F1 клавишін басу арқылы анықтаманы шақыру ... ... ... ... ... қойылған. Ол түсініксіз болса, экранда
орысша аудармасын көрсететін «Сократ 97» ... ... ... (Мұндай программа компьютерге орнатылса, оны пайдалану қиын емес).
Экранда қасиеттер терезесі көрінбесе, оны шығару үшін View – ... ... беру ... ... оң ... ... ... экранда контексті мәзір
көрінеді. Оның Proporties қатарын таңдап, объектінің қасиеттер терезесін
ашу да мүмкін.
Қасиеттер терезесі тақырыбының ... ... ... тілсызық
түймесін шертіп, объектілер тізімін шығаруға да болады.
Элементтер панелі
VB қосымшалары көбінесе ... ... ... ... ... ... негізінде дайындалады. Басқару элементтерін орнататын
түймелер элементтер панеліне орналастырып қойылған ... ... ... арқылы формада сәйкес объектіні қалаған форматта орнату
қиын емес (элементтер панелі Access’тегіге шамалас). Түймені екі рет ... ... Бұл ... ... ... түрде формаға орналастырылады. Оны
таңдау, әдеттегідей масштабтау, жылжыту не өшіруге болады.
Элементтер панеліне стандартты емес басқа ... де ... ... ... DBGrid элементін орнату тәсілі 5.4-тақырыпта
көрсетілген).
Панель түймелерінің ... ... Caption, Cancel, Default, Enabled, Visible, т.б. Әр ... объект формаға орнатылып, таңдалған кезде қасиеттер терезесінде
көрінеді. Name-ге енгізілген атау бойынша VB бір ... ... ... Caption ... ... ... ... ішіне
жазылатын мәтінді анықтайды. Enabled, Visible қасиеттері объектіге қол
жеткізуді ... үшін ... Егер Enabled мәні ... тең ... ... ... қалады, Visible мәні False болса, объект экранда
көрінбейді, т.с.с. (Enabled-қосылу, Visible-көріну).
1.6-сурет. Элементтер панелі
1-көрсеткіш (Pointer)
2-графикалық өріс (Picture Box-сурет ... жазу ... ... өріс (TextBox)
5-рамка (Frame)
6-командалық түйме (CommandButton)
7-жалауша (CheckBox)
8-ауыстырып қосқыш (OptionButton)
9-құрастырылған өріс (ComboBox)
10-тізім (ListBox)
11-жатық айналдыру ... ... ... ... ... ... ... (DriveListBox)
15-каталогтар тізімі (DirListBox)
16-файлдар тізімі (FileListBox)
17-фигура (Shape)
18-сызық (Line)
19-сурет ... ... ... ... ... ... код ... Оқиғалар
Visual Basic – те программа дайындалатын арнайы терезе бар. Оны ... деп ... ... ... ... бірі ... ашу
мүмкін:
1. View – Code командасын беру;
2. Проект ... View Code ... ... F7 клавишін басу;
4. Форма терезесінен басқару объектісін екі рет шерту. Форманы екі ... ... код ... ... де ... оған ... ... енгізіліп қойылады.
1.7-сурет. Код терезесі
Терезеде:
- Project- Form1 (Code) – ... ... Form ... ... ... ... ... атаулары тізімі жазылып қойылады. Тізімді ашып
көру үшін тілсызық түймесін шертсе болғаны.
- Load (Жүктеу) жазылған оң ... ... ... ... оқиғалар тізімі енгізіледі (мысалы,
формаға қатысты 30-дан аса оқиғалар ... ... ... ... End Sub ... ... ... процедура моделі (үлгісі) жазылып қойылған. Оның
тақырыбы:
|Private |Sub ... |
|( |( | ( |
| | |( ( |
|1 |2 | 3 |
| | |4 5 |
1- Private: ... тек бір ... ... ... етіп
жариялау (Private - өзіндік, жабық).
Процедураны бірнеше формаларда пайдаланатындай етіп жариялау да
мүмкін. Ол үшін Private ... Public ... ... ... ... (Public – ... программаны процедура түрінде жариялау (Subroutine – қосалқы,
процедура);
3- объект аты ... ... ... аты ... ішіне айнымалылар (параметрлер) сипаттамалары жазылатын жақшалар
(параметрлерді сипаттау қажет ... олар ... ... ... сызу ... ( _ ) ... бөлініп жазылатын Form_Load – процедура
атауы деп аталады. Атау қайсы объект оқиғасы өңделетінін білдіреді. (Жалпы,
VB әр ... ... ... ... өңдеуді бейнелейтін атауды енгізіп
қояды).
Процедура модулі ішіне оқиғаны ... ... ... ... тиіс. Әр жол теріліп болған сайын КҚ (каретканы ... ... басу ... не ... төмен ( ( ) клавишін басуға да болады.
Жалпы, код терезесіне жазылатын процедураны оқиғаны өңдеуіш, ... ... не ... код деп ... Код ... ... ... жолында айнымалылардың сипатталуын тексеретін Option Explicit
операторы көрінуі де мүмкін. Айнымалы сипатталмаған болса, ол ... ... ... Visual ... ... ... ... Мысалы, пайдаланушы программа құру үшін алдымен формаға ... ... не ... ... ... тышқан арқылы шертуі
не мәзірді таңдауы мүмкін. Оның әр іс - ... ... ... ... ... ... ... пайда болатын нәрсе. VB’те әр оқиғаға
атау беріліп қойылған. Мысалы, элементтер панелінің CommandButton түймесі
арқылы формада ... Command1 ... ... шерту Click (Басу)
оқиғасын шақырады. Оқиға тек пайдаланушының іс - әрекеті арқылы шақырылмауы
да ықтимал. Мысалы, жүйе ... ... бір ... ... ... өндіріледі.
Әр объектіге байланысты оқиғалар бірнеше болуы да мүмкін. Мысалы,
формаға байланысты оқиғалардың 30-дан асатыны ... ... ... ... Down ... түймесін басу);
Paint (кескіндеу);
KeyPress (клавишті басу), т.б.
Таңдалған объектінің оқиғалар тізімі код терезесінің оң бөлігінде
көрінетін өрістің ... ... ... ... ... құру. InputBox,
MsgBox функциялары. Print операторы
Visual Basic’те айнымалы мәнін ... ... үшін ... Input ... ... жоқ. Оның ... стандартты
сұхбаттық терезесі және онда мән ... ... бар InputBox ... ... қолданылады. Программада функцияны мынадай түрде жазуға
болады:
< Атау > = InputBox (< атау > [ , “ < ... > “ ] ... < атау > - ... ... ... ... ... мәтін > - InputBox функциясы терезесінің тақырып қатарына жазылатын
символдар тізбегі;
Квадрат жақшалар ([, ]) – олардың ішіне ешнәрсе ... ... ... MsgBox ... ... ... терезесінде не формада
шығару мүмкін (message – мәліметтер ... MsgBox ... ... ... ... ... ( < атау> ) [, , “ < мәтін > “ ... ... ... бір ... бос ... ... нөмірін
жазуға не жазбай бос тастап кетуге болады.
Ескерту. ... MsgBox ... ... ... ... жазу ... ... InputBox “ < мәтін > “ ; MsgBox “ < мәтін > “
Бұлардың біріншісі енгізу ... ... мән ... ... жағында көрсетілген орынға мәтінді енгізіп қояды. Екіншісі ... ... ... ... ... х=4,6 үшін у=3х+5 ... мәнін табу керек.
Есепті Load оқиғасын және InputBox, MsgBox ... ... ... ... ... ... екі рет шерту (F7 клавишін басуға ... ... ... процедура моделі енгізілген код
терезесі көрінеді.
2. Процедура денесін енгізу:
Private Sub Form_Load( )
Dim X As Single, Y As ... (x, ... : MsgBox (y), , ... ... массивтер ғана DIM операторы арқылы сипатталатын. ... ... ... ... ... айнымалыларды DIM арқылы ... Іске қосу ... ... Ол үшін ... ... Start
(Бастау) түймесін шерту, Run-Start командасын беруге не F5
клавишін басуға болады. Х мәні ... InputBox ... ... (1.8-сурет). Терезенің тақырыбында көрінген
“Х=” жазуы – мәтіндік символдар тізбегі.
4. Терезенің төменінде көрінген мән ... ... Х ... ... ОК ... ... (не КҚ ... басуға да болады.)
1.8-сурет. Енгізу терезесі.
Ескерту. Шығару терезесіне ... ... ... ... IBM ... ... ... әдеттегідей үтір (,) таңбасын қою керек.
Программа денесіне MsgBox ... ... ... ... ... MsgBox ... терезесі шығады. (1.9-сурет).
5. Терезенің ОК түймесін шерту. MsgBox терезесі жабылып, экранда
форма көрінеді.
6. Программадан шығу үшін Run-End ... ... ... ... ... ... End (соңы) түймесін шерту. Visual Basic
бастапқы режимге қайтып оралады.
Ескерту. Процедура денесіне x=InputBox(x) командасының орнына меншіктеу
командасын (х=4.6) енгізу де ... ... ... сан нүкте (.) арқылы
бөлініп енгізілуі тиіс (х=4.6).
1.9-сурет. Шығару терезесі.
Шығару терезесін пайдаланбай, нәтижелік мәнді форма терезесіне шығаруға
болады. Ол үшін:
1. форманы ... ... ... ... оның ... Enabled ... қасиеттерінің мәнін True
(Ақиқат) ету;
2. процедура денесіне енгізілген MsgBox ... ... ... ... ... Print “y=”; y.
InputBox функциясы арқылы енгізілген аргумент мәнін де ... ... Ол үшін ... ... орнатып, процедура ішінде
InputBox-ты меншіктеу командасынан соң Print “x=”; x операторын ... ... ... ... басып шығару үшін де
пайдаланылады. Берілетін команда:
Printer. Print
Мұндағы Print – ... ... ...... ... - программалық кодқа енгізілген бір қатарлық мәтін.
Printer объектісінің басып шығару параметрлерін орнататын қасиеттер
терезесі жоқ. Оның әр ... ... ... ... ... Мысалы:
a1$, a2$ айнымалыларының мәндері болатын мәтіндерді 14 пиксельдік шрифпен
басу ... ... ... да ... ... a2$
Ескерту. 1. Printer объектісінің қасиеттері мен командалары VB’тің
анықтама жүйесіне енгізілген (Print ... ... ... ... ... ... FontSize ... екі
команда арқылы жазу да мүмкін (Font.Size).
3. File-Print командасы терезеге енгізілген программаны ... ... Ал Іске қосу (F5), одан әрі End ... берілсе, тек
мәтіндер басылып шығады.
4. Код терезесіне ... ... ... ... ... мүмкін.
5. Программада айнымалыларды кіші не бас әріппен енгізудің айырмашылығы
жоқ. Оны редактордың өзі кіші әріпке ... ... ... ... жаңа код ... процедура моделі
жазылмайды, процедура тақырыбын қолдан теріп алу керек.
Есепті пайдаланушы интерфейсін құрып ... ... ... ... ... ... – VB жүйесімен
жұмыс істеуде орындалуы тиіс интерфейс ... Бұл үшін ... ... ... ала ... код ... осы ... арналған
процедуралар құру керек. Осыған сәйкес, ... ... ... ... ... ... ... жөн:
1. Орталықты ашып, көрінген ... ... ... ... ... Ол ... ... таңдау. Форма қасиеттері терезесі көрінеді;
- терезенің Font қасиетін екі рет ... ... ... ... ... ... таңдау және өлшемін 14 ету;
- Caption қасиетінің мәні үшін Form1 ... ... ... ... Элементтер панелінің Label түймесін шертіп, көрсеткіш арқылы
форманың жоғарғы ... Label1, Label2 ... ... ... ... ... х, ... мәндерін жазуды жоспарлау. Мысалы: форманың
Label1 объектісіне Z айнымалысының ... жазу (Caption ... ... меншіктеу командасы арқылы орындалады.
(Яғни, объект қасиетін программаға енгізілген команда ... да ... ... іске қосу ... ... Элементтер панелінің CommandButton ... ... ... қатарына командалық Command1, Command2 объектілерін
(басқару элементтерін) орнату (1.10-сурет). Оларды программаны
іске қосу және ... ... ... ... ... (Label1, Label2, Command1, Command2 – Label,
CommandButton түймелері арқылы ... ... ... ... берген атаулары). Формаға орнатылған объектілер
форма сыңарлары (компоненттері) делінеді.
4. Command1 түймесін таңдау. Оның қасиеттері Proporties терезесінде
көрінеді. Оның Font ... TimesKaz ... ... ... Қосу ... ... сөзін енгізу. Ол Command1 элементінің
үстіне жазылып қойылады.
5. Осы сияқты, Command2 түймесінің Caption ... End ... ... ... ... ... ... код құру:
- Қосу объектісін екі рет шерту. Код терезесі ашылып,
онда Command1_Click атаулы процедура ... ... ... ... ... ... ... атау берілгенімен процедура тақырыбына VB өзі
меншіктеген (Name қасиетіне жазылған) атауды жазып
қояды, мысалы, Қосу ... - ... ... Name қасиетіне өзі таңдаған атауды
енгізсе, Command1 орнына осы атау жазылып қойылады).
- Оның ... ... ... Sub ... x As Single, y As ... = ... "x="): Label1.Caption = x
y = 3 * x + 5: Label2.Caption = y
End Sub
7. End басқару ... ... ... ... Ол үшін ... жабу ... ... не проект терезесінің Form1
бумасын екі рет ... ... ... ашу және ... ... екі рет ... керек. Код терезесі ашылып, алдыңғы
құрылған ... ... жаңа ... моделі көрінеді.
Оған End операторын енгізу:
Private Sub Command2_Click()
End
End ... Іске қосу ... беру (F5). InputBox ... ... ... ... ... ОК түймесін шерту. Мәндер енгізілген форма
терезесі көрінеді. (1.11-сурет).
1.11-сурет. ... ... ... ... End ... ... ... жұмысы аяқталып, код
терезесі қайта көрінеді.
Ескерту. Формада тек Label1 объектісін орнатып, оны У ... ... Сол ... формады End командасына арналған Command2 басқару
элементін орнатпау да мүмкін. бұл кезде программа жұмысын тоқтату командасы
аспаптар панелінің End түймесін шерту не Run-End ... ... ... ... ашу.
Проектіні дайындап болғаннан соң форманы File-Save Form As… командасы
арқылы сақтап қою керек. Сақтау үшін ... бума ... ... ол ... ... ... ... пайдаланушы VB терезесінде жаңа бума ... ... ... жөн. ол оны ... ... ... Жаңа ... тәсілі:
- сақтау сұралатын терезенің Жаңа бума құру түймесін шерту. ... ... ... ... ... бума атын ... Буманы екі рет шертіп, ашу.
- Терезенің Файл атауы өрісіне форма атын ... ... ... шерту.
Форма frm кеңейтілуі бойынша сақталады да, проект аты сұралатын терезе
көрінеді.
- Файл атауы өрісіне проект атын енгізіп, Сақтау ... ... ... vbp ... ... ... ... проект ішінде бірнеше форма құрылған болса, проект аты сұралатын
терезе шықпауы да мүмкін. ол ... ... ... формаларды сақтау, одан
әрі File-Save Project As… командасын беру керек.
Ескерту. Қосымшаның барлық бөліктері ... ... ... алдымен форманы, одан соң проектіні сақтаған жөн. форма мен
проектіні ... атау ... ... да ... ... ... Бірақ форманы басқа проектілерде де пайдалану мүмкін. ... ... атау ... ... ... ... берілген соң проект терезесінде жақшалар ішінде
жазылған (VB алғашқы рет ... ... ... жаңа ... ... проектіні ашу үшін File-Open Project командасын беру ... ... ... ... ... ... ... екі рет шертсе
болғаны.
Формада фигуралар салу.
Код терезесінде арнайы операторлар арқылы графикалық кескіндер ... ... ... ... пайдаланып, түрлі суреттер сызуға болатын
процедуралар құруға болады.
Мысал. Формаға ақ түсті шеңбер және қызыл ... тік ... ... ... ... ... екі рет ... Ашылған код терезесінен форма оқиғалары тізімін ашып ... оң жақ ... ... ... ... ... кезде
көрінеді), Paint (кескіндеу) оқиғасын таңдау.
3. Көрінген Form_Paint атаулы процедура моделін толтыру:
Private Sub Form_Paint()
ScaleMode = ... (180, 100), 60, RGB(255, 255, ... (10, ... 60), RGB(255, 0, 0), ... ... Іске қосу ... беру (F5).
Процедураның орындалу нәтижесі 1.13-суретте көрсетілген.
1.13-сурет. Формаға ... ... ... және онда ... ... өлшемі пиксель арқылы
есептеледі. Ал, ... ... салу ... ... үшін ... бірлік өлшемі үшін пиксельдің 1/20 ... ... твип ... ... ... процедурада масштаб (ScaleMode) пунктке
ауыстырылды (оны пиксельге ауыстыру үшін масштабты 3 – ке тең етіп ... ... Circle ... Line ... – Бейсиктегідей
операторлар, айырмашылығы – түс ... ... ... ... – RGB
(EGA, VGA типті бейнеадаптерлі ... ... ... қоспасы).
Түстер мәндері (кодтар) 0....255 ... ... ... сандардан
алынады: ақ түс – (255, 255, 255), қара түс – (0, 0, 0), ашық ... түс ... 0, 0), ... (Жалпы, фигура түсін орнату коды: RGB (қызыл, жасыл,
көк).)
Форма бетінде көрсеткіш арқылы қисық сызық сызу да ... Ол ... екі рет ... код терезесін ашқан соң оқиға типтерінің тізімінен
MouseMove (Тышқанды қозғалту) оқиғасын тандау керек. Терезеде көрінген осы
оқиға процедурасы ... Button = 1 ... – (x, ... ... ... ... (х, у - көрсеткіш ... ... ... іске ... соң (F5) тышқанның сол жақ түймесін басып,
көрсеткіш ... кез ... ... сызықты фигураны сыза беруге болады
(Button1=1 тышқанның сол түймесін, Button = 2 оң ... басу ... рет ... ... кезде, форманың сол жақ жоғарғы бұрышынан
көрсеткіш орнатылған нүктеге дейін түзу сызық кесіндісі ... ... ... ... жеке ... ... сызу мүмкін емес. Ол үшін
форманы екі рет шертіп, ашылған код терезесінен MouseDown (Тышқанды басу)
оқығасын тандау керек. Көрінген ... ... ... Pset (x, ... мен ... CurrentY ... енгізу жеткілікті (current
–ағымдық):
Private Sub Form _ MouseDown (Button As Integer, ... As Integer, X As Single, Y As ... = ... = ... = 2
Pset (x, y)
End Sub
Private Sub Form _ MouseMove (Button As Integer, _
Shift As Integer, X As Single, Y As ... Button = 1 ... – (x, ... ... ... Sub Form _ Paint ()
ScaleMode = 2 : DrawWidth = 2
Line (100, 30) – (150, ... ... іске ... ... (F5) VB ... ... ... Жүйе процедураларға инициалдау процедурасын және SaveX, SaveY
айнымалыларын ... ... ... қоюы ... ... VB ... рет
қосылып, программа іске қосылғанда көрінеді). Соңғылары жаңа ... үшін ... ... = 2 ... ... ... Х, У ... нүкте координаттары)).
Программа іске қосылған соң, форма терезесі көрінеді. Windows’тағы
стандартты Paint ... ... ... ... сызу ... ... ... арқылы онда кез келген фигураны сыза беруге болады
(мысалы, 1.14 – суреттегі сияқты. ... ... ... Line ... сызылған). Тек мұнда сызық бөлігін өшіру, фигураны жылжыту не
масштабтау мүмкін ... Ол үшін код ... ... ... ... ... Олар кітапта қарастырылмаған.
1.14-сурет. Көрсеткіш арқылы сурет салынған форма
1.14-суретте көрсетілген ... ... соң ... ... оны жад буферіне көшіріп, Word’тың ... ... ... (Edit – Paste). ... кескінді масштабтау не
жылжыту қиын емес.
Жоғарыда көрсетілген сияқты, ... ... код) ... ... мүмкін.
Ескерту. Процедуралардың тақырыптары астан сызу белгісі (_) арқылы
ажыратылып, екі қатарға жазулы. ... VB бір ... 1023 ... ... ... Бірақ олар экранда көрініп тұруы үшін әр қатарға 60 – 80
символ енгізіп, бірнеше қатарларға ... ... ... ... ... ... ... қатарға жазу үшін соңына бір символдық бос орын,
одан әрі ... сызу ... ... каретканы қайтару (КҚ, Енгізу)
клавишін басу ... ...... ... ... Windows ... сағатына қол
жеткізуге болатын көрінбейтін секөнт өлшеуіш объектісі. Жүріп ... ... ... ... болады:
1. Орталықты ашу.
2. Элементтер панелінің Timer (Таймер) түймесін ... ... ... ... Timer1 ... ... VB оны стандартты өлшемге
келтіріп қояды.
3. Label түймесі арқылы форма ... Label1 ... ... оны ... ... тандап, Properties терезесінде оның Caption қасиетіне
Clock (Сағат) мәнін енгізу. Ол форма тақырыбына ... ... Label1, Timer ... ... ... ... ... мән ... |Caption |Бос өріс |
| |Font ... |
| ... ... ... (орталықтан) |
|Timer1 |Enabled |True |
| ... ... |1000 |
6. ... орнатылған Таймер объектісін екі рет шертіп, код терезесіне
процедура енгізу:
Private Sub Timer1 _ Timer()
Label1.Caption = Time
End Sub
7. Терезені жауып, іске қосу (F5) ... ... ... орындау
режімінде формада көрінбейді де, Label1 өрісі ішінде жүріп тұрған
цифрлық сағат ... ... ... ... ... сағат
8. Программа жұмысын тоқтатып, форма мен проектіні сақтау. (Бұдан әрі
бүл команданы қысқаша проектіні сақтау деп ... Interval ... мәні үшін 1000 ... Ол әр секөнт
сайын жүйелік сағаттың ағымдық секөнтін көрсетеді (1сек = 1000 ... ... ... = Time ... іске ... ... ... жүйелік ағымдық уақытты оқып, оны Label1
объектісінің Caption қасиетіне меншіктейді (Label1 өрісіне жазады).
Time – Visual ... ... ... ... тоқтату үшін аспаптар панелінің End (Соңы) түймесін
шерту керек.
Ескерту. Формада ... ... код ... ... Print ... ... ... болады. Мұнда келесі уақыт келесі қатарға жазылады.
Сонымен, осының алдындағы мысалдарда Visual Basic’те орындалуы мүмкін
үш түрлі ... ... ... ... ... формада қолдан фигура
салу; формада жүріп тұрған сағатты ... ... ... ... ... ... орнатылған терезе құру, мәзірлермен жұмыс;
берілгендер қоры ... құру және т.б. ... құру ... ... өзі Visual ... мүмкіндіктерінің орасан зор
екеніне көз жеткізетіні сөзсіз.
Immediate терезесі.
VB орталығанда іске қосу командасы берілген кезде көрінетін Immediate
(Тез) ... ... бар ... Оны экранға шығару үшін View ... Window ... ... ... ... ... не ... деп те атайды.
1.16-сурет. Immediate терезесі
Терезеде әдеттегідей арифметикалық өрнек мәнін есептеу және ... ... ... ... ... Ол код ... құрылатын
программа үзіндісінің дұрыстығын тексеру үшін де қажет.
Мысалы:
1) ? 5.4+7/2 ... For k = 1 to 4: Print k+3 : Next ... For k = 1 to 1000 : Beep : Next ... әр Beep ... ... ... ... дыбыс естіледі
(Immediate терезесін басқа түрде пайдаланудың бір тәсілі 2.8 – ... ... ...... ... ... бар форма және формада орнатылған
элементтер объектілер деп аталатыны ескертілген болатын. Visual ... ... мен ... ... ... да ... ... бірінің ішіне бірі иерархиялық түрде енгізілуі мүмкін.
Мысалы, форма ішінде орнатылған элемент Windows бумасына енгізілген ... ... ... кері ... ... (\) ... ажыратылатыны
белгілі. VB’те объектілер иерархиясы да дәл ... ... тек ... ... ... (.) қойылады. Мысалы, қасиет орнату командасы
Form1.Command1.Font.Size=14
түрінде жазылуы мүмкін. Мұндағы иерархияның бірінші объектісі – форма
(Form1), екінші объект – ... ... Command1 ... ... объект
– түймеде пайдаланылатын шрифт (Font). Команда – осы ... ... ... айнымалысына 14 мәнін меншіктеу. Яғни, объектілер арасында
қойылатын нүкте кез келген ... ... ... ... қасиеттері, оқиғалары мен әдістері бар. Программа ішінде
объектінің ... ... әдіс деп ... Әдіс ... ... нүкте
арқылы ажыратылып жазылады:
.
Әр объектіге қолданылатын әдістер түрлі – түрлі. Форма әдістері:
Show, Hide, Unload, Cls, Circle, Move, т.б.
Мысалы, ... ... ... әдісі (командасы) - Form2-ні
экранда көрсету. Жалпы, объектіге берілген команда және ... ... деп ... Basic ... ... ... әсер етітін параметрлер Options ... ... ... ... Оны ашу үшін Tools ... ... беру ... Терезеге алты қосымша бет ... Options ... Editor ... ... Editor ... ... орнатылған жалаушалар:
- Auto Syntax Check (Қатені автоматты түрде тексеру);
- Require Variable Declaration (Айнымалыны жариялауды
талап етеу). Бұл ... ... ... VB код
терезесінің (General) (Declaration) бөліміне
айнымалыларды ... ... ... Option ... ... ... автоматты түрде кірістіріп қояды.
Жалауша орнатылмаған болса, оны қосып қойған ... ... ... Prompt To Save Changes ... ... жалаушасы орнатылған кезде қосымшаны іске қосу алдында VB проектіні
сақтауды ұсынатын сұхбаттық терезе шығарады, ... ... ... ... ... типтері. Айнымалылар.
Стандартты функциялар.
Visual Basic’те пайдаланылатын берілгендер типтері:
|Стандартты типтер ... ... ... (бүтін, %) |[-32768; 32767] аралығында ... ... ... &) |[-2147483648; 2147483647] ... ... |[0; 255] ... ... !) ... дәлдікті нақты (7 символ) ... ... #) |екі есе ... ... (15 ... ... ($, жол) ... саны [0; 65535] ... ... ... |жан-жақты (сандық, жолдық не ... |
| ... ... ... |True не False ... (ақшалық) |ақшалық сомалар ... ... ... ... ... объектіге сілтеме орнататын Objects (Объект) атаулы тип
те бар, ... ... ... бөлу үшін ... Dim не Static ... сиппатталады (dimension - өлшем, static – статикалық, қозғалмайтын).
Сипаттау үлгілері:
|Dim x% |Dim x As Integer ... y, z # |Dim y As Single, z As Double ... a$ |Static a As String ... Static ... ... бірі бір ... ішінде пайдаланылатын
айнымалылырды сипаттау кезінде жазылады. Олардың орнына Private кілттік
сөзін жазу да ... ... x As ... x as ... x as ... ... Static ... сипатталған айнымалының ағымдық
мәні процедура аяқталған кезде де сақталады; Dim, Private ... ... ... ... ... ... пайдалану үшін оны код
терезесінің (General) (Declaration) секциясында (бөлімінде) Public ... ... ... ... (Public ... ... алдымен Option
Explicit жазуы көрінуі мүмкін.
Ескерту. 1. Айнымалы атауы үшін кілттік сөздерден, кілттік символдар
мен бос орын және ... ... ... ... 255-ке ... ... символдар тізбегін алуға болады.
2. General / Declaration секциясы шығатын код терезесі форманы екі рет
шертпей, алғашқы рет View – Code ... ... ... ... ... жарияланған процедурамен тек бір формада, Public ... ... ... ... формаларында жұмыс істеу мүмкін (олар барлық
формаларда қолжетерлік).
Қарапайым программаларда сандық және жолдық айнымалыларды (х%, у, а$)
вариант типті етіп ... да ... ... ... Бұл кезде
айнымалылардың типтері көрсетілмей жазылады: Dim x, y, a.
Мысалы, процедурада айнымалылар вариантты типті етіп (Dim x, y) ... Оның ... жоқ. ... ... енгізілген вариант типті
айнымалының типін өзі ажырата алады. Бірақ күрделі ... ... ... бүтін типті айнымалылырды жолдық (символдық) деп қабылдауы
мүмкін. Сондықтан айнымалыларды сипаттауда олардың типтерін де ... ... жиі ... ... Const операторы арқылы
сипаттау да мүмкін (Const – ... ... ... үзіндісін мына
түрде жазуға болады:
Const pi = 3.1415926
R = 4.5 : h = 7
C = pi * r^2 * h
V = pi * r^3 * h / ... ... ... ... мен ... ... ... Бейсиктеғі сияқты:
+ (қосу); - (азайту); * ... / ... \ ... ^ ... Mod (қалдықты есептеу); $ ... ... Sin(x); Cos(x); Atn(x); Sqr(x); Exp(x); Int(x); Rnd(x); ... ...... мәнді жолдық типті ету;
Val (x) – цифрлармен берілген жолдық мәнді сандық типтіге алмастыру,
т.б.
Visual Basic’те құрылымдық программа құру үшін ... ... ... командасы
Тармақталу командасының құрылымдары:
1) If P Then S ... If P Then ... ... If P Then көп ... ... P2 ... P3 Then
S3
....................
End If
Мұндағы Р, Р1, Р2, Р3, ... - шарттар;
S, S1, S2, S3, … - блоктар (бір ... ... - көп ... ... ... ... командасының бірінші және екінші құрылымдары бірдей. Бірінші
құрылымды блокқа бір команда енгізілгенде ғана пайдалануға болады. Екінші
құрылым барлық ... ... ... ... ... ... ... теңдеуін шешу
керек.
1. VB орталығын ашу.
2. Форманы таңдап, Caption қасиетінің мәні үшін «Квадрат ... ... ... Label1, Label2, Label3, Label4, Label5 ... ... ... теңдеудің а коэффициентін, Label2’ге b коэффициентін,
Label3’ке бос мүшені (с), Label4’ке х1 ... ... х2 ... ... Caption ... ... ... ішіне енгізілген
жазуларды өшіріп тастауға болады.
4. Формаға Command1, Command2 басқару түймелерін орнату. Caption ... ... ... END ... ... Қосу (Command1) түймесін екі рет шертіп, ашылған код ... ... Sub ... Click ... a, b, c, d, x1, x2, x
а = InputBox (a, “a = “) : ... = a
b = InputBox (b, “b = “) : ... = b
c = InputBox (c, “c = “) : ... =c
d = b^2 – 4* a * c
If d > = 0 ... = (-b + sqr (d) ) / (2 * ... = (-b - sqr (d) ) / (2 * ... = x1 : ... = ... x = ... шешімі жоқ» : Label4.Caption = x
End If
End Sub
6. Форамны ашып, END түймесін екі рет шерту. Код ... Command2 ... ... ... ... көрінеді. Оның ішіне End операторын енгізу:
Private Sub Command2_ Click ()
End
End Sub
7. Проектіні сақтау.
8. Іске қосу ... беру (F5). ... ... ... Оның ... шерту.
9. Көрінген InputBox терезесіне ретімен а, b, c ... ... ... ... (КҚ ... басуға да болады).
2.1-сурет. 3х2 - 4х +1= 0 тендеуін шешуде
көрінген интерфейстік форма
a, b, c мәндері үшін 3, - 4, 1 ... ... ... көрінетін форма
2.1-сурете бейнеленген.
Ескерту. Алғашқы рет MsgBox терезесінде х1 мәні ... х2 ... ... үшін ОК түймесін шерту керек.
Мысал. Int, Rnd функцияларын пайдаланып, форма ... ... ... ... ... кіші кез ... ... сандарды шығару
керек. Егер оның біріншісінде 7 саны ... ... ... сөзі
енгізіліп, программа жұмысы тоқтатылсын.
1. Форма терезесіне Label1, Label2, Command1, Command2 ... Caption ... ... Label1, Label2 объектілерінің
ішіне жазылған сөздерді өшіріп тастау.
2. Command1, Command2 объектілерінің Caption ... ... ... ... ... ... құру:
Private Sub Command1 _ Click ()
Label1. Caption = Int (15*Rnd)
Label2. Caption = Int ... Label1. Caption = 7 ... Caption = ... ... ... Sub ... Sub
4. Іске қосу командасын беру (F5). Форма көрінеді.
5. Форманың Қосу түймесін ... ... ... Әр ... аяқталған
сайын Label1, Label2 өрістерінде 15-тен артық емес кез келген бүтін
сандар көрінеді.
6. Label1 өрісінде 7 көрінген кезде ... End ... ... ... аяқтау.
2.2-сурет. Кездейсоқ бүтін сан шығарылған форма.
Мысал. Тікұшақтың ағымдық жылдамдығын форма терезесінде көрсетіңіз.
Егер жылдамдық мөлшері 450-ге ... ... ... ... артық!»
ескертуі. MsgBox терезесіне шығарылсын.
1. Орталықты ашып, формада тік белдеуше (VscrollBar) және Label1 өрісін
орнату. Белдеушені барынша созу. ... ... ... редактор терезесінің белдеушесіндей емес. VB’те ол ... не ... үшін ... т.б.)
2. Объект қасиеттерін орнату:
|Объект ... |Мән ... |Name ... |
| |Caption ... ... ... |Name ... |
| |Max |100 ... |Name |lblMan |
| |Font ... 11 |
| |Caption ... ... |
3. Код ... ... оның (General) (Declaration) бөлімінде
айнымалыларды сипаттау және ... ... ... ... ... ... және тік белдеушені екі реттен шерткен
кезде көрінеді):
Option ... Gaz As Integer ... ... ... Const JJ = 430 ... ... Sub ... = 100 'Газ мэнін инициалдау
End Sub
Private Sub vscGazkors_Change()
Dim jld As Integer ... ... ... ... = 100 - vscGazkors.Value
'Газ мэні бойынша агымдык жылдамдыкты есептеу
jld = Gaz * 4.5
'Агымдык жылдамдыкты жанарту
lblMan.Caption = "Агымдык жылдамдык" & _
Trim$(Str$(jld))
If jld >= JJ ... ... ... ... ... ... If
End Sub
3. Проектіні сақтап іске қосу (F5).
Программаға ұшаққа газ беретін тұтқамен жұмыс істеу тәсілі енгізілген
(тұтқа баламасы – тік ... ... іске ... соң ... ... ... ... Көрсеткіш арқылы тік белдеушенің жылжыма
түймесін жоғары жылжытыңыз. Формада көрінген ағымдық ... ... ... ... енгізілген MsgBox терзесі көрінеді (2.3-сурет).
2.3-сурет. Жылдамдық көрсетілген форма
(Программаға енгізілген Trim$ - сандық мән ... етіп ... ... ... бос ... алып ... ... қысу операторы).
Таңдау командасы
2.2-тақырыпта берілген бірнеше шарт енгізілген таңдау командасын Select
Case операторын пайдаланып ... жөн. Оның ... ... ... Case ... m1: ... m2: S3
……………
End Select
Мұндағы m1, m2, ... – енгізілген сұрыптаушы айнымалы ... ... ... ... блок орындалады да, басқару таңдау
командасынан соңғы операторға ... Case m ... Case is = m ... жазу да ... ... ... таңдау командасы денесін төмендегідей жазуға
болады:
Case Is < m : S1
Case Is = m : ... Is > m : ... ... ... пайдаланып, Case ауыстырып қосқыш ... ... ... ... ... ... де ... Мысалы,
Case -5 То 1; Case 2 То 10; Case 11 То 15; …
Мысал.
функциясының мәнін ... ... құру ... Мән ... шығарылсын.
Private Sub Form_ Load ()
x= InputBox (x,”x=”)
Select Сase x
Case is 1: y=2*x^2-1: MsgBox(y), , ... ... ... ... ... тағы бір ... 3.8-тақырыпта берілген).
2.2. Цикл. Циклден ерте шығу
Циклдердің процедурада жазылу синтаксистері Qbasic’тегідей. For – Next
(үшін), While – wend (Әзірше) циклдерінің ... ... For k=k0 To k0 [Step H] ... P
S S
Next [k] ... ... ... бес ... ... Do while P
2. ... While P
3. Do until
4. ... until
5. Do
S
Loop ... ... ... S-цикл денесі; Р-шарт; - Емес Р;
While - әзірше; Wend - соңы; For - ... - ... Do - ... Loop - ... - ... ... ... мысалдарды шешуге арналған формаларға алдымен
басқару ... ... оны ... ... ... ... (End) үшін
пайдаланған жөн.
Мысал. Өлшемдері пиксельмен берілген, радиустары 15-ке тең ақ ... ... ... h=10 ... ... ... диагональдарында FOR –
NEXT циклі арқылы ... ... Ақ ... ... ... ... шеңбер
төменнен жоғары жылжытылсын.
Форманы екі рет шертіп, ашылған код терезесінде Form_Paint процедурасын
мынадай түрде құруға болады:
Private Sub Form Paint ... = ... r=1 To 360 Step ... k/2), 15, RGB(255, 255, 255)
Circle(k, 200 – k/2), 5, RGB(255,0, 0)
For j = 1 To 250000 : Next j
Cls
Next k
End ... j ... ішкі бос цикл ... ... ағымдық шеңберлерді
аз уақыт ұстап тұру, Cls – орындау кезінде формаға салынатын графикті не
мәтінде тазалау командалары.
FOR – NEXT ... ерте шығу үшін EXIT DO ... EXIT FOR ... болғаны.
Сандық массивтермен жұмыс
Бір атау арқылы байланыстырылған бір типті айнымалылар (не олардың
мәндерінің) жиынтығы ... деп ... ... ... ... ... тегі сияқты.
Мысал. Сандық массив құрып, оның минимумы мен максимумын табу керек.
Пайдаланушы интерфейсін құрып, мәндерді формада көрсету әдісі:
1. VB орталығын ашып, ... Label1, Label2, ... ... орнату. Label1 өрісіне минимумды, Label2-ге
максимумды енгізуді жоспарлау.
2. Command1, Command2 ... ... Caption ... END ... ... ... END объектілерін екі реттен шертіп, процедуралар құру:
Private Sub Command1 _Click ()
Static a(15) : Dim k, min, ... = InputBox (n, ... ... k = 1 To ... = InputBox (a(k), ... ... =”)
Next
Min = a(1) : max = a(1)
For k = 1 To n
If a(k) = max Then max = a(k)
Next
Label1.Caption = min : ... = ... ... Sub Command2_Click ()
End
End Sub
4. Процедураны сақтап, іске қосу.
2.3. EXE – Файл құру
VB’те құрылып, сақталынған файлды Windows жетекшісінде автомматты ... ... ... етіп ... ... ... Ол үшін ... сақтаған соң File – Make.exe командасын беру керек.
(Мұндағы - сақталған проектіге берілген ... Make Project ... ... ... ... Make Project терезесі
Сұхбаттық терезені жауып, Make Project терезесінің ОК түймесін шертсе
болғаны. (Терезенің Options ... ... ... ... ашылған
сұхбаттық терезеде версия нөмерін, қосымша ... және т.б ... – файл Windows ... ... ... ... Visual
Basic’ті іске қоспай ақ, оны осы терезеде іске қоса беру ... ... ... деп – Sub және End Sub ... ... қосалқы программаны, функция деп – Function және End Function
операторларының аралығында жазылатын қосалқы ... ... ... ... ... сияқты. Sub процедурасының шақыру командасында
нақты параметрлер жақшаларға алынбай жазылады (оларды жақшаларға ... ... ... алдына CALL (шақыру) кілттік сөзін жазу керек).
Мысал. Тікбұрышты үшбұрыштың катеттері белгілі: a=3.5, b=4.2. Процедура
және функция енгізілген программалар арқылы оның ... табу ... ... ... ... шешу ... Sub Form _Load ()
Dim a, b, c, p
a = 3.5 : b = ... a, b, c : p = a+ b ... , ... ... Pifagsub (a1, b1, ... = sqr (a1^2 + ... Sub
Ескерту. a1, b1, c1 формальды параметрлерін a, b, c ... ... жазу да ... ... ... ... шешу программасы:
Private Sub Form _Load ()
Dim a, b, p
a = 3.5 : b = ... = a+ b +c + ... (a, ... , “Периметр=”
End Sub
Function Pifagfunc (a1, b1)
Pifagfunc = sqr (a1^2 + b1^2)
End Function
VB бірінші программадағы Pifagsub a, b, c шақыру ... оқып ... b, c және ... a1, b1, c1 параметрлерінің типтері мен сандарының
сәйкестігін ... де, a1 := а, b1 := b ... ... Одан әрі ... ... ... ... с1 мәнін с
айнымалысына меншіктейді.
Екінші программаға қосалқы программа – функция ... ... ... ... командасы бойынша функция денесі ... ... мән ... командасының орнына қосылады.
Әр программаға осы сияқты процедуралар мен функцияларды қайта – қайта
енгізіп жатпау үшін VB-ке ... ... атау ... ... ... ... бөлігінде сақтап қою мүмкіндігі енгізілген. Программаларға
оларды модульдік процедура не модульдік функция ... ... ... ... ... (IV ... қараңыз).
Программаны дұрыстау
Код терезесінде құрылған программада ... не ... ... мүмкін. Программа іске қосылған ... VB ... ... ... ... ... шығарып, көбінесе қате жазылған
жолды басқа түске бояп қояды. Егер оператор қате ... ... ... ... ... өту кезінде шығады да, курсор қате ... ... ... ... Қателерді жөндеп, іске қосу командасын
қайта беру керек.
100 орнына 1000 ... ... ... ... жүйе ... мұндай типті қатені іздеп табу әдетте программаны тестілеу
арқылы жүргізіледі.
Immediate ... ... ... ... ... шығаруға болады. Мысалы, Form _Load процедурасы мынадай түрде
жазылсын:
Private Sub Form _Load ()
Dim x As ... Error GoTo ... : y=2*x+5 : Print y
5: ... ... x=” & ... ... On Error – ... қате барлығын анықтау кілттік сөзі. Қате
бар болса, ол ... (Debug, ... ... ... ... ... бұл ... «Қате.х=0» жазлуы көрінеді
(2.5-сурет). Процедурадағы қате – х ... Integer деп ... тип: Long. ІІ ... ... қате кеткен жолға үзіліс нүктесін орнататын, іске қосу, тоқтату
және т.б. әрекеттерді ... 12 ... Debug ... Түзету)
панелі де бар. Оны ашу командасы: Debug – Toolbars – Debug. ... ... ... Debug мәзірінің Clear All Breakpoints командасы арқылы
барлық үзіліс нүктелерін алып тастау қажет. (Debug ... ... ... ... Debug ... ... ... Immediate терезесінде қатенің көрсетілуі.
ІІІ ТАРАУ. МӘЗІР ҚҰРУ. ФОРМАЛАРМЕН ЖҰМЫС
3.1. Мәзір құру және онымен жұмыс
Форманы Windows ... ... ... ... ... тағы бір ... ... түрлі мәзірлер орнатып, әр мәзірге
енгізілген командалық пункттер объектілерімен әдеттегідей жұмыс ... ... құру үшін VB ... Menu Editor (Мәзір редакторы)
программасы енгізілген. Оны пайдалану әдісі:
Форманы ... Tools – Menu Editor ...... редакторы)
командасын беру (аспаптар панелінің «Мәзір редакторы» түймесін шертуге де
болады). Редактор іске қосылып, оның екі ... ... ... (3.1-
сүрет). Оның жоғарғы бөлімі мәзір және ... ... ... ... ... ... терезесінің төменгі бөліміне жазылып
қойылады.
3.1-сурет. Мәзір редакторы терезесі.
Терезеде көрінген Caption, Name, Checked, Enabled, Visible, WindowList-
мәзір компоненттері (қасиеттер):
Caption – ... не оның ... ... ...... ... үшін Caption ... енгізілген атауды
арнайы түрде жазу (VB атауды Name өрісіне енгізілген түрде қабылдайды).
Visible (көрсету) – мәзір командасын ... не ... ... – командаға True не False мәнін меншіктеу. Алғашқы
кезде Enabled, Visible ... үшін ... True мәні ... ... ... жағдайлардан басқа кезде өзгертпеу керек.
Index – мәзірді элементтер ... ... Ол ... тәсіл сияқты мәзір пункттерінің төменгі жағында ... ... ... қою үшін ... ... Clock (Time, Date) ... құру ... Time (уақыт),
Date (дата) – Clock (сағат) мәзірінің пункттері ... ... ... мен ... ... ... ... құру тәсілі:
1. Орталықты іске қосып, көрінген форманы ерекшелеу. Menu Editor
терезесін экранға шығарып, Caption өрісіне мәзір ... ... одан соң TAB ... басу (ол ... бір ... ... ... қояды). Атау төменгі бөлімге
жазылады.
2. Name өрісінің алдына mnu ... ... ... ... енгізу: mnuClock. Ол программалық код терезесінің
объектілер тізіміне кірістіріліп қойылады (mnu – ... ... ... ... ... үшін ... ... Mnu
орнына басқа префиксті жазу да мүмкін).
3. Next (келесі) түймесін шерту. Caption, Name өрістері тазаланады
да, редактор ... ... ... не ... пунктін енгізуді
күтеді. Курсор Caption өрісіне орналастырылып қойылады.
4. Caption өрісіне Time, Name өрісіне TimeItem пункт атауын ... ...... ... ... пункті екенін ажырату
үшін пайдаланылған жалғау). Time терезенің ... ... ... ... ... ... (() түймесін шерту. Ол төменде жазылған
Time атауының алдына көп нүкте (....) қойып кетеді. Көп нүкте ... ... ... пункті етіп белгілеуі.
6. Next түймесін шертіп, Caption өрісіне Date, Name өрісіне DateItem
пункт атауларын енгізу. Бұл жолы «Солдан оңға» түймесін ... жоқ, оны тек ... ... ... ... ... керек.
Редактор Date сөзін мәзір пункті деп автоматты түрде қабылдайды
да, алдына көп нүкте қойып кетеді (3.2-сурет).
3.2-сурет. Clock ... ... ... ... ... ... болса, келесі мәзірлер мен олардың пункттерін ... ... ... Редактор терезесінде Солға, ... ... ... Жою (Delete) түймелері де бар. ... ... ... ... қиын ... ОК ... ... Редактор терезесі жабылап, Clock мәзірі
енгізілген форма
көрінеді. Мәзірді ашу үшін атауын әдеттегідей бір шертсе болғаны.
|Form1 ... ... ... ... Clock мәзірі енгізілген форма модулі
Clock мәзірі пункттерімен жұмыс
1. ... Label1, Label2 ... ... Label1 ... уақытты,
Label2 өрісіне датаны енгізуді жоспарлау.
2. Clock мәзірін ашып, Time пунктін екі рет шерту. Код ... ... ... ... Оны ... Sub ... Click ()
Label1.Caption = Time
End Sub
3. View – Object ... ... ... ... ... шығарып, мәзірдің
Date пунктін екі рет шерту. Ашылған код терезесінде процедура моделін
толтыру:
Private Sub DateItem_ Click ()
Label2.Caption = Date
End Sub
|General ... ... ... |
|MnuClock ... ... ... ... ... ... тізімі
Ескерту. Формада мәзір орнатылған соң код ... ... ... ... ... View – Object ... ... код терезесін ашу;
- Терезенің сол жақ (General) бөліміне енгізілген тілсызық түймесін
шертіп, ... ... ашу ... ... TimeItem ... екі рет шерту. Процедура моделі көрінеді.
Оған қажетті команданы ... DateItem ... де осы ... іс - ... орындау.
4. Проектіні сақтау (мысалы, FormClock.frm; FormClock.vbp).
5. Іске қосу командасын беру (F5). ... ... Оған ... Clock ... ... ... Time, Date пунктерін
шерту. Label1, Label2 өрістерінде ағымдық ... пен дата ... ... ... ... аяқтау командасын беру (End).
Ескерту. TimeItem объектісінің қасиеттер терезесі жоқ. Сол себепті
формада тек ағымдық ... ... ... ... элементтерімен жұмыс
істеу оқиғасы Click (басу) ғана).
3.2. Мәзір пункттерін орындайтын ... ... ... ... ... үшін ... осы үшін арналған клавишін
басуға болады. Әдетте мұндай клавиш жылдам клавиш ... Ол ... ... ... астын сызу белгісі арқылы белгіленіп
қойылған.
VB-те жылдам клавиш тағайындау үшін ... ... ... мәзір құру
кезінде Caption өрісіне енгізілген ... ... ... ... ... ... (&) белгісін орнатып қою жеткілікті. Мысалы,
өріске Clock атауын &Clock ... Time ... &Time ... ... Бұл ... & белгісінен соң бірінші болып жазылған әріптер (С ... ... ... ... ... қосу ... берілген соң формада мәзірдің көрінуі 3.5-суретте
көрсетілген.
|Clock |
|Time ... ... ... ... ... ... мәзірдің түрлі командаларын тек түрлі клавиштер арқылы орындау
мүмкін. сол себепті жылдам клавиштердің түрлі командалар үшін қайталанбауын
қадағалау керек. ... Edit ... Cut ... алу), Copy (Көшіру)
командаларын орындау үшін С клавишін тағайындау қате болар еді. ... ... С ... ... үшін ... & ... осы әріптердің
алдына енгізілуі тиіс:
&Copy ... ... ... ... ... ... үшін іске
қосу командасы берілген соң клавиатураның сәйкес (мәзірде асты сызылған)
клавишін басу ... ... ... екі не одан да көп ... ... соң ... ... жылдам беруге болатыны белгілі. VB-те ол ... ... құру ... ... ... Clock ... ... орындауға Ctrl+T, Date командасын орындауға Ctrl+D клавиштерін
тағайындау әдісі:
- Time, TimeItem ... Caption, Name ... ... ... ShortCut ... ... өрісіне енгізілген тізімді ашып,
одан Ctrl+T қатарын таңдау. Ол мәзірдің Time пунктін орындау командасы
болып тағайындаладыда, терезенің төменгі бөліміне жазылған Time ... оң ... ... ... Date, DateItem ... ... ... енгізілген соң, Date
командасын орындау үшін Ctrl+D командасын ... ... ... ... OK ... ... ... көрінеді. Оған енгізілген Clock мәзірінің
ашылғандағы көрінісі 3.6-суретте бейнеленген.
|Clock ... Ctrl+T ... Ctrl+D ... ... ... Clock ... пунктін орындау үшін алдымен іске қосу командасын беру ... әрі Ctrl+T, Ctrl+D ... ... ... ... пен дата ... ... орнатылған Label1, Label2 өрістерінде көрінеді.
Контексті мәзір құру
Формаға ... ... ... оң ... ... ... ... мәзір бетке шығатын не ... ... деп ... Clock ... ... командалардан тұратын контексті мәзірді
құру әдісі:
1. Clock мәзірі енгізілген форманы экранға шығару.
2. Форманы екі рет шертіп, код терезесін ... ... ... ... MouseUp (тышқан арқылы жоғарыға)
оқиғасын таңдау.
4. Көрінген ... ... ... Sub ... As Integer, Shift As Integer, X As ... As ... Button = 2 Then
PopupMenu mnuClock
End If
End Sub
Процедураға енгізілген команда: «Егер тышқанның оң түймесі басылса,
mnuClock ... ... ... (popup-күтпеген жерден).
5. Іске қосу командасын беру (F5).
6. Көрінген ... ... ... оң ... ... Контексті мәзір
(Clock мәзірі пункттерінің тізімі) ... ... ... ... ... ... сақтау, жабу.
Ескерту. 1. Windows-та жұмыс істейтін қосымшаның мәзіріне ... ... ... қол ... ... ... Edit ... Copy, Paste командаларының біреуі қосылулы тұрса, ... ... ... ... VB-те бұл үшін ... ... ... сәйкес пункті құрылған соң Enabled (Қосылулы) жалаушасын алып
тастаса болғаны.
2. Кез келген объектіге ... ... ... ... шығару үшін
оны таңдап, оң түймемен шерту керек.
Форманы безендіру
Wmf, bmp т.с.с. типті графикалық ... ... ... ... бар. Оны тез ... жолы:
1. Орталықты ашып, форманы барынша кеңейту.
2. Элементтер ... ... ... ... ... ... ... орналастырылатын өріс орнату.
3. Объектіні таңдап, оның Picture ... екі рет ... ... ... ... ... шертуге де болады). Load Picture
терезесі ... Бұл ... ... ... ... ... ... файлдар атауларын шығаруға болады.
Мысалы, ол үшін C:\ Program Files\ Microsoft Office\ ... ... ... болғаны, т.с.с.
3.7-сурет. Picture1 объектісінің ішіне енгізілген кескін (Облака)
4. Көрінген файлдар ішінен қажеттісін ... Ашу ... ... ... ... Picture1 ... ... кірістіріліп
қойылады. (C:\Windows\Облака.bmp файлы таңдалған кездегі форманың
көрінісі 3.7-суретте көрсетілген).
Қозғалту ... ... ... үшін оны таңдап, Жылжыту және ... ... ... ... Объектіні автоматты түрде «қозғалту әсерін»
(анимация, мультипликация эффектісін) форманың координаттар жүйесінде Move
(жылжыту) командасын ... және ... ... ... ... ... болады. (Формада координат ... ... ... ... бірлігі -twip).
VB-те Picture1 объектісіне орнатылған суреттің салыстырмалы ... ... ... S1, ... ... Left (солға), Top (жоғары)-объект қасиеттері; S1,S2- плюс (+)
не минус (-) ... ... ... ... ... Олар ... ... көрсетеді. Мысалы, Left-50, Top-50 объектіні ... ... ... 50, жоғарыға 50 твип ... ... (+ ... ... ... объектісі жылжыту жылдамдығын орнатады, оның Interval ... ... ... ... ... (мән кіші ... сайын
жылдамдық артады).
Мысал. Форманың оң жақ төменгі бөлігіне кірістірілген шағын Picture1
объектісіне «Облака.bmp» ... ... оны ... ... ... қарай
көлденең «жылжыту» керек.
1. Орталықты іске қосып, форманы барынша кеңейту.
2. Оның оң жақ төменгі бөлігіне Picture1 ... ... ... ... ... ... ... мән меншіктеу:
|Объект ... ... мән ... ... ... түс) |0-Flat ... |
| |Picture |VB\ ... |
| |Visible |True |
| ... ... |0-None |
| ... (Фон ... |MenuBar ... |Enabled |True |
| ... |100 |
4. Код ... ... құру:
Private Sub Picture1_Click()
Picture1.Visible = True
Timer1.Enabled = True
End Sub
Private Sub ... ... > 0 ... ... - 50, ... - ... = False
Picture1.Visible = False
End If
End Sub
5. Проектіні сақтап, іске қосу.
Объектілер топтамасы. For Each циклі
VB-те формада орнатылған ... ... бір топ ... да, олар ... ... ... не ... (басқару құралдары) делінеді.
Формада топ объектілерімен өлшемін өзгерту, жылжыту, басқа атау
меншіктеу сияқты ... ... ... ... ... ... жұмыстарын
топтама үшін тұтас орындауға болады. VB-те ол үшін For ... ... ... түрі ... Each Control in ... Control
Мұндағы Control - топтың ағымдық объектісін көрсететін айнымалы; цикл
денесі ()- объектінін ... ... ... Enabled ... Left (Сол ... Top
(Жоғарыдан), Caption (Үстіне жазу), Visible ... ... сол ... ... ... екі Picture1, Picture2
объектілері мен Command1 басқару элементін орнатып, ... ... ... ... оңға ... 250 бірлікке жылжыту керек.
1. Орталықты іске қосу. Жаңа форма көрінеді (Form1).
2. Форманың сол ... ... ... Command1 ... Picture1, Picture2 объектілерінің Picture қасиетінің мәндері үшін
бір графикалық файлды, мысалы, "Облака.bmр" ... ... ... ... (3.8 — ... Command1 түймесін екі рет шертіп, код терезесінде ашылған процедура
моделін толтыру:
3.8-сурет. Топтаманың ... ... ... Топтаманың біртұтас жылжытылған көрінісі
Private Sub Command1_Click()
For Each Ctrl In Controls
Ctrl.Left = ... + ... ... ... ctrl — ... ... ... анықтайтын айнымалы.
4. Проектіні сақтап, іске қосу командасын беру.
5. Көрінген форманың Command1 түймесін ... рет ... ... ... ... ... ... оңға жылжиды (соңғы түрі
3.9 — ... ... жүйе ... ... ... ... ... орнату
Элементтер панелінің DriveListBox, DirListBox, FileListBox (дискіжетек,
каталогтар мен файлдар тізімдері) элементтері арқылы формада файлдық ... ... ... ... істеуге болады. Мысалы, файлдар
арасында графикалық файлдар бар болса, ... ... ... ... қою ... ... бұл ... еңбекті қажет ететін жұмыс.
Файлдық жүйе объектілерін орнату әдісі:
1. Орталықты ашып, форманы барынша кеңейту.
2. Tools - Options ... ... ... ... терезесі ашылады.
3. Терезенің Editor қондырмасын ... Require Variable ... ... ... ... жалауша орнатулы болса, оны
алып тастау және ОК түймесін шерту.
4. ... ... ... ... ... ... ... сол жақ жоғарғы бұрышына объект орнату (Drive1). ... ... диск (С:) ... қойылған.
5. Элементтер панелінің DirListBox ... ... ... ... ... бірінші объектінің төменгі жағына келесі
объект ... (Dir1). Онда VB ... ... қойылған. Ішінде біршама
бумалар көрінгенше объектіні төмен созу.
Орнатылған объектілер арқылы дискіжетек пен ... іске қосу ... Ол үшін ... ... орындалуы тиіс:
6. Элементтер панелінің FileListBox (файлдар тізімі) түймесі арқылы
формаға енгізілген ... Dir1 ... ... ... ... ... (File1), бірнеше файл атаулары көрінгенше оны да төмен ... ... ... ... жүйенің қажетті файлын таңдауға мүмкіндік береді.
Оны пайдаланып, ... .bmp не ... ... ... ... ... Элементтер панелінің Image түймесін шертіп, форманың оң жағына үлкен
өріс орнату (Image1).
2. File1 және Image1 объектілерінің ... ... ... ... мән ... |Pattern ... |*.bmp; *.wmf; *.ico ... |Stretch ... |True |
| ... (жиектеу) |1-Fixed Single (даралық түрде |
| | ... ... Pattern ... мәні үшін ... файл ... ... ... .bmp- шашырама (растралық), .wmf- Windows
метафайлдары, .ico- ... ... ... Олар Visual ... бумалардың ішінде бар болса, File1 объектісінің ішінде жазылып
қойылады. Ал, жоқ ... File1 ... ... файлдар алынып тасталады,
яғни объектінің іші бос болып ... ... ... егер мән үшін
*.VBP типі меншіктелсе, объектіге тек проект атаулары шығады, т.с.с.).
3. Drive1 ... екі рет ... код ... ... ... ішіне
Dir1.Path = Drive1.Drive
операторын енгізу. Ол ағымдық ... ... Path (жол) ... ... және ... орнатылған Dir1, ... ... ... ... (конкатенациялайды).
4. Dir1 объектісін екі рет шертіп, код ... ... ... = ... енгізу. Команда файлдар тізімін каталогтар тізімімен
байланыстырады ... бума ... ... File1 ... көрінеді).
5. File1 объектісін екі рет шертіп, код терезесінде ... ... ... екі команда енгізу:
pf = File1.Path & "\" & File1.filename
Image1.Picture = LoadPicture(pf)
Мұның біріншісі - пайдаланушы таңдаған файлдың толық атын рf ... (Path, ... ... қасиеттері; &-жалғап қосу
белгісі). Келесісі – файлды форманың Image1 өрісіне тиеу командасы. Мұндағы
LoadPicture-VB функциясы, Picture- Image ... ... ... ... Picture ... орнатқан да дұрыс).
6. Программаны сақтап, іске қосу (F5). ... ... ... ... Онда ... ... тік ... белгілерін
жоғары-төмен қозғалта беруге болады.
7. File1 объектісінен қалаған кескіндік файлды таңдау, мысалы, “Lion.wmf”.
файлға жазылған ... Image1 ... ... қойылады. (3.10-
сурет).
3.10-сурет. Файлдық жүйе объектілері,
олар арқылы орнатылған сурет
Мәтіндік ... ... ... ... ... ... енгізудің қарапайым түрі: InputBox, MsgBox
терезелерін пайдалану. Мәтінді формаға ... де ... ол үшін ... ... өріс ... курсорды мәтін өрісіне орналастырып алу
керек.
Мысал. ... ... ... үш ... ... ... ... жылы енгізілген жолдарды енгізу керек.
1. Орталықты ашып, ... ... ... ... ... TextBox ... ... формаға үлкен
төртбұрышты өріс орнату (Text1).
3. Text1 объектісінің қасиеттеріне ... ... ... Caption
қасиеті жоқ):
|Қасиет |Мән ... ... ... (көп жол) |True ... (айналдыру белдеушесі) |2-Vertical (тік) ... ... |False ... ... 10 не 12 ... ... |False ... |0 ... |Бос ету ...... жолдардан тұратын мәтінді енгізуге мүмкіндік беру;
ScrollBars - мәтіндік объектіге тік ... ... - ... ... ... ... ... txt префиксі қосылып
қойылады.
TabIndex - мәтіндік өрісті іріктеу. (Алғашкы рет 1- ... ... ... ... 0 саны ... Егер ... мәтіндік өріс
орнатылса, оған меншіктелетін мән -1, т.с.с.).
4. Іске қосу командасын беру. ... ... ... ... әдеттегідей мәтін сияқты тере беру (3.11 -сурет).
5. Проектіні сақтап, іске қосу.
3.11-сурет. Мәтіндік өріске енгізілген ... ... ... ... ... үшін ... клавиатурамен
байланыстыру керек. Ол үшін программаға енгізілетін әдіс: SetFocus. ... ... . ... Мысалы, орнатылған
TxtMatin өрісін екі рет шертіп, ... код ... ... ... Sub ... ... өріске кез келген мәтінді программа арқылы енгізуге болады.
Мысалы, оны Text1 өрісіне ... ... жаңа ... ... формада Text1 және Command1 объектілерін орнатып, сәйкес қасиеттеріне
мәндер ... Command1 ... екі рет ... код терезесінде көрінген
Command1_Click процедурасына мынадай ... ... Sub ... ... = ... + “”
End Sub
- Іске қосу командасын беру. Форма көрінеді. Оның Command1 түймесін
шерту. Программаға енгізілген ... ... ... көрінеді (команданы
Text1.Text= "" тұрінде беруге болады. Ол Text1.Text= Text1.Text +
"" ... ... ... ... ... ... Text қасиетін бос
ету керек).
- Программаны сақтау.
Мысал. Caption қасиеттерінің мәні үшін ... 1, 2, 3, 4 ... CommandK ... ... ... өріске осы сандардың
кез келген ... ... не ... ... ... (k=l, 2, 3, 4).
1. Экранға жаңа форма шығарып, оны барынша кеңейту. Форманың жоғарғы
қатарына Text1, одан ... ... CommandK (k=l, 2, ..., ... ... ... ... мән ... |Қасиет |Мән ... |Text |Бос өріс |
| ... |0 ... |Caption |1 ... |Caption |2 ... |Caption |3 ... |Caption |4 ... |Caption |+ ... |Caption |- ... |Caption |Cls ... |Caption |= ... |Caption |End |
3. Код ... ... ... c, s1, ... Sub ... = Text1.Text + "1"
c = Text1.Text
End Sub
Private Sub Command2_Click()
Text1.Text = Text1.Text + "2"
c = Text1.Text
End Sub
Private Sub ... = ... + ... = ... ... Sub ... = Text1.Text + "4"
c = Text1.Text
End Sub
Private Sub Command5_Click()
s1 = Val(c): Text1.Text = ""
simv = ... ... Sub ... = Val(c): ... = ... = "-"
End Sub
Private Sub Command7_Click()
Text1.Text = ""
End Sub
Private Sub Command8_Click()
Select Case simv
Case "+"
Text1.Text = s1 + ... ... = s1 - ... ... Sub
4. Проектіні сақтап, іске қосу. Форма көрінеді (3.12-сурет). Объект
түймелерін калькулятор түймелері ... ... ... ... Мысалы, 3
және 4 сандарының қосындысын табу үшін ... ( 3 + 4 = ... ... ... ... қарапайым калькулятор ... ... ... ... терезесін құру мысалы ретінде
қарастыруға болады.
Калькулятор
3.12-суретте форма әдеттегідей калькулятор ... ... ... ... ... ... дайындаудың басқа әдістері де бар.
Олардың бірі – ... ... ... (Frame), ... ... ... арқылы формада жаңа объект орнатып, калькулятор
құруға арналған басқа процедура құру. ... кез ... ... екі ... ... ... бөлу ... орындайтын калькуляторды (3.13-сурет)
мынадай тәсіл бойынша дайындау да мүмкін:
1. Жаңа форма ашу.
2. Формада Text1, Text2, Text3, Label1, Label2, Label3, ... Option2, ... Option4, Label4, Label5, Label6, ... Command2 ... ... ... орнату:
|Объект |Қасиет |Орнатылатын мән ... |Text |Бос ету ... |Text |Бос ету ... |Text |Бос ету ... |Caption |1 ... |
|Label2 |Caption |2 -айнымалы ... |Caption ... ... |Caption ... (+) ... |Caption ... (- ) ... |Caption |Көбейту ( * ) |
|Label7 |Caption ... ( / ) ... |Caption ... қосу ... |Caption |End |
4. Код ... ... ... енгізу:
Private Sub Command1_Click()
Dim bir, eki
bir = Val(Text1.Text)
eki = Val(Text2.Text)
If Option1.Value = True Then
Text3.Text = bir + ... ... ... = True ... = bir - ... ... ... = True Then
Text3.Text = bir * eki
End If
If Option4.Value = True ... = bir / ... ... ... Sub Command2_Click()
End
End Sub
5. Іске қосу командасын беру (F5). Калькулятор іске қосылады. Онда 1-
және 2-айнымалы өрістеріне сәйкес ... ... ... ... ... ... ауыстырып қосқышты орнату керек. Одан әрі Іске ... ... ... ... ... ... Тізім.Құрастырылған өріс элементтері
жөнінде
Элементтер панелінің бұл элементтері де формада ... ... ... ... (Frame1) -ішіне ауыстырып қосқыштар мен
жалаушалар орнатылатын тік төртбұрышты объект. Оның ... - ... ... біртұтас топ құрайды. Мысалы, рамка жылжытылса,
ішіндегі объектілер де бір элемент ... қоса ... ... ... ... ... - ... орнату не алып тастау ... ... ... - ... ... ... ... (орнатылмай) қалады. Жалаушалардың бірнешеуін бірден орната
беру мүмкін.
Ауыстырып қосқыштың негізгі қасиеттері: Name, Caption, Value:
Name - атау ... Ол ... ... ... opt ... ... қосылып қойылады.
Caption – қасиетінің мәні үшін ауыстырып қосқыштың не үшін қажеттілігін
білдіретін сөзді жазып қоюға болады.
Value (Мән) қасиетінің мәні True не False ... ... ... ... ... оған True мәні ... ... де ауыстырып қосқыш қасиеттеріне шамалас.
Тізім (ListBox) және Құрастырылған өріс (ComboBox) элементтері ... ... ... көрінісі мәтіндік өріс сияқты. Объектілер
ішіне мәтіндерден тұратын тізімді AddItem ... ... ... болады.
Мысал. ListBox және ComboBox элементтері арқылы ... ... ... ... ... (3.14-сурет).
1. Жаңа форма ашып, онда List1, Combo1 объектілерін орнату.
2. Қасиеттер терезесі арқылы объектілерге атау беру.
3. Программа терезесін ашып, оған процедура ... Sub ... "1. ... "2. ... "1. С. ... "2. Д. Махамбетжанова"
End Sub
4. Іске қосу командасын беру (F5). Программаның орындалу түрі 3.14-
суретте көрсетілген.
3.14-сурет. List1, Combo1 ... ... ... List1 ... ... аты-жөндерін, Label1 өрісіне оларға
берілген сәйкес қысқаша мінездеме енгізу керек.
1. Жаңа ... ... List1, Label1 ... ... ... және List1 объектісін екі реттен шертіп, код ... ... Sub ... "Б. ... "А. Жанкожа"
List1.AddItem "К. Мустафакызы"
End Sub
Private Sub List1_Click()
Label1.Caption = List1.Text
Select Case List1.ListIndex
Case 0
Label1.Caption = "Озат окушы"
Case 1
Label1.Caption = "Орта ... ... ... = ... ... ... ... Select
End Sub
Соңғы процедураның бірінші жолы тізімнің таңдалған элементін көшіруді
ұйымдастырады;
List1.Text - ... ... ... ... ... ... таңдалған элементтің нөмірін сақтайды (VB'тe
нөмірлер реттері нөлден (0) басталады).
3. Проектіні сақтап, іске қосу командасын беру. ... ... ... ... Label1 ... ... окушы" мәтіні көрінеді (3.15-
сурет), т.с.с.
Элементтер панелінде Line (Сызық), Shape ... ... ... ... - формада түзу сызық кесіндісін сызу үшін, Shape - тік ... ... ... тік ... сызу үшін ... ... ... енгізілген мәтіннің таңдалған үзіндісін MsgBox ... ... ... ... ... ... ... оған Text1, Command1 объектілерін орнату;
- Command1 түймесін екі рет ... ... код ... процедура
енгізу:
Private Sub Command1_Click()
Text1.SetFocus
MsgBox "Тандалган узінді:" & Text1.SelText
End Sub
- Іске қосу командасын беру;
- көрінген форманың мәтіндік өрісіне мәтін енгізіп, ... ... ... ... MsgBox ... ... ... Форма даналары
Осыған дейін бір формамен жұмыс істеп келінді. Ол ... ... де. ... ... ... мен ... ... кезінде проектіге
бір не бірнеше формаларды қосу қажет болады.
Проектіге алғашқы рет ... Form1 ... ... ... ... FormЗ, т.б.) қосу үшін ... команда:
Project - Add Form
(не аспаптар панелінің Add Form ... ... де ... ... Form ... екі рет шертсе болғаны.
Ашылған формада интерфейс құру, мысалы, Form2'де жүріп ... ... қиын ... ... ... ... екінші формаға көшіру не бірінші
формада құрылған процедура арқылы екінші форманы ашу және ... ... ... алып ... ... қалдыру) қиын емес. Мысалы, мынадай
тапсырма қарастырылсын:
Жаңа проектіге Form2, Form3 атаулы қосымша ... ... ... беттеріне шығаратын сандық функциялар енгізілген лроцедуралар құрыңыз
жөне проектіні іске қосыңыз (нәтижелер Print ... ... ... ... ... Ортаны іске қосу.
2. Project-Add Form командасы арқылы ... Form2, Form3 ... ... ... ... True мәнін меншіктеп, frmFunc1,
frmFunc2, frmFunc3 атауларын беру.
frmFunc1-ге сәйкес код терезесін ашып, оған процедура енгізу:
Private Sub ... x, ... : ... ... ... Sub
4. frmFunc2, frmFunc3 объектілерінің код ... ... ... Sub Form_Load()
Dim x, y
х=2 : y=5*x+3
Print y
End Sub
.....................
Private Sub ... x, ... : ... ... ... Іске қосу ... ... Беттеріне сәйкес нәтижелер (22, 13, 19
сандары) ... үш ... ... де, ... ... ... ... енгізілген Show –форманы экранға
шығару әдісі (show-көрсету)).
Жоғарыда дайындалған проектіні іске ... ... ... үш ... ... ... ... белсендірулі тұрады. Қалғандарының біреуін
белсендіру үшін оның тақырыбын шертсе болғаны.
Экранға нәтиже енгізілген тек бір форманы шығару да ... Ол ... ... ... ... ... ... Form1- де Command1 түймесін орнатып, код терезесінде
Command1_Click процедурасын құру:
Private Sub Command1_Click()
Dim s, x, y
‘көрінетін терезеге 1, 2 не ... ... ... = ... ... s = 1 Then ... Else If s = 2 __
Then Form1.Hide : Form2.Show
If s >=3 Then Form1.Hide : Form3.Show
x = 5
y =4*x + ... ... ... ... ... іске ... Көрінген 1- форманың Command1
түймесін шерту.
3. Экранға шыққан InputBox сұхбаттық терезе өрісіне 1, 2 не ... ... ... бір формасын форма данасы деп те атайды. Алғашқы рет ашылған
форма данасында (Form1) интерфейс ... ... соң оның ... алу қиын ... Мысалы, 3.1-тақырыпта дайындалып, сақталған
FormClock.vbp проект формасының бірнеше көшірмелерін (даналарын) экранға
шығару жолы:
1. Ортаны ... ... ... ... ... Көрінген формаға (3.3-сурет) Command1 объектісін орнатып, оның
Caption қасиетіне NewForm, Name қасиетіне cmdNewForm ... ... ... |
| |
| ... Жаңа ... ашуға дайындалған форма моделі
3. New Form түймесін екі рет шертіп, ашылған код ... ... ... ... ... ... Sub cmdNewForm_Clock()
Dim JnNewForm As Form1
Set JnNewForm = New Form1
JnNewForm.Visible=True
JnNewForm.Caption=”Келесі ... ... ... ... жаңа ... Оны ... ... Dim
операторы арқылы сипатталған;
Set (орналастыру) - форманың жаңа данасын жадта құру командасы;
JnNewForm.Visible-жаңа дананы экранда көрсету командасы (=True).
Соңғысы — оның Caption ... ... ... іске қосу ... беру (F5). ... ... көрінеді.
5.Форманың New Form түймесін шерту. Бұрынғы ... ... ... ... ... ... (3.17-сурет). Оған енгізілген объектілер
жұмысының Form1're енгізілген объектілер жұмыстарынан өзгешелігі жоқ.
Егер NewForm ... тағы ... ... ... келесі данасы
көрінеді, т.с.с.
6.File-Save Project командасы арқылы ... ... ... даналары
Құрылған жаңа даналармен негізгі дана сияқты жұмыс ... ... Көп ... (MDI) ... командаларында бір құжат ішінде екінші құжат терезесін ашып,
оларды толтырған соң ... ... ... ... белгілі, мысалы, Word-
та: Құжат1, Құжат2, т.б. VB-те де бір форманың ... ... ... ... ... ... байланысты түрде пайдалану қиын емес.
Мұндай формалар ... ... MDI ... ... (Multi ... ... интерфейс).
Бас форманы кеңейтуге, толық экрандық етіп жаюға не бүктеуге ... ... ... ... ... мүмкін емес. Ол ішкі формаларды
орнату үшін контейнер ретінде дайдаланылады. Ішкі ... ... ... ... ... бас ... ... ішкі формаларды сәбилік деп те атайды.
MDI формаларын құру ... ... ... ... ... орнату:
|Объект |Қасиет |Мән ... |Name |frmSabi |
| |Caption |“MDI ... ... ... |True |
2. Бас ... ... ... Ол үшін:
-Project-Add MDI Form командасын беру;
-көрінген терезеден MDI Form белгішесін таңдап, Ашу ... ... ... ... ... ... Name қасиетіне frmMDI, Caption қасиетіне “MDI бас
формасы” ... ... Бас ... ... Menu Editor ... арқылы оған мәзір енгізуге
болады. Мысалы, онда File (New File) ... ... ... ... ... File, Name ... mnuFile ... енгізіп, Next
түймесін шерту;
-терезенің “Солдан оңға (→)” түймесін шерту;
-Caption ... NewFile, Name ... ... ... ... ОК ... ... Бас форма ашылады.
4. Формада көрінген File мәзірінің NewFile пунктін екі рет ... код ... ... ... Sub NewFileItem_Click()
Dim frm As New frmSabi
frm.Show
End Sub
5. Форма мен проектіні сақтау. Мысалы, frmMDI.frm, frmMDI. ... Бас ... ... іске қосу ... беру (F5). ... орнатылған
бас форма мен оның ішінде ішкі форма ... (3.18 - ... MDI ... ... ... мәзір арқылы File – NewFile командасын беру.
Команда берілген сайын ... ... ... ... жаңа ішкі ... ... бір-бірінен ажырату үшін атау соңына форма нөмірін енгізіп
қойған жөн.
Оларды ... соң ... ... түрде орналастыру үшін формаға Window
(Tile, Cascade) мәзірін енгізіп қоюға да ... (tile — ... ... құлама). Ол үшін орындалуы тиіс іс-әрекеттер:
- бас форманы тандап, Menu Editor редакторын іске қосу;
-редактор терезесіне Window жаңа ... (Window, ... және ... ... ... ... WindowList (терезелер тізімі) жалаушасын орнатып, OK түймесін шерту.
File, Window ... ... бас ... ... (3.19 - суретгі
қараңыз).
- Window мәзіріне орнатылған Tile, Cascade ... ... ... ... ... құру:
Private Sub TileItem_Click()
frmMDI.Arrange vbTileHorizontal
End Sub
Private Sub CascadeItem_Click()
frmMDI.Arrange vbCascade
End Sub
Мұндағы vbTileHorizontal, vbCascade – форма терезелерін орналастыруға
арналған VB тұрақтылары, arrange – ... ... ... ... ... ... Sub NewFileItem_Click()
Static k As Integer
Dim frm As New frmSabi
k = k + 1
frm.Caption = "MDI Сәбилік формасы" & k
frm.Show
End Sub
Процедураға ... New ... сөзі VB 'ке жаңа ... кұрылу
тиістігін хабарлау; k - бастапқы мәні=0 болатын integer типті айнымалы;
frm.Show әдісі – ... ... ... Оның ... ... - сәбилік
формаға тақырып енгізу. ... ... ... ... ... ... қосу, одан әрі File - NewFile командалары ... ... ... ... "MDI ... ... 1" терезесі көрінеді, т.с.с. (3.19-
сурет).
Құрылған ішкі терезелерді жылжыту, жабу, бүктеу, жаю және ... ... ... ... ... бір ... ... экранда қалдырып,
оған Label1 өрісін және оның қасиеттерін орнатуға болады. ... екі ... ... код ... ... “URA!”
командасы енгізілген соң іске қосу командасы ... бас ... ... ... форма көрінеді. Ішкі форма шертілген кезде Label1 өрісіне
URA! сөзі жазылып қойылады.
3.19 - ... ... MDI ішкі ... басып шығару
Интерфейс элементтері, графика, мәтін енгізілген форманы PrintForm
әдісі (командасы) арқылы басып ... ... Оны код ... ... ... ... ... (К=1, 2, ... — форма нөмірі). PrintForm ... ... ... ... қарапайым әдісі де.
Мысал. Формаға стандартты "Finish" суретін орналастырып, форманы басып
шығару ... (Finish ... ... ... ... іске ... формада сурет кірістірілетін Picture1 өрісі
мен Command1 басқару объектісін орнату.
2. Объект қасиеттеріне мән беру:
|Объект ... ... мән ... |Caption ... ... |Picture | ... ... Picture ... оң жағына (мән бөлігіне) енгізу үшін
Properties ... осы ... екі рет ... Load Picture ... керек. Одан әрі
VB\wizards\Template\Finish
файлын екі рет шертсе болғаны. Формаға " Finish " ... ... БАСУ ... екі рет ... ... код ... енгізу:
Private Sub Command l_Ctick()
Form1. PrintForm
End Sub
4.Проектіні сақтау.
5. Принтерді дайындап, іске қосу командасын беру (Ғ5). Форма ... Finish ... ... ... ... БАСУ ... ... PrintForm әдісі формада көрініп тұрған
барлық объектілерді басып шығарады.
Ескерту. Код ... ... ... ... ... ... File - Print ... беру керек.
OLE технологиясы .
Элементтер панелінің OLE элементі аркылы формада орнатылған объектіге
(OLE-объектісіне) Windows-та ... ... ... белгішелерін
орнатып, оларды формада бірден іске қосуға болады (OLE (Object Linking ... - ... ... және ... ... OLE технологиясы делінеді, VB-ке оның OLE автоматтандыруы ... жеке түрі ... ... OLE- ... Word 97 ... жұмыс істеуге пайдалану тәсілі:
1. Орталықтан жаңа форма ашу.
2. Формада OLE- объектісін орнату. Тышқан түймесі ... ... ... ... ... кірістіру сұхбаттық терезесі
көрінеді (3.21 - ... ... ... терезесі
3. Тізімнен Документ Microsoft Word қатарын таңдап, Белгіше түрінде ... ... ... ... ... ... ... Word белгішесі
орнатылып қойылады.
4.Терезенің ОК түймесін шерту. Форма ашылып, оның OLE объектісі ... ... ... ... рет ... Word редакторы да іске қосылуы
мүмкін.
5. Проектіні сақтау.
6. Іске қосу командасын ... ... ... OLE объектісінде
орналасқан Word белгішесін екі рет ... Word ... Іске ... ... ... жұмыс істей беруге болады. Ашылған бетте құжатты
толтырған соң оны сақтау үшін File — ... ... как ... ... ... ... жабылған кезде экранда форма қайта көрінеді.
Класс ұғымы
VB соңғы кездерде шыққан объектіге бағдарлы программалау (ОБП) ... алып ... ... ... ... ... ОБП ... программалау тілдерден ерекшелігі - ол обьект, класс принципінде
құрылған. Класс - ... ... ... ... ... ... ОБП-да программаның тип (класс) сипаттамасында айнымалылар және
олардың қасиеттері мен әдістерді қосып ... ... ... мен ішкі ... ... объектілердің сипатталуы енгізілуі
де мүмкін. Олар класс және ішкі класс даналары ... ... пен ... объектілері бірнеше данадан тұратыны белгілі (мысалы, оқу орны,
факультеттер мен кафедралар біреуден емес).
ОБП-да ... үшін ... ... және ... ...... негізгі класс типінің ішкі ... да ... ... оқу орны үшін ... класқа енгізілген
класс типінің Atau : string ... ... ішкі ... тиісті.
Инкапсуляция - кластың берілгендері мен әдістерін біріктіріп, біртұтас
түрінде қарастыру мүмкіндігі және оны басқа ... ... ... ... ... ... ... VB- те Private кілттік сөзі арқылы
жазылған процедураға ... ... - ... ... - ішкі ... ... ерекшеліктерді қосу, өзгерту не
алып тастау ... ... ... ... ... мүмкіндігі. Мысалы,
түрлі кластарға еніп, әр түрлі әрекеттерді орындайтын әдістерге бірдей атау
беру мүмкіндігі полиморфизм делінеді (полиморфизм - көп ... ... ... ... ... ... программаны) дайындау кезінде көптеген
формалар мен оқиғаны өңдеу процедураларын пайдалануға тура ... ... ішкі ... мен ... ... болуы да мүмкін. Әр
программаға қайта-қайта ... үшін ... ... жеке ... ... ... буманы стандартты модуль не программалық модуль деп ... ... ... ... ... ... және бума ұғымдарының
айырмашылығы ... ... ... ... мен ... ... да
сақталады, әдетте, бумаға тек бір облыстық файлдар енгізіледі.
Visual Basic'тe жан-жақтылық ... ... ... ... ... ... үшін ... Module терезесі бар. Онда
Function не Sub ... ... ... ... ... Module ... жеке файл түрінде сақтап қойса болғаны (сақталған файлға ... ... ... ... ... ... процедура бір оқиғаға байланыссыз
болғандықтан, оның жазылу құрылымы және ... ... Function ... модульдік функция құру
Модульдік Function типті функция есептеу ... ... ... ... ... ... ([]) ... Function
Мұндағы - модульдік функция ... ... S - ... ... Квадрат жақшалар ішіндегі аргументтерді (формальдіы
параметрлерді) енгізу ... ... Егер олар ... үтір ... ... тиіс.
Функция денесіне енгізілетін соңғы команда функция атауына ... ... ... Программаға енгізілетін модульдік функцияны шақыру
командасы бөлек жазылмай, әдеттегідей, меншіктеу командасының оң жағындағы
өрнек ... ... ... ... ... ... ... Module командасын беру. Add Module
сұхбаттық терезесі көрінеді.
2. Терезеден Module белгішесін таңдап, Ашу ... ... ... Module1 ... бос ... ... кұрылады да {4.1-
сурет), Project терезесіне ... ... ... оң ... файл ... көрінеді. (файлға ВБ-тің алғашқы рет меншіктеген атауы
- Module1 ... Ол ... бос ... ... Module1 ... модульдік функция программасын енгізу.
4. File-Save Module As командасын ... не ... ... ... ... шертіп, көрінген терезеден модуль сақталатын буманы ашу
және ... ... ... ... ... атауын енгізіп, сақтау. Атауға
автоматты түрде .bas типі (кеңейтілуі) қосылып қойылады. Проект ... ... ... ... да осы ... ... Қасиеттер терезесінің тақырыбын екі рет шерту не қасиеттер терезесін
жауып, қайта қосу. Properties-Module1 атаулы ... ... ... ... ... ... кезде автоматты түрде көрінуі де мүмкін.
Стандартты модульде модульдік функция әлі кұрылмағандықтан, ... ... ... енгізілген. Модуль атауы үшін алдына mod қосымшасы жазылған
атауды енгізу жеткілікті (mod ... ... ... ... ... ... терезесі
1- модульдік файл атауы;
2- объектілік (программада пайдаланылатын) модуль атауы.
6. КҚ ... ... Project, ... және Module1 терезелерінде
көрінген Module1 атауы осы атауға өзгертіліп қойылады.
7. Проектіні сақтау.
4.3-сурет. Модуль қасиеттері терезесі
Мысал. Тік ... ... ... (а; в) ... ... ... оның гипотенузасын (с) есептеуге арналған Pifag атаулы
модульдік функция құру керек. Функция құру үшін:
1.Module1 терезесін ашып ... оған ... ... ... Pifag (al, ... ... File- Save Module As ... беріп және көрінген терезеден модуль
сақталатын буманы ашып, онда модульді сақтау ... ... Module ... ашып, оның Name қасиетіне modPifag атын
енгізіп, КҚ клавишін басу.
4. Модульдік терезені жабу.
Мысал. Тікбұрышты үшбұрыштың катеттері белгілі (а; b). Pifag ... оның ... табу ... (р = а+b+с ... жолы:
1. Орталықгы ашу, егер проектіде Pifag ... жоқ ... ... оң ... шертіп, көрінген контексті мәзірден Add - ... ... ... ... Add Module ... Existing ... Pifag.bas файлын екі рет шерту. Модуль проектіге қосылып қойылады.
2. Форманы ашып, екі рет шерту.
3. Көрінген код терезесінде ... ... Sub ... a, b, p As Single
a=InputBox(a,"a="): a=val(a)
b=InputBox(b,"b="): b=val(b)
p=a+b+Pifag(a,b)
msgBox(p), , “периметр=”
End ... ... ... ... іске ... MsgBox (шығару) терезесінде
периметр мәні көрінеді.
Программаға (процедураға) енгізілген Pifag(a,b)- осы атаулы модульдік
функцияны шақыру командасы. Оның іс-әрекеті ... ... ... функциясын іздеп табады да, al= a , bl=b меншіктеу командаларын
орындайды. Одан әрі ... ... ... ... Pifag ... ... Pifag функциясының орнына қояды.
Процедурада сандық символдардан ... ... ... ... ... Val ... пайдаланылды (value — мән). Себебі
кейде VB ... ... ... ... типте сақтайды. Ол көбінесе
айнымалыларды вариант типінде сипаттауда ... Sub ... ... процедура кұру
Процедураның жазылу синтаксисі:
Sub ([аргументтер])
S
End Sub
Мұндағы - ... ... ... - үтір ... бөлініп жазылатын формальды
параметрлер. Олар қажет ... ... ғана ... ... - ... ... құру, оны сақтау жолы 1-мысалдағы сияқты.
Негізгі программаға ... Sub ... ... ... командасы
Qbasic, Турбо Паскальдағы сияқты ... ... ... ... типі мен саны ... ... ... типі мен санына бірдей болуы тиіс. Тек шақыру командасында
аргументтер жақшаларға алынбай жазылады.
Шақыру командасында ... ... не мән ... ... мүмкін.
Мысал. Тік бұрышты үшбұрыштың катеттері белгілі (а, b). ... ... ... PifagSub ... Sub ... ... құру керек.
Орындау жолы:
1. Орталықты ашу.
2. Стандартты Module1 терезесін ... оған PifagSub ... ... (а1, b1, с1 - ... ... PifagSub (al, b1, ... Sub
3. File – Save Module As командасы арқылы модульді сақтау (мысалы,
PifagSub).
4. ...... ... ... оның Name ... ... енгізу және КҚ клавишін басу.
5. Модуль терезесін ... PifagSub ... ... пайдаланып, тік бұрышты
үшбұрыштың берілген катеттері (a, b) ... оның ... ... ... енгізілетін гипотенузаны (с) есептеуге арналған модульдік
процедураны шақыру ... ... ... ... алынбай
жазылады, мысалы, PifagSub a, b, c.
Жүйе алдымен нақты a, b, c және al, bl, cl ... ... Олар ... ... al=a; bl=b меншіктеу командаларын орындап,
процедураны орындауға көшеді. Одан әрі с:=с1 командасы орындалады.
Есепті интерфейс құрып шешу тәсілі:
элементі).
1. ... ... ... Label1, Label2, Label3, ... ... (Label ... a,b,s ... енгізу үшін
жоспарлау. Command1 түймесі – басқару элементі).
2. Command1 ... ... код ... ... оған ... Sub Command ... a, b, c, ... (a, "a=") : Label1.Caption=a
b=InputBox (b, "b=") : Label1.Caption=b
a=val (a) : b=val (b)
PifagSub a, b, c : ... ... ... сақтап, іске қосу.
Ескерту: Егер проект құрамында PifagSub ... жоқ ... ... ... алу ... ... массивтің минимумы мен максимумы есептелетін модульдік
процедуралар құрып, оларды пайдалану программасын құру ... ... ... ... Module1 терезесін ашып (4.1-сурет), оған Fnmin функциясын енгізу:
Function Fnmin (x1, ... xl=yl Then Fnmax=xl Else ... ... ... - Module1 ... Name өрісіне "modFnmax" атауын
енгізіп, КҚ клавишін басу.
6. Формада Label1, Label2 Command1 ... ... (Label1, ... max ... ... ... Command1 түймесі арқылы код терезесін ... ... ... Sub ... a(20), k, min1, max1
n=InputBox (n, “=”)
For k=1 To n
a(k)=InputBox (a(k), ”=”)
Next
min1=a(l): max1=a(1)
For k=2 To n
min1= Fnmin (min1, ... Fnmax (max1, ... ... Sub
Мұндағы Fnmin, Fnmax – сәйкес модульдерді шақыру командалары.
8. Процедураны сақтап, іске ... ... ... ... Command1 ... ... Көрінген InputBox терезесіне элементтер саны мен кезекті мәндерді
енгізіп, КҚ ... ... 4, 2, 5, 12, 7, 9 ... үшін ... ... ... 4.4 ... көрсетілген.
4.4-сурет. Программаның орындалу нәтижесі
10. Аспаптар панелінің End түймесін шертіп, программа жұмысын аяқгау.
Ескерту. Модульдер - VB проектісінің ... ... ... ... ... ... ... не функцияны шақыру
командасын
.
түрінде жазу керек. Мысалы, бір проектінің ... ... ... мен minmax1 ... жазулы болсын. Осы проектіде қосымша 2-
форманы (Form2-ні) ашып, оның код терезесінде мынадай процедураны енгізіп,
іске ... ... Sub ... ... Sub
Егер модульдік процедура не функция бас0f проектіде орналастырылған
болса, шақыру командасының синтаксисі:
..
Айнымалыны жан - жақты ... ... ... ... сол ... ғана ... ... айнымалы деп атайды. Айнымалыны проектінің ... ... ... ету үшін оны ... ... ... - ... кілттік сөзі арқылы сипаттау қажет.
Жан - жақты айнымалыны құру тәсілі:
1. Project - Add Module ... ... ... ... ... шерту. Module1 атаулы бос модуль General (Жалпы) және ... ... бар код ... ... ...... тағайындау пункті. (Declaration) ... ... ... ... ... қойылады. Тізімді ашу әдеттегідей).
2. Терезеге модульдік айнымалыны, мысалы, Espt айнымалысын, Public
кілттік сөзі арқылы сипаттауды ... ... ... ... ... ... File – Save Module As.
4. Ашылған терезе өрісіне mnEspt.bas ... ... ... ... ... ашу ... ... Properties -
Module1). Оның Name қасиетіне modEspt атауын енгізіп, КҚ ... ...

Пән: Информатика
Жұмыс түрі: Дипломдық жұмыс
Көлемі: 53 бет
Бұл жұмыстың бағасы: 1 300 теңге









Ұқсас жұмыстар
Тақырыб Бет саны
Visual basic программалау ортасы36 бет
Delphi программалау ортасының негізі34 бет
Visual Basic33 бет
Visual basic тілінде программалау негіздері31 бет
Visual basic туралы жалпы түсінік27 бет
Visual basic-ті оқыту әдістемесі13 бет
Visual Вasic ортасында “Мектеп математикасына көмекші есептегіш құрал” дайындау23 бет
Дыбыстық технологиялардың компьютерлік құралдары40 бет
Объектті бағдарлы программалау түсінігі29 бет
Операторлар және ішкі программалар (Delphi программалау ортасы)22 бет


Исходниктер
Пәндер
Көмек / Помощь
Арайлым
Біз міндетті түрде жауап береміз!
Мы обязательно ответим!
Жіберу / Отправить


Зарабатывайте вместе с нами

Рахмет!
Хабарлама жіберілді. / Сообщение отправлено.

Сіз үшін аптасына 5 күн жұмыс істейміз.
Жұмыс уақыты 09:00 - 18:00

Мы работаем для Вас 5 дней в неделю.
Время работы 09:00 - 18:00

Email: info@stud.kz

Phone: 777 614 50 20
Жабу / Закрыть

Көмек / Помощь