Visual Basic ортасында функцияларды зерттеу тақырыбын оқыту әдістемесі

Кіріспе

1тарау. Visual Basic.тегі графика элементтерін оқыту әдістемесі 1.1. Басқарудың графиктік элементтері
1.2. Line (түзу) . басқару элементі
1.3. Shape (контур) басқару элементі
1.4. Image (Сурет) басқару элементі
1.5. PictureBox (Графиктік аймақ) басқару элементі
1.6. Мысалдар

2 тарау. Графиктік әдістер жүйесін оқытудағы көрнекіліктер
2.1. Координата жүйесі
2.2. Scale әдісі
2.3. Pset әдісі
2.4. Line әдісі
2.5. Circle (шеңбер) әдісі
2.6. Мысалдар
2.7.Visual Basic программасы көмегімен функция графиктерін зерттеу

Қорытынды

Қолданылған әдебиеттер

Қосымша
Кіріспе

Компьютерлік жүйенің даму барысында программалық қорында радикалды өзгерістер болды. Компьютердің алғашқы даму эпохасында компьютер бір бөлмені алып тұрды, ал программисттерге қарапайым қосу операциясын орындау үшін тумблерлерді басу қажет еді. Сол кезде осындай машиналар технологияның шедеврлары деп саналды, машинаның көмегімен екі санды қосуға болатын! Технология біртіндеп дами бастады, ал пефокарталардың пайда болуы программисттердің мүмкіндіктерін кеңейтті - бір жолдық программалық код бір картаға орналастырылды. Осындай карталардың көмегімен үлкен программалар жасалды.
Машиналық кодта программа жазудың келесі этапы ассемблер және BASIC тілдерінде (мына сөздерді қысқартқаннан шыққан Beginners All-Purpose Symbolic Instructional Code “жаңа меңгерушілерге арналған символдық инструкциялардың көп мақсатты коды”) пограмма жазу үшін мәтіндік редакторлар колданылды. Қазіргі кезде BASIC тілі ең қарапайым, сонымен қатар программалық тілдердің ішіндегі ең мықтысы болып табылады. Microsoft Visual Basic 6 – программалық тілдердің тізіміндегі ең жаңасы.
Visual Basic-тіњ 6-шы версиясы - Visual Basic сериясындағы жаңасы. С++ немесе басқа программалық тілдердің эксперті болмай-ақ Visual Basic-тің көмегімен оңай және тез Windows-қа қосымша жасауға болады. Visual Basic – тегі графикалық орта көмегімен қосымшада қолданылатын формаларды, басқарушы элементтерді көрнекі қылып жасауға болады.
Visual Basic-те программистің жұмысын жеңілдететін көптеген пайдалы инструменттер бар. Олар: проектілер, формалар, объектілер, стандартты емес басқару элементтері т.с.с. Қосымша құру басқа программаларға қарағанда тезірек болады, айырмашылықты аптаменен салыстыруға болады.
Visual Basic 6-шы проектісі Internet-ке негізделген. Оған кіретін бірнеше элемент Web ( орындаушы файлы- ActiveX) - ке ерекше класс құра алады. Олар Visual Basic- те жасалған кәдуілгі жеке қосымшалар
        
        Қазақстан Респубикасы Білім және Ғылым министрлігі
Информатика кафедрасы
Диплом жұмысы
Тақырып: «Visual Basic ортасында функцияларды ... ... ... ... ... ... ... меңгерушісі:
Кіріспе
1тарау. Visual Basic-тегі графика элементтерін оқыту әдістемесі
1.1. Басқарудың графиктік элементтері
1.2. Line (түзу) – басқару элементі
1.3. Shape ... ... ... Image ... ... ... ... (Графиктік аймақ) басқару элементі
1.6. Мысалдар
2 тарау. Графиктік әдістер жүйесін ... ... ... ... Scale ... Pset ... Line ... Circle (шеңбер) әдісі
2.6. Мысалдар
2.7.Visual Basic программасы ... ... ... ... жүйенің даму барысында программалық қорында радикалды
өзгерістер болды. Компьютердің алғашқы даму ... ... ... алып тұрды, ал программисттерге қарапайым қосу операциясын ... ... басу ... еді. Сол кезде осындай машиналар технологияның
шедеврлары деп саналды, машинаның көмегімен екі ... ... ... ... дами ... ал ... пайда болуы
программисттердің мүмкіндіктерін кеңейтті - бір ... ... код ... ... ... ... ... үлкен программалар
жасалды.
Машиналық кодта программа жазудың келесі этапы ассемблер және BASIC
тілдерінде (мына ... ... ... ... ... Instructional Code “жаңа меңгерушілерге арналған ... көп ... ... пограмма жазу үшін ... ... ... кезде BASIC тілі ең қарапайым, сонымен
қатар программалық тілдердің ... ең ... ... ... ... Basic 6 – программалық тілдердің тізіміндегі ең жаңасы.
Visual Basic-тіњ 6-шы версиясы - Visual Basic сериясындағы ... ... ... ... ... эксперті болмай-ақ Visual Basic-тің
көмегімен оңай және тез ... ... ... болады. Visual Basic –
тегі ... орта ... ... ... ... ... ... қылып жасауға болады.
Visual Basic-те программистің жұмысын жеңілдететін көптеген ... бар. ... ... ... ... ... ... элементтері т.с.с. Қосымша құру басқа программаларға қарағанда
тезірек болады, айырмашылықты ... ... ... Basic 6-шы ... Internet-ке негізделген. Оған кіретін
бірнеше элемент Web ( орындаушы файлы- ActiveX) - ке ... ... ... Олар Visual Basic- те ... ... жеке ... ретінде
ж±мыс істейді, біраќ олармен ж±мыс істеу ... ... ... 4- ... ... ... ... ќарастырып олардыњ
Internet арќылы тарауын ќамтамасыз етуге болады.
Visual Basic 6-шыда жања проект шаблондары пайда ... ... ... DHTML ... Б±л ... ... ... Web
беттерді жєне ќосымшаларды жасайды.
Visual Basic-ті Windows ж‰йесіндегі Проводник ... ... ... жаѓдайлар ќолданушыѓа бірден Visual Basic-те ќосымшаларды
жасауѓа кірісіп кетуге ... ... ... ... ... ... оњ жаќ батырмасымен басќаруѓа ... ... ... ... ... жања элементтер ќосады жєне
контекстік аныќтамаларды кµруге м‰мкіндік ... тілі ... ... Visual Basic ... Яѓни ... ... ала ... есепті
шешпейді, программадаѓы объктілермен болып жатќан оќиѓалар жайында
жазылады.
Visual Basic ... ... ... яѓни осы ... ... жаѓдайларды кµрсететін процедуралармен функциялардан
т±рады.
Программаныњ негізгі элементі обьекттер. ... жєне ... ... (яѓни олардыњ кодтары) бірігіп бір б‰тінді береді. Осы
бірігу процесін инкапсуляция деп ... Код ... ... ... оќиѓасы арќылы байланысады.
Объекттер группасы класс ќ±рады. Класс дегеніміз- жања ... ... ... ... шаблондары.
Атаулар объектілерді программада белгілеу ‰шін ќажет.
Атауларды беру ережелері:
• Бірінші символ латын ... болу ... ... тек ... єріптері, сандар жєне ( _ ) ... ... ... ... 40 ... ... ... Негізгі сµздер (Ключевые слова) немесе Reserved ... ... атау бола ... ... ... ... ... мынадай т‰рде ж‰реді:
“имя объекта”.“свойство объекта” немесе
“имя объекта”.“метод для объекта”
********************
Form4.caption = “Картотека”
F1.Hide
********************
Күрделі формулировка:
********************
Form1.ActiveControl.BackColor
F1.ActiveControl.Caption
********************
Visual Basic объекті- ... ... ... принциптерін
ќанаѓаттандырмайды.
Полиморфизм жєне мұрагерлік толыѓымен Visual Basic- те ќамтылмайды.
Полиморфизм дегеніміз - єр ... ... ... ... ... Ол ... түрлі объекттерге жатсада бірдей есептерді шешеді.
Мұрагерлік дегеніміз – ... ... ... жања ... Жєне ... жања ... бұрынѓы класстардыњ мүмкіндіктерін,
ќасиеттерін мұра етеді.
1 ... Visual ... ... ... оқыту әдістемесі
1. Басқарудың графиктік элементтері
Visual Basic графиктік нысандармен жұмыс істеуге арналған ... және ... ... ... Бұл құралдардың
көмегімен Windows қосымшаларын жобалау процестері жүзеге асырылады.
Visual Basic-тегі графикті ... ... ... ... Атап ... ... ... бір ақпаратты ерекшелеп көрсетуге;
• ақпаратты әр түрлі нұсқаларда бейнелеп көрсетуге, мысалы, графиктер
мен диаграммалар түрлерін;
... ... өте ... ... ... ... құралдар блогында (Toolbox) басқарудың графиктік
элементтерінің көптеген түрлері бар. Олар екі ... ... ... және ... ... ... бар ... Мысалы, Line – қарапайым басқару элементі, ол тек қана түзу
сызық сызу үшін ... ...... ... ... ... мен ... жиынтығынан тұрады.
Line және Shape түріндегі басқару элементтерін қолдану
Line және Shape басқару элементтері ... ... ... ... ... ... табылады. Жұмыс істеу ... ... ... кез ... ... орналастыруға болады. Программаның
орындалуы барысында бұл ... ... ... ... ... жасырынып
тұруы мүмкін, Программалық кодта ... ... ... арқылы
олардың түстерін өзгертуге болады.
1.2. Line (түзу) – басқару элементі
Бұл ... ... ... ... ... ... түзу ... Элементтің өзіне тән қасиеті арқылы оның қалыңдығын, ... ... ... ... ... болады. Line басқару
элементінің мүмкіндіктері шектеулі, ол қарапайым түрде қолдануға арналған,
яғни ... және ... ... ... жағдайда Line элементі бүтін
түзу сызады, алайда BorderStyle қасиетіндегі мәндерді өзгерту ... ... ... ... ... ... сызықты алуға болады. Төмендегі суретте
Line элементінің BorderStyle қасиеті арқылы анықталынатын сызық түрлері
көрсетілген.
1-сурет Line ... ... ... ... болатын сызық түрлері
Егер BorderWidth қасиетінің мәні бірден үлкен ... онда ... мәні ... ... ... әсер ... ... элементінің негізгі қасиеттері:
|Қасиеті ... ... ... ... ... ... |Сызықтың түрін таңдау. Мүмкін болатын мәндер: |
| |0 ... ... |
| |1 ... ... |
| |2 ... VbBSDash |
| |3 ... сызықтар), VbBSDot |
| |4 ... ... ... |
| |5 ... ... үзік ... ... |
| |6 ... ... ... VbBSInsideSolid |
|BorderWidth ... ... ... ... және Y1 ... бастапқы нүктесінің координатасын таңдау |
|X2 және Y2 ... ... ... ... ... |
Формада түзу сызық сызу
1.  Басқару элементтері тақтасынан Line элементін таңдап алу. ... ... ... ... бағыттауыштары бар крест түріне айналады.
2.  Тышқан көрсеткішін сызықтың бастапқы нүктесі ... ... ... сол жақ кнопкасын басып жібермей ұстаймыз.
3.  Тышқан арқылы бағыттауыштары бар кресті сызықтың соңғы ... ... ... тышқан кнопкасын босатамыз.
4.  Егер сызықтың түрін өзгерту қажет болса, онда Properties ... ... ... ... ... тізімінен сызық типін таңдаймыз.
1.3. Shape (контур) басқару элементі
Shape басқару ... ... ... ... графиктік
элементтерді орналастыруға мүмкіндік жасайды. Атап айтар ... ... ... ... ... алты ... бірін таңдап
алуға болады. Shape басқару элементінде де фигураның сызықтарының формасын
BorderStyle қасиеті арқылы ... ... ... Line ... өзгешелігі, мұнда координата
жүйесі қолданылмайды. Координата орнына фигура ... ... үшін ... Width ... ... ... ... түспен бояуға, сыртқы
контурының сызықтарын өзгертуге ... Shape ... ... ... элементінің негізгі қасиеттері:
|Қасиет ... ... ... шекарасының түсін анықтау ... ... ... түсін анықтау ... ... ... ... ... ... Егер ... |
| ... ... ... ... 0 ... |
| ... онда ... фоны ... ... ... |
| ... бір ... бояу үшін BackStyle мәні 1 |
| ... ... ... ... ... шекарасы сызығының түрін анықтау ... ... бояу ... ... ... ... аймағының енін анықтау ... |Фон ... ... |
| |0 – ашық ... ... |
| |1 – ... (непрозрачный) (Opaque). ... ... ... анықтау. Мүмкін болатын мәндер: |
| |0 (тік ... ... |
| |1 ... , ... |
| |2 ... , VbShapeOval |
| |3 ... , ... |
| |4 ... ... ... , |
| ... |
| |5 ... ... ... , ... |
Формада жоғарыда аталған фигуралардың бірін салу ... ... ... Shape ... ... Тышқанның
көрсеткіші форма ішіне келгенде бағыттауыштары бар крест түріне айналады.
2. Форма ішінде ... сол жақ ... ... ... ... ... дейін кресті жылжытамыз. 
3. Properties терезесінен Shape қасиетін таңдаймыз.
4. Settings тізімінен қажетті ... ... ... Image ... ... элементі
Image басқару элементі формада графиктерді көрсету үшін қолданылады.
Мұнда келесі форматтағы графикалық суреттер қолданылады: растрлық (bitmap)
бейнеде, ... ... ... ... JPEG және GIF ... қоса бұл ... Clic ... жауап қатады және оларды
басқару кнопкалары ретінде немесе қарапайым ... құру ... ... ... ... ... ... форматтары
|Формат |Кеңейтілуі |Файл типі ... |.bmp, ... ... ... нүктелер жиынтығы |
| | ... ... ... |
|Icon |.ico ... ... ... түрі ... |
| | ... ... ең ... ... 32 х 32 |
| | ... ... ... Windows 95-те 16 х |
| | |16 ... ... ... кездеседі. |
|Cursor |.cur ... ... ... бейне болып табылады. |
|Metafile |.wmf, .emf ...... ... ... немесе|
| | ... ... ... ... |.jpg, |8 және 24 биттік ... ... ... |
| |.jpeg ... ... көп қолданылатын |
| | ... ... ... ... |.gif |256 ... ... ... графиктік формат.|
| | |Бұл ... ... өте көп ... ... ... ... ... өлшемі оның
өлшеміне қарай автоматты түрде ... Image ... ... файл ... ... ... функциясы арқылы тазартуға
болады. LoadPicture операторы программаның орындалуы барысында да ... ... ... Image ... ... ... ... суреттің созылатынын немесе созылмайтынын анықтайды. Егер, бұл
қасиеттің мәні True ... онда Picture ... ... ... ... ... созылады. Алайда, суретті (әсіресе растрлық) созу оның
сапасын төмендетеді.
Image басқару элементінің негізгі ... ... ... |Көрсетілетін растрлық бейнені береді. |
| ... ... ... ... |
| ... |
| |Picture = ... (ФайлдыңТолықАтауы) |
| ... ...... ... ... ... ... ... ... қасиет. Егер, ол True болса, онда бейне |
| ... ... ... ... ... |
| ... ... басқару элементіне суретті ауыстыру буферінің көмегімен форманы
құру барысында орналастыруға болады. Ол үшін қажетті ... ... бір ... ... ... алып, формадағы Image басқару
элементін таңдап, + клавишаларын басып, буфердегі ... ... ... ... ... ... аймақ) басқару элементі
PictureBox басқару элементі Image басқару элементіне ... ... де ... ... ... үшін ... және бірде
графиктік форматтарды қабылдайды. Алайда графиктік аймақтың Image ... жоқ ... ... бар. ... басқа басқару
элементтері үшін қойма (контейнер) міндетін атқару, графиктік әдістерді
қолдану.
PictureBox ... ... ... ... ... ... ... (bitmap) бейнеде, значок, метафайл, кеңейтілген
метафайл, JPEG және GIF файлдары
Графикті ... ... ... ... ... қалыпты жағдайда
графиктің алғашқы өлшемін қолданады. Бұл дегеніміз, егер суреттің өлшемі
графиктік ... ... ... ... онда ... ... қалған бөлігі
қиылып қалады дегенді білдіреді. Ал графиктік аймақ, жылжыту бөлігімен
қамтамасыз етілмейді. ... ... өз ... ... ... ... түрде өзгертуі үшін AutoSize қасиетінің мәнін True деп беру қажет.
Сонда графиктік аймақ ... ... ... өз ... автоматты түрде
өзгертеді.
Графиктік аймақтың Image басқару элементінен тағы бір ... ... ... ... ... басқару элементінің негізгі қасиеттері:
|Қасиет ... ... ... ... ... ... байланысты |
| ... ... |
| ... ... |
| |• ... ... 0 ... |
| |• ... ... 1 ... ... ... |
| ... түзету, басқару элементінің ені форма |
| ... ... ... |
| |• ... ... 2 ... ... |
| ... ... ... ... ... ені |
| ... енімен сәйкес болады); |
| |• ... ... 3 ... сол жақ ... ... ... ... элементінің биіктігі форма |
| ... ... ... |
| |• ... ... 4 ... оң жақ ... ... ... басқару элементінің биіктігі форма |
| ... ... ... ... |Логикалық қасиет. Егер оның мәні True ... онда |
| ... ... ... ... ... толық |
| ... ... ... Ал оның мәні False |
| ... онда ... ... ... ... болса, |
| ... ... ... ... ... ... ... аймаққа LoadPicture функциясының |
| ... файл ... ... ... ... ... ... ... бірінен|
| ... ... үшін ... ... |
| ... Picture = ... |
Графиктік аймақ та ... ... ... ... ... ScaleWidth, ScaleLeft және ScaleTop қасиеттерімен ... ... ... Scale әдісімен қамтамасыз етілген. CurrentX және
CurrentY қасиеттері ағымдағы координатаны ... ... ... ... DrawWidth және DrawMode қасиеттері
графиктік бейнелердің параметрлерін анықтайды. Font, FontBold, FontItalic,
FontUnderline, FontStrikethru, ... FontSize және ... ... ... ... анықтайды. Сls, Print, Pset, Point,
Circle, Line және PaintPicture графиктік әдістер.
Басқарудың графиктік ... ... ... ... ... ... EXE жаңа ... құрып, оған Line басқару элементін және
кнопка орналастыр. Сызық қасиетін өз ... ... ... Clic оқиғаны
өңдеу ортасына мына программалық кодты жаз:
Private Sub Command1_Click()
Line1.Y1 = Line1.Y1 + ... = Line1.X1 * ... = Line1.X2 + ... = Line1.Y2 * ... Sub
Программаны орындауға жібергеннен кеійін, кнопка басылғанда сызық
өзінің орналасу орынын ауыстырады.
1.2 мысал.
Standard EXE жаңа формасын ... Shape ... ... ... әр ... ... (ол үшін ... терезесінде әр фигура
үшін Shape қасиетіне ір түрлі мәндер бер) және бір ... ... Clic ... ... ... мына программалық кодты жаз:
Private Sub Command1_Click()
Shape1.BackStyle = 1
Shape1.BackColor = RGB(12, 200, ... = ... = RGB(220, 100, ... = ... = RGB(120, 10, 250)
Shape4.BackStyle = 1
Shape4.BackColor = RGB(120, 10, 10)
End ... ... ... ... фигуралар әр түрлі түске
боялады (3-сурет).
3-сурет
1.3 мысал.
Paint графиктік редакторында әр ... ... екі ... ... ... ... ... Standard EXE жобасын құрып, оның ... ... ... пайдаланып суреттердің бірін және бір ... ... ... жібергеннен кеін кнопка басылғанда форма
фонындағы ... ... ... құр. Программа кодынан суретті
жүктеу үшін LoadPicture ... ... ... төмендегі программалық кодты пайдалануға болады.
Программаның орындалу нәтижесі ... ... Sub ... = ... Sub
Назар аудар: кнопка басылғаннан кейін формаға өлшемі формадан үлкен сурет
орналастырылды. Кнопка суреттің үстіне шығарылды.
4- сурет
1.4 мысал.
Жаңадан Standard EXE ... ... оған екі Image ... ... бір ... ... Кнопканы басқан кезде Image басқару
элементтерінде бірдей сурет шығатын программа құр. ... Paint ... ... 30 х 30 ... ... етіп сал. ... ... Stretch қасиетінің мәні әр түрлі болсын.
Private Sub ... = ... = ... = ... = LoadPicture("D:/users/sun-user/84.bmp")
End Sub
 Программаның орындалу нәтижесі 5-суретте берілген.
5 - сурет
1.5 мысал.
Paint ... ... ... 70 х 70 ... ... ... ... Standard EXE жобасын құрып, оған әр түрлі өлшемдегі үш PictureBox
басқару элементін және бір кнопка орналастыр ...... ... ... ... ... ... де
бірдей сурет шығатын программа құр. Алайда, Picture1 және ... AutoSize ... мәні False, ал Picture3 ... ... Sub ... = ... = ... = False
Picture2.Picture = LoadPicture("D:/users/sun-user/85.bmp")
Picture3.AutoSize = True
Picture3.Picture = ... ... ... ... ... берілген.
7 – сурет.
PictureBox басқару элементі AutoSize қасиетінің ... ... ... өзгеріске ұшырайтынына назар аудар.
2 тарау. Графиктік әдістер жүйесін оқытудағы көрнекіліктер 
2.1.Координата жүйесі
Әдіс дегеніміз не?
Әдіс дегеніміз қасиет ... ... ... Visual ... ... негізгі мінездемелерінің бірі. (Экрандық форма да нысандар ...... ... Visual Basic ... ... ... бір
амал. Бұл амал ерекше жүйелік программа Visual Basic арқылы орындалады. Бұл
программаны әдіс деп те ... Бұл ... ... ... нәтижесінде нысанда қандайда бір өзгеріс болады, ... ... ... бір мәні ... ... ... нысандарында қандайда бір геометриялық элементтерді
(нүкте, кесінді, ... ... ... ... мүмкіндік беретін
әдісті, графиктік әдіс деп атаймыз.
Нысандар класында қолданылатын қандайда бір әдіс ... амал бар ... ... ... ... өзіне тиісті көптеген әдістері ... ... ... ... болуы мүмкін. Нысандар ... ... ... ... білу ... ... негізгі тақтасынан Object
Browser кнопкасын басу немесе мәзірдегі View бөлігінен ... ... ... ... ... (Окно просмотра характеристик) қарауға
болады. Мұнда, Classes тізімінен өзіңе қажетті нысан класын ... ... осы ... ... тиісті мінездемелер тізімі шығады.
Формаларға және графиктік аймақтарға қолдануға ... ... ... ... |Берілген нысанда декарттық координата жүйесін |
| ... ... ... немесе сурет графиктік аймақты тазартады, |
| ... ... ... ... ... ... |
|Pset ... ... ... ... ... |
|Point ... ... ... ... ... ... түс ... түзу ... тік ... |
| ... ... |Берілген түс ... ... доға ... ... |
| ... ... ... ... ... бейнені шығарады. |
Бұл тақырыпта сипатталатын графиктік амалдардың әрқайсысы координата
жүйесін немесе сурет салу контейнерін қолданады.
Координата жүйесі ... ... ... ... ... ... (х,у) кооординатасы түрінде анықтайды. Мұндағы, х-нүктенің
х өсі бойнша, ал ... у өсі ... ... ... ... ... у=0 ... Basic-те координаталар жүйесіне келесі ережелер қолданылады:
• Басқару элементінің орынын ауыстыруда немесе оның өлшемін өзгертуде
басқару ... ... ... ... ... ... ... раманың ішіне немесе графиктік аймақтың ... ... онда осы екі ... ... ... графиктік
аймақ) контейнер болып табылады.
• Барлық графиктік әдістер және Print әдісі контейнердің координат
жүйесін ... ... ... ... ... оның ... орынын ауыстыратын
операторлардың барлығы да оның өлшемін және орналасу орынын твип
түрінде береді.
... ... ... ... орынын ауыстырар алдында, оның
формаға сиятынына көз жеткізу үшін Height (биіктігі) и Width ... ... ... ... ... сол жақ жоғарғы бұрышының координатасы әрқашанда (0,0) деп
есептелінеді. Қалыпты ... ... ... кез ... ... ... контейнердің сол жақ ... ... яғни ... ... координата жүйесінің әр өсінің өз өлшемі (масштабы)
болуы мүмкін. Өстердің бағытын, бастапқы ... және ... ... ... ... ... ... жағдайда ауыстыру, өлшемді өзгерту және сурет
салу операторларының өлшем бірлігі твип түрінде ... Бір твип ... ... ... тең ( 1440 твип = 1 ... 567 ... 1 см). Нысанды
баспаға шығару кезінде оның өлшемін осы ... ... ... ... ... басқару элементіне) арналған координат
жүйесі масштабтау қасиеті және Scale (Масштаб) әдісі арқылы ... ... ... ... бірін қолдануға болады:
• Масштабты таңдау;
• Стандарты масштабтардың бірін таңдау;
• Өзіңнің жеке масштабыңды құру.
Координата жүйесінің масштабын өзгерту ... ... ... мен оның өлшемін ауыстыруды жеңілдетуі мүмкін.
Қалыпты жағдайдағы ... ... және ... ... ... жүйесін беруге
пайдаланатын бірнеше ... ... ... ScaleTop,
ScaleWidth, ScaleHeight, ScaleMode) және бір әдіс (Scale) ... ... Visual Basic ... үшін масштаб координатаның бастапқы
нүктесін нысанның сол жақ ... ... ... ... ... ... алады.
Қалыпты жағдайдағы масштабқа қайтып оралу үшін Scale әдісін
параметрсіз ... ... ... ... қасиетіне төмендегі мәндердің бірін ... ... ... стандарты масштаб терминдері арқылы алуға болады:
|Мән |Сипаты |
|0 ... ... Егер ... ... ScaleWidth |
| |немесе ScaleHeight ... ... ... ... |
| ... ... ... 0 беріледі. |
|1 ... Бұл ... ... ... Бір ... 1440 |
| ... бар. |
|2 ... Бір ... 72 ... бар. |
|3 ... ... немесе мониторға рұқсат етілген ең |
| ... ... ... ... деп ... ... пиксельдер|
| |саны құрылғының мүмкіндігіне қарай анықталынады. |
|4 ... ... ... символ биіктігі дюймнің 1/6 |
| ... ені ... 1/12 ... тең. |
|5 ... |
|6 ... |
|7 ... ... ... ... ... құру үшін ... ScaleLeft, ScaleTop, ScaleWidth
және ScaleHeight қасиеттерін қолдануға болады.
ScaleLeft және ScaleTop ... ... сол жақ ... ... ... және ScaleHeight қасиеттері сызу аймағының ... ... ... ... өлшем бірлігін анықтайды.
Мысалы:
ScaleWidth = 1000
ScaleHeight = 500
Бұл операторлар форманың ішкі ... ... ... ... өлшемді 1/1000, тік өлшемді 1/500 деп анықтайды.
Масштабтау қасиеттерінің төртеуінің де ... ... ... ... ... да ... ... және ScaleHeight қасиеттерінің мәні
теріс болған жағдайда ол координата жүйесінің ... ... Scale ... ... ... ең ... әдістерінің бірі Scale әдісі
болып табылады.
Scale әдісі нысандардың Экрандық форма (Form) және Графиктік ... Box) ... ... және ... нысандарының абсолюттік координаталары бар, олар
– экрандағы ... (Form ... ... ... ... жағдай
(PictureBox нысаны), өлшемдер (ені және биіктігі). Бұл ... ... ... ... ... координаталар өте үлкен сандар арқылы беріледі, ал ... ... ... ... ... ... белгілі. Сондықтан көптеген
графиктік есептерді шешуде (фигуралар сызу немесе графиктер салуда) жаңа
координата жүйесін құру ... ... Бұл ... ... ... ... бекітіледі, басқаша айтқанда нысанға жаңа координата
жүйесі тағайындалады.
Scale ... ... Scale (Х1, Y1) — (Х2, ... ... ... да мүмкін. Егер НысанАтауы жазылмаса, онда
Scale әдісі қалыпты ... ... ... ... қолданылады.
(X1, Y1) — нысанның сол жақ жоғарғы бұрышының жаңа координатасы. Бұл
координаталар ScaleLeft және ScaleTop ... ... Y2) — ... оң жақ ... бұрышының жаңа координатасы.
Х1, Х2 және У1, У2 ... ... ... ScaleWidth және ScaleHeight қасиеттері анықтайды.
Егер координаталар сәйкесінше Х1 > X1 ... Y1 > Y2 ... ... ... және ... ... теріс мән бергенмен бірдей
болады.
Scale әдісі орындалғаннан кейін Нысанның бұрынғы ... ... ... ... Pset әдісі
Бұл әдісте Scale әдісі қолданылатын нысандарға қолданылады.
Синтаксис метода следующий:
Pset әдісінің жазылуы:
[НысанАтауы.] PSet (X, Y) [, Түс]
Мұнда НысанАтауы ... да ... Егер ... ... ... ... қалыпты жағдай бойынша Экрандық формада қолданылады.
(X, Y) — нысанда бейнеленетін ... ... ... ... түрлі-түсті бояудың координатасы.
Түс (Цвет) — мәні Long типті сан болатын өрнек. Бұл сан арқылы Visual
Basic-те қандайда бір түс ... ... ... vbWhite, ... ... Visual Basic ... ... ыңғайлы.
Әдісті жазу кезінде түс берілмеуі де мүмкін, онда қалыпты жағдайда
оған қара түстің коды 0 беріледі.
Егер PSet ... ... ... Scale ... ... онда ... У ... ретінде Нысанның абсолюттік ... ... ... оның ... фон ... ... етіп ... керек.
Мысалы, егер нүкте Picture1 графиктік терезесінде салынған болса, онда ... үшін мына ... ... ... (50, 70), ... ... ... үшін сурет салып отырған нысандағы DrawWidth
қасиетінің мәнін ... ... ... жеткілікті. DrawWidth қасиетінің
мәні бүтін сан болуы да мүмкін.
2.4. Line әдісі
Графиктік Line әдісінің көмегімен түзу немесе тік ... ... ... әр ... ... ... ... кеңінен
қолданылады. Бұл әдіс нысандардың Экрандық формалар (Form) және Графиктік
аймақтар (PictureBox) кластарына қолданылады.
Line әдісінің мүмкіндіктері:
• осы әдіс ... ... түзу ... ... ... нысандарда боялған немесе боялмаған тік төртбұрыштар бейнелеу.
Line әдісінің жазылуы:
[НысанАтауы.] Line (Х1, Y1) — (Х2, У 2) [, Түс [, ... ... ... ... да ... Егер ... жазылмаса, онда
Line әдісі қалыпты жағдай бойынша Экрандық формада қолданылады.
Line қызметші сөзінен кейін жеке ... ... үтір ... ... параметрлері жазылады.
(XI, Y1) — (Х2, Y2) параметрлері — кесіндінің алғашқы және ... ... ... тік ... оң жақ ... және сол
жақ төменгі (немесе керісінше сол жақ жоғарғы және оң жақ ... ... ... — мәні Long типті сан болатын өрнек. Бұл сан арқылы Visual
Basic-те ... бір түс ... ... ... де ... ... жағдайда ол нысанның
ForeColor қасиетіндегі мәнімен бірдей болады.
Жалауша (Флаг) параметрі – В ... BF ... ... В ... тік ... ВҒ болғанда боялған тік төртбұрыш сызылады. (Бояу ... ... ... ... ... ... бірін беруге болады:
|Мән |Сипаты |
|0 ... Тік ... ... ... ... |
| ... толтырылады (боялады). |
|1 ... ... ... мән). ... нысан боялмайды. |
|2 |Көлденең сызықтар. |
|3 |Тік ... |
|4 ... ... ... ... |
|5 ... ... ... ... |
|6 ... ... |
|7 ... ... ... ... ... ал Түс ... онда ... ... ... болмайды. Себебі жүйе Жалауша мәнін Түс мәні ретінде қабылдайды.
Түзудің немесе түк төртбұрыштың ... ... ... ... Ол үшін PSet ... ... қасиетінің мәнін
өзгертеміз. Қалыпты жағдайда DrawWidth ... мәні 1-ге ... ... түзу ... ... ... Ақырғы нүктені салу
үшін мына ... ... ... [Step] (0, 0) [, ... түзу сызу ... ... ... (XI, Y1) берілмесе, онда
Visual Basic алғашқы нүкте ретінде нысанның ... ... ... ... ... ретінде алды. Нысанның ағымдағы жағдайы
CurrentX және CurrentY қасиеттері арқылы беріледі.
Pset, Line және Circle ... (х,у) ... ... ... бір
немесе бірнеше нүктелер жиынтығын салады.
Осы нүктелердің әр қайсысын соңғы салынған нүкте координатасының
өсімшесін беретін Step ... ... ... ... Visual ... х және у мәндерін меншіктеп отырады.
Мысалы Line (100, 200)-(150, 250) операторы
Line (100, ... 50) ... тең ... Circle (шеңбер) әдісі
Circle әдісінің көмегімен шеңбер, эллипстік формалар, доға (шеңбер
сегменті) және ... ... сызу үшін оның ... ... ... мен, ... беруіміз
қажет. Circle әдісінің толық жазылуы:
 
[НысанАтауы.] Circle [Қадам]( X, Y), Радиус [,Түс]
Тік ... ... ... ... емес, яғни жазбауға болады.
Параметрлер міндетттері төмендегідей:
Қадам – Соңғы сызылған нүкте координатасының өсімшесін ... Y) – ... Circle ... ... ... центрінің координатасы.
Радиус – шеңбер радиусы.
Түс — сызық түсі.
Circle (1200, 1000), 750 – ... ... ... ... радиусы 750 болатын шеңбер сызады. Өлшем бірліктер твип арқылы
алынған.
Бұл оператордың ... ... ... ... ... ... байланысты.
ScaleWidth және ScaleHeight масштабтау қасиеттерінің ... ... ... ... ... ... ... + ScaleLeft) / 2, (ScaleHeight + ScaleTop) / 2),
ScaleWidth / 4
Доға сызу
Доға сызу үшін Circle ... ... ... мен ... ... ... беру керек.
 
[НысанАтауы.] Circle [Қадам](X, Y),Радиус[,Түс] [,Бұрыш1] [,Бұрыш2]
Бұрыштар мәні 0 мен 2( аралығында беріледі. 0 мәні оңға ... ... өске ... ... 0 ... ... «-» (минус) таңбасы қойылса, онда доға ... ... ... тілінің бағытына қарсы бағытта сызылады.
 
Мысалы:
1. Формаға орналастырылған кнопка басылғанда ... доға ... Sub ... PI = ... = ... (2500, 1500), 1000, , 0, ... ... Формаға орналастырылған кнопка басылғанда секторы бөлініп алынған
дөңгелек сызылады (14-сурет):
Private Sub Command1_Click()
Const PI = 3.14159265
Circle (3500, 1500), 1000, , -PI / 2, -PI / ... ... ... ... ... ... ... |0 |210о |7/6( ... |(/6 |240о |4/3( ... |(/3 |270о |3/2( ... |(/2 |300о | ... |4/6( |330о | ... |5/6( |360о | ... |( | | ... ... әдісі арқылы эллипс сызудың толық жазылуы:
[НысанАтауы.] Circle [Қадам](X, Y), Радиус [, Түс] [, ... ... [, ... және ... ... ... егер олар ... онда міндетті түрде үтір қойылады.
СығуКоэффициенті – тік және көлденең өстер бойынша ... және олар ... ... ... СығуКоэффициенті бірден үлкен оң сан болса, онда тік өс бойынша
сығылған эллипс сызылады, ал бірден кіші оң сан ... онда ... ... ... ... ... орналастырылған кнопка басылғанда экранда эллипс сызылады (15-
сурет):
 
Private Sub ... = ... (600, 1000), 800, , , , ... = ... (2400, 1000), 800, , , , 1 / ... Sub
15-сурет
Басқарудың графиктік әдістерін ... ... ... ... жоба ... ... бір ... аймақ және 3 кнопка орналастырамыз. Графиктік
аймақта оның өлшемін әр түрлі өлшем бірлікте көрсететін екі ... ... ... ... ... Sub ... = ... = "(" & Picture1.ScaleLeft & ", " & Picture1.ScaleTop &
")"
Label2.Caption = "(" & Picture1.ScaleLeft + ... & ", "
& ... + ... & ... ... Sub ... = ... = "(" & Picture1.ScaleLeft & ", " & ... ... = "(" & ... + ... & ", "
& Picture1.ScaleTop + Picture1.ScaleHeight & ")"
End Sub
Private Sub ... = ... = "(" & ... & ", " & ... ... = "(" & ... + Picture1.ScaleWidth & ", "
& Picture1.ScaleTop + Picture1.ScaleHeight & ")"
End Sub
2.2-мысал
Жобаға бір ... ... және бір ... ... Scale ... қолданушының координата жүйесін құр. Сол жақ жоғарғы бұрыштың
координатасы (100,100), оң жақ ... ... ... ... ... жақ ... және оң жақ төменгі бұрыштың координаталарын графиктік
экранда көрсетіп тұратын жағдайды ... ... Sub ... (100, 100)-(200, 200)
Label1.Caption = "(" & Picture1.ScaleLeft & ", " & Picture1.ScaleTop &
")"
Label2.Caption = "(" & ... + ... & ", "
& ... + Picture1.ScaleHeight & ")"
End Sub
Осы құрған программаны (-7, 5) (7, -5) ... ... етіп ... Sub Command1_Click()
Picture1.Scale (-7, 5)-(7, -5)
Label1.Caption = "(" & Picture1.ScaleLeft & ", " & ... ... = "(" & ... + ... & ", "
& ... + Picture1.ScaleHeight & ")"
End Sub
2.3 - мысал
Кнопканы басқанда графиктік аймақта декарттық координата ... ... ... Координата жүйесінің өстерін Line ... ... Х және У ... ... -10 мен 10 ... ... Sub ... (-10, 10)-(10, -10)
Picture1.Line (0, 10)-(0, -10)
Picture1.Line (-10, 0)-(10, 0)
End Sub
2.4 - мысал
Кнопканы басқан кезде ... ... ... ... кездейсоқ
түске боялған түктелер пайда болатын программа ... Ол үшін ... ... және ... ... Кездейсоқ мәліметтермен жұмыс істеу
үшін Rnd функциясы қолданылады.
Rnd (сан) ... 0 мен 1-дің ... ... сандарды
анықтайды. Rnd функциясын шақырар алдында Randomize нұсқауын пайдаланамыз.
Программа тексті мынадай болады, ал оның орындалу нәтижесі 9-суретте
көрсетілген: 
Option ... Sub ... R As ... G As ... B As ... XPos As Integer
Dim YPos As Integer
Randomize
R = 255 * Rnd
G = 255 * Rnd
B = 255 * Rnd
XPos = Rnd * ... = Rnd * ... = ... (XPos, YPos), RGB(R, G, ... ... - ... ... қолдану арқылы 10-суретте көрсетілген фигураларды экрандық
формада салу.
Суреттегі фигураларды ... ... ... процедурасы төмендегідей:
10-сурет
Private Sub Command1_Click()
Line (200, 200)-(2200, 200), 255 ‘Көлденең сызылған жіңішке қызыл
сызық
DrawWidth = ... (200, ... 1400), vbCyan ... ... ... көк ... = 2
Line (200, 1800)-(2000, 1100), vbRed ‘Орташа қалыңдықтағы ... ... (1400, ... 500), , B ... тік төртбұрыш
Line (1600, 500)-(2400, 1000), vbRed, BF ‘Боялған тік ... ... - ... аймақта үшбұрыш салу.
Private Sub Command1_Click()
Picture1.CurrentX = 1500
Picture1.CurrentY = 500
Picture1.Line -(3000, 2000)
Picture1.Line -(1500, ... -(1500, ... ... ... ... ... - мысал
Қолданушының координата жүйесін пайдаланып 12-суретте бейнеленген
фигураларды сызатын программа құру.
Private Sub Command1_Click()
Picture1.Scale (0, 10)-(15, 0)
Picture1.FillColor = vbRed
Picture1.FillStyle = ... (1, 1)-(5, 3), , ... = ... (3, 4)-(6, 7), vbBlue, ... = 6
Picture1.Line (8, 2)-(14, 9), , B
End Sub
12-сурет
2.8. ... ... үзік ... арқылы шеңберлер сызыатын программа
құру.
  Private Sub Command1_Click()
Dim R As ... G As ... B As ... Radius As ... XPos As ... YPos As ... = 255 * Rnd
G = 255 * Rnd
B = 255 * ... = ... / ... = Form1.ScaleHeight / 2
Radius = ((YPos * 0.9) + 1) * ... (XPos, YPos), Radius, RGB(R, G, ... ... ... ... Circle ... әр түрлі параметрлері қолданылғандағы
фигуралар сызылады:
Экрандық формада бір ... және ... ... үш нысаны
орналастырылған (16-сурет).
Программа коды:
Dim Angle As Double
Const pi = 3.14159265358979
Private Sub Command1_Click()
Picture1.Scale (0, 35)-(15, 0)
Picture2.Scale (-5, 20)-(45, ... (-25, 15)-(15, ... = " ... ... ... ... (5, 25), 2.5, ... = vbCyan
Picture1.FillStyle = О
Picture1.FillColor = vbCyan
Picture1.Circle (11, 25), 2.5
Picture1.FillColor = vbCyan
Picture1.ForeColor = vbBlue
Picture1.Circle (8, 5.5), 5.5, , , , ... (8, 16), 4.5, , , , ... = ... = " ... ... және дөңгелек секторы "
Picture2.FillStyle = 0
Picture2.FillColor = vbCyan
Picture2.ForeColor = vbCyan
Picture2.Circle (5, 8), 4.5
Picture2.Circle (15, 8), 4.5
Picture2.Circle (25, 8), 4.5
Picture2.Circle (35, 8), ... = ... = ... (5, 8), 4.5, vbBlack, 1, ... = 1
Picture2.Circle (15, 8), 4.5, vbBlack, -1, -5
Picture2.Circle (25, 8), 4.5, vbBlack, -5, -1
Picture2.Circle (35, 8), 4.5, vbBlack, -0.3, -5.8, ... = " ... ... ... бояу"
Angle = 2 * pi / 7
Picture3.ForeColor = 0
Picture3.FillStyle = 0
Picture3.FillColor = vbRed
Picture3.Circle (0, 0), 10, , -6 * Angle, -7 * ... = ... (0, 0), 10, , -5 * Angle, -6 * ... = ... (0, 0), 10, , -4 * Angle, -5 * ... = ... (0, 0), 10, , -3 * Angle, -4 * ... = vbMagenta
Picture3.Circle (0, 0), 10, , -2 * Angle, -3 * Angle
Picture3.FillColor = vbCyan
Picture3.Circle (0, 0), 10, , -Angle, -2 * ... = ... (0, 0), 10, , 0, ... ... мысал
Бұл мысалда тышқан кнопкасы басылғанда шеңбер центрі ... ... сол ... центр етіп алынған шеңбер сызылады. 17-сурет.
Программа коды:
Dim X0 As ... Y0 As ... Sub ... ... Sub Form_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)
X0 = X ... ... ... ... ... = Y
MousePointer = vbCrosshair ‘
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X ... Y As ... = Sqr((X - X0) ^ 2 + (Y - Y0) ^ 2) ... ... ... (X0, Y0), R ... ... = vbDefault
End Sub
17-сурет
2.7. Visual Basic программасы көмегімен функция графиктерін ... Visual Basic 6 – ... тілі VB – тіњ ... ... ... ... Visual Basic – тіњ жања ... жасалуда.
Visual Basic – µрісі кез келген практикалыќ ќосымшаларда тиімді, ыњѓайлы
пайдаланылады. Visual Basic кµмегімен кµптеген ... ... ... ... ойын ... басќа да ... ... ... ... аз уаќыт ішінде жазуѓа болады.
Windows- пен байланысќан жєне ... ... ... ... ќ±ру ... ... этаптары орындалу керек:
1. Визуалды программалау – программаныњ ж±мыс істеу ... ... ... ... ... ... басару элементтеріне негізделген. Олар тєсілдері жєне
аныќталѓан ќасиеттері бар дайын объекттілер. Б±л ... ... жєне ... мен ... ... ... етеді.
2. Баќару элементініњ ќасаиттерініњ мєндері- мєндер программа
ж‰ктелер алдында беріледі немесе программа барысында µзгертілуі
м‰мкін.
3. Код ... ... ... ... ... ж±мыс. Ол
µзінен -µзі емес, оќиѓаѓа байланысты орындалатын программаныњ
орындалуын ќадаѓалайды.
4. Тексеру жєне бейімдеу.
BackColor, Caption, ... ... ... FontSize,
FontUnderline, Height, Width, Name, Top, Left, Visible.
MaxLength (Максимальная длина) үнсіздік бойынша 0- мєнін ... кез- ... ... символдарды шыѓаруѓа мүмкіндік береді.Келесі
мєні санаулы символды ѓана ќабылдайды немесе ... Line ... ... False ... ие ... бір жолдан тұратын
тексті енгізеді немесе шыѓарады. Ал True ... ... ... ... ... ... Enter ... басу арќылы тексті жања жолдан
бастауѓа болады.
PasswordChar текстік өрісте пайда болатын символды ... егер ... ... ... үшін ќолданса. Пароль енгізу ... тек ... (Multi ... - ... ... элементін µолдануѓа болады. Ол
стандартты разрядтар тобына жатпайды жєне ... ... ... ... емес ... ... ќосу Project мєзіріндегі
Components диалогы арќылы ж‰зеге асады. Microsoft Masked Edit Control ... ... ... ... 0- ... ... ... терезеде
сызѓыш жоќ),7- мєнін ќабылдаса ( горизонтальді сызѓыш пайда болады), 2 -
мєнін ... ( ... ... пайда болады ), 3 - мєнін ќабылдаса
(вертикальді жєне ... ... ... болады).
ActiveX – технологиясы Internet кµмегімен ќосымшалар ... ... Basic Windows API – пен ... кез ... проект жасауѓа
арналѓан салмаќты ќ±рал болып табылады.
Бітіру жұмысының ... ... ... ... ... ол осы Visual ... көмегімен дайындалған функция
графиктерін салуға арналған программа. Бұл программа ... кез ... ... ... ... болады. Сондай ақ бір координаттық
жазықтықта бірнеше функцияның графигін салып көруге де ... ... ... ... ... ... бейнесі 18-суретте
көрсетілген.
Жұмыс істеу алаңындағы негізгі кнопкалардың атқаратын қызметттері:
1- «график по формуле» - формулалар алаңындағы ... ... ... ... на поле ... - ... формуланы формулалар алаңына
жібереді;
3- «очистка поля записей»- ... жазу ... ... ... - ... жазу ... соңғы жазылған символды
өшіреді;
5- «пробел» - формула жазу алаңында бос орын ... ... ... ... - ... салу ... ... «выход» - жұмысты аяқтап, программадан шығу.
18-сурет
Программаның жазбасы А-қосымшада берілген.
Қорытынды
Оқыту процесінде компьютерді қолдану оқушылардың ... ... ... ... ... және сабақ уақытын тиімді пайдалануға
мүмкіндік жасады. Мысалы, у=ах2 ... ... ... у=ах2+n,
у=а(х+m)2+n функцияларының графиктерін шығарып алу ... ... ... орындау барысында графиктердің қандай бағытта ... ... баяу ... анық ... ... ... 45 минутта ең көп дегенде 5-6 графикті салу ... ... ... ... компьютерді қолданған сабақта 12-14
графикті салу есептерін шығарып, олардың қасиеттерін тұжырымдауға ... ... ... төмен оқушылар тақтада шығарылған есепті ... ғана ... ... ... ... әр ... жеке
компьютерде жұмыс істеу қажеттігінен оқушы берілген тапсырманы өз бетімен
орындауға тырысады. Экрандағы ... ... ... көз ... ... ол ... ... жақсы сақталады.
Сабақ өткізу барысында дайын график құрушы программалрды да пайдалануға
болады. График салуға арналған программалық пакеттердің бірі:
Эксперимент нәтижесінде сабақты компьютерді ... ... ... қана ... ... ... ... қабілеттерін дамытуға және
өз беттерімен жұмыс істеу дағдыларын қалыптастыруға үлкен көмек жасайтынына
көз жеткіздік.
Оқыту ... ... ... ... оның ... ... мұғалім жұмысын жетілдіруге көмегі информатика ... ... ... пән аралық байланысты дамыту жолдары
қарастырылды. Компьютерді ... ... ... ... ... қарастырылып, бір жүйеге келтірілді.
Оқу процесінде компьютерлік техниканы қолдану оқушыларды ... ... ... ... ... ... ... қарай дамытуға мүмкіндік береді.
Арнаулы құрылған оқыту-үйрету программалары ... ... тыс ... ... ... және білімдерін тексеріп бағалауларына мүмкіндік
береді.
Ќолданылѓан єдебиеттер
1. “Информатика ... ... - ... С.В, ... ... по ... - ... Н.И.Пак, Е.К.Хеннер, Москва
2001г
3. “ Visual BASIC” -Маркус Линке, Москва 1998г
4. “ Освой самостоятельно Visual BASIC 6” - Грэг ... ... ... 1999г
5. “ Visual BASIC Сравочник с примерами” ... ... ... ... ... практикум” (том 1,2) - Л.Залогова, М.Южаков и др,
Москва 1999г.
А-қосымша
Option Explicit
Dim tcount As Integer
Dim Primitives As New ... Enum ... ... ... As ... m_FirstX As Single
Private m_FirstY As Single
Private m_LastX As Single
Private m_LastY As ... ... As ... ... As ... Sub ... As Single, xmin As Single, ymax As Single, ... Single)
picGraph.Scale (xmin, ymax)-(xmax, ymin)
picGraph.Line (xmin, 0)-(xmax, 0)
picGraph.Line (0, ymin)-(0, ymax)
End Sub
Private Sub GetXValues(xmax As Single, xmin As Single, xscl As ... = ... = ... xmax = ... ... = ... = ... If
Case "*", "/"
If best_prec >= PREC_TIMES Then
best_prec = PREC_TIMES
best_pos = pos
End If
Case "\"
If ... >= ... ... = ... = pos
End If
Case "%"
If best_prec >= PREC_MOD Then
best_prec = ... = ... ... "+", ... (Not is_unary) And best_prec >= PREC_PLUS
Then
best_prec = PREC_PLUS
best_pos = pos
End If
End ... ... ... = next_unary
Next pos
If parens 0 Then
Err.Raise ... + 1002, ... "Missing ) ... & expr & "'"
End If
If best_prec < PREC_NONE Then
lexpr = Left(expr, best_pos - 1)
rexpr = Right(expr, expr_len - ... Case ... ... ... ... = EvaluateExpr(lexpr) ^
EvaluateExpr(rexpr)
Case "*"
EvaluateExpr = EvaluateExpr(lexpr) *
EvaluateExpr(rexpr)
Case "/"
EvaluateExpr = EvaluateExpr(lexpr) /
EvaluateExpr(rexpr)
Case "\"
EvaluateExpr = ... ... ... = EvaluateExpr(lexpr) Mod
EvaluateExpr(rexpr)
Case "+"
EvaluateExpr = EvaluateExpr(lexpr) +
EvaluateExpr(rexpr)
Case "-"
EvaluateExpr = EvaluateExpr(lexpr) -
EvaluateExpr(rexpr)
End Select
Exit Function
End If
If Left$(expr, 1) = "(" And ... 1) = ")" ... = ... 2, expr_len - ... Function
End If
If Left$(expr, 1) = "-" Then
EvaluateExpr = ... expr_len - ... ... If
If Left$(expr, 1) = "+" Then
EvaluateExpr = EvaluateExpr(Right$(expr, expr_len - 1))
Exit Function
End If
If expr_len > 5 And Right$(expr, 1) = ")" ... = ... ... = ... 5, expr_len - ... Case lexpr
Case "sin("
EvaluateExpr = Sin(EvaluateExpr(rexpr))
Exit Function
Case "cos("
EvaluateExpr = ... ... ... = ... Function
Case "sqr("
EvaluateExpr = Sqr(EvaluateExpr(rexpr))
Exit Function
End Select
End If
On Error Resume ... = ... = ... Error GoTo 0
If status = 0 ... = ... ... ... Error Resume Next
EvaluateExpr = CSng(expr)
status = Err.Number
On Error GoTo 0
If status 0 ... = ... status, ... "Error ... '" & expr
& "' as a constant."
End If
End Function
Private Sub cmdClearGraph_Click()
picGraph.Cls
picWho.Visible = False
txtEmail.Visible = False
End Sub
Private Sub cmdClearValues_Click()
txtXMax.Text = ... = ... = ... = ... = ... = 1
picGraph.Cls
End Sub
Private Sub cmdEnd_Click()
End
End Sub
Private Sub cmdFormula_Click()
Dim stepYNegative As Single, ... As ... xmax As Single, xmin As Single, xscl As Single, ... ... ymax As Single, ymin As Single, yscl As Single, ... ... xn As Single, xp As Single, yp As Single, yn As ... = False
txtEmail.Visible = False
picGraph.Cls
Call GetXValues(xmax, xmin, xscl)
Call GetYValues(ymax, ymin, yscl)
Call Axis(xmax, xmin, ymax, ymin)
Call ... ... ymax, ... ... xmin, xscl, ... stepXNegative)
Call stepYValues(stepYPositive, stepYNegative, xmax, xmin)
Call yScls(ymax, ymin, yscl, stepYPositive, stepYNegative)
Call GraphIt(xmax, xmin)
End Sub
Private Sub xScls(xmax As Single, xmin As Single, xscl As ... As Single, ... As ... ... As ... = ... + xscl
Do
picGraph.Line (xposition, stepXPositive)-(xposition,
stepXNegative)
xposition = xposition + xscl
Loop Until xposition >= xmax
xposition = xposition - xscl
Do
picGraph.Line (xposition, stepXPositive)-(xposition,
stepXNegative)
xposition = ... - ... Until ... = ... = ... - ... (stepYPositive, yposition)-(stepYNegative,
yposition)
yposition = yposition - yscl
Loop Until yposition

Пән: Информатика
Жұмыс түрі: Курстық жұмыс
Көлемі: 42 бет
Бұл жұмыстың бағасы: 500 теңге









Ұқсас жұмыстар
Тақырыб Бет саны
PHP тілі13 бет
СУБД Access-те деректер базасын құру және оны өңдеу9 бет
Орта мектепте жаңа оқыту технологиялар көмегімен оқушылардың физика сабағына қызығушылығын арттыру47 бет
Бастауыш сыныптарда қазақ тілін оқытудың әдәс – тәсілдері16 бет
Сөздің тура және ауыспалы мағыналары, мақал-мәтел5 бет
"Ыбырай – шағын әңгіме шебері" тақырыбындағы ашық сабақ3 бет
60-80 жылдардағы ортасындағы Қазақстандағы нақты социализм12 бет
Access ортасындағы деректер базасы8 бет
Basic 6.015 бет
Borland Delphi ортасында электронды оқулық жасау45 бет


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


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

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

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

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

Email: info@stud.kz

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

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