Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Знакомство c Visual Basic.pdf
Скачиваний:
30
Добавлен:
02.06.2015
Размер:
4.34 Mб
Скачать

Й рспнйнбъл одпдлдммъл з йнмрсЯмсЯл лнемн опзлдмюсы нодпЯхзэ рхдокдмзю, йнснпЯю нанжмЯцЯдсрю рзлбнкнл (&) зкз рзлбнкнл (+). МЯопзлдп,

лнемн мЯозрЯсы:

UserName = UserName & " ЗбЯмнб"

Онркд бъонкмдмзю ьсни змрсптйхзз одпдлдммЯю UserName атгдс злдсы жмЯцдмзд "ЗбЯм ЗбЯмнб".

Дркз ГдмыПнегдмзю з EndOfTime юбкюэсрю злдмЯлз одпдлдммъф сзоЯ Date, снвгЯ лнемн жЯозрЯсы:

ГдмыПнегдмзю = #29.10.1970#

EndOfTime = #8:30#

(йЯй рзлбнкъ бъгдкюэс йЯбъцйЯлз, сЯй гЯст зкз бпдлю бъгдкюэс рзлбнкнл (#)). ГЯст з бпдлю лнемн онлдрсзсы б нгмт одпдлдммтэ. Гкю одпдлдммни DateAndTime сзоЯ Date лнедс аъсы жЯозрЯмн:

DateAndTime = #13.2.2000 11:30#

2.2 Структура проекта

Опндйс наъцмн бйкэцЯдс нгмт зкз мдрйнкыйн унпл, Я сЯйед лнедс бйкэцЯсы лнгткз. Р унплни Бъ тед злдкз гдкн опз бъонкмдмзз опдгъгтшзф жЯгЯмзи. УнплЯ опз бъонкмдмзз опндйсЯ нснапЯеЯдсрю мЯ ьйпЯмд лнмзснпЯ б бзгд нймЯ. НмЯ лнедс рнгдпеЯсы нащдйсъ (мЯгозрз,

ймнойз з с.г.). Лнгткы нскзцЯдсрю нс унплъ сдл, цсн нм мзйЯй мд нснапЯеЯдсрю мЯ ьйпЯмд лнмзснпЯ опз бъонкмдмзз опндйсЯ з мд лнедс рнгдпеЯсы нащдйсъ.

ЙЯегЯю унплЯ з йЯегъи лнгткы опндйсЯ злдэс вкЯбмтэ рдйхзэ

(General), б йнснпни лнедс аъсы жЯозрЯм опнвпЯллмъи йнг.

Б вкЯбмни рдйхзз лнвтс аъсы нащюбкдмъ йнмрсЯмсъ з одпдлдммъд.

МЯпюгт р вкЯбмни рдйхзди унплЯ з лнгткы лнвтс бйкэцЯсы рдйхзз,

йЯегЯю зж йнснпъф юбкюдсрю нащюбкдмздл опнхдгтпъ зкз утмйхзз.

2.3 Объявление переменных и констант

Дркз одпдлдммЯю зкз йнмрсЯмсЯ опзлдмюдсрю б опндйсд, нмЯ гнкемЯ аъсы нащюбкдмЯ. Ртшдрсбтэс ркдгтэшзд тпнбмз нащюбкдмзю одпдлдммъф з йнмрсЯмс:

тпнбдмы опнхдгтпъ (утмйхзз). Злю, нащюбкдммнд б опнхдгтпд,

гдирсбтдс снкыйн бмтспз ьсни опнхдгтпъ з мд гдирсбтдс бмд ьсни опнхдгтпъ;

тпнбдмы унплъ. Злю, нащюбкдммнд б вкЯбмни рдйхзз унплъ,

гдирсбтдс бн брдф опнхдгтпЯф ьсни унплъ, мн мд гдирсбтдс б гптвзф унплЯф

злнгткюф;

тпнбдмы опндйсЯ. Злю, нащюбкдммнд б вкЯбмни рдйхзз лнгткю р опдгбЯпюэшзл ркнбнл Public (Нашзи), гдирсбтдс бн брдф унплЯф з лнгткюф опндйсЯ.

МЯгн злдсы б бзгт, дркз опз нащюбкдмзз одпдлдммни сзо юбмн мд тйЯжЯм, сн атгдс мЯжмЯцдм сзо Variant. СЯйни ронрна нащюбкдмзю мЯжъбЯдсрю нащюбкдмздл он тлнкцЯмзэ.

Опз нащюбкдмзз йнмрсЯмсъ мднафнгзлн жЯгЯсы дд злю, сзо, накЯрсы гдирсбзю з жмЯцдмзд.

РзмсЯйрзр нащюбкдмзю йнмрсЯмсъ:

[{Public|Private}] Const ЗлюЙнмрсЯмсъ [As Сзо] = ЖмЯцдмзд

Б онгнамъф нопдгдкдмзюф рзмсЯйрзрЯ опюлнтвнкымъд рйнайз [ ]

нжмЯцЯэс, цсн йнмрсптйхзю, мЯфнгюшЯюрю бмтспз ьсзф рйнанй, мд наюжЯсдкымЯ.

Рзлбнк (|) нжмЯцЯдс, цсн гнкемн аъсы бъапЯмн нгмн зж ркнб, лдегт йнснпълз нм онрсЯбкдм. РЯлз ед рзлбнкъ ([), (]), (|) б сдйрс нащюбкдмзю мд бйкэцЯэсрю.

Опзбдгдммнд нопдгдкдмзд рзмсЯйрзрЯ нжмЯцЯдс, цсн нащюбкдмзд йнмрсЯмсъ мЯцзмЯдсрю р наюжЯсдкымнвн ркнбЯ Const (ЙнмрсЯмсЯ). Одпдг Const

лнедс рснюсы нгмн зж ркнб: Private (КнйЯкымъи) зкз Public (Нашзи),

жЯгЯэшзф накЯрсы гдирсбзю йнмрсЯмсъ. ЖЯсдл ркдгтдс злю йнмрсЯмсъ. Онркд злдмз лнедс рснюсы ркнбн As з мЯзлдмнбЯмзд сзоЯ. ЖЯсдл ркдгтдс жмЯй пЯбдмрсбЯ з жмЯцдмзд йнмрсЯмсъ.

Б нопдгдкдмзз онгцдпймтсн мЯзлдмнбЯмзд сни накЯрсз гдирсбзю,

йнснпЯю лнедс аъсы жЯгЯмЯ он тлнкцЯмзэ.

Б ркдгтэшдл опзлдпд б вкЯбмни рдйхзз лнгткю нозръбЯдсрю вкнаЯкымЯю йнмрсЯмсЯ Age хдкнвн сзоЯ, з ди опзрбЯзбЯдсрю жмЯцдмзд 54.

Public Const Age As Integer = 54

ГнотрйЯдсрю сЯйед нозрЯмзд мдрйнкыйзф йнмрсЯмс б нгмни рспнйд. Б

ьснл рктцЯд, цснаъ жЯгЯсы сзо гЯммъф, мЯгн тйЯжЯсы мЯжбЯмзд сзоЯ гкю йЯегни йнмрсЯмсъ.

Б ркдгтэшдл опзлдпд нозръбЯэсрю кнйЯкымъд йнмрсЯмсъ Ag з Wg

йЯй Single.

Const Ag As Single = 3.14, Wg As Single = 2.78

РзмсЯйрзр нащюбкдмзю одпдлдммни:

{Static|Public|Private|Dim} ЗлюОдпдлдммни [As Сзо]

ЖЯпдждпбзпнбЯммнд ркнбн Dim (ПЯжлдпмнрсы) опз нащюбкдмзз одпдлдммъф опзлдмюдсрю цЯшд брдвн.

РсЯсзцдрйзд одпдлдммъд, нозрЯммъд мЯ тпнбмд опнхдгтпъ рн ркнбнл

Static блдрсн ркнбЯ Dim, рнфпЯмюэс рбнз жмЯцдмзю гЯед онркд бъфнгЯ зж опнхдгтпъ опз онбснпмнл бфнгд б ьст опнхдгтпт.

Бнс опзлдп нащюбкдмзю одпдлдммни сзоЯ рспнйз рзлбнкнб:

Dim strName As String

Дркз мд тйЯжЯсы сзо одпдлдммни, ди атгдс опзрбндм сзо Variant. Опз ьснл ркдгтдс тцзсъбЯсы, цсн одпдлдммъд сзоЯ Variant жЯмзлЯэс анкычд лдрсЯ б оЯлюсз з напЯшдмзд й мзл опнзрфнгзс лдгкдммдд.

Б нгмни рспнйд лнемн нащюбзсы мдрйнкыйн одпдлдммъф, мн опз ьснл ркдгтдс гкю йЯегни тйЯжъбЯсы злю сзоЯ:

Dim a As Integer, b As Integer, c As Long

Dim e As Integer, f, g

Б одпбни рспнйд нащюбкдмъ гбд одпдлдммъд сзоЯ Integer з нгмЯ одпдлдммЯю сзоЯ Long. Бн бснпни рспнйд – нгмЯ одпдлдммЯю сзоЯ Integer, Я

гбд гптвзд – сзоЯ Variant он тлнкцЯмзэ.

Опз нащюбкдмзз одпдлдммЯю мд онктцЯдс жмЯцдмзю, ди снкыйн нсбнгзсрю оЯлюсы, Я дд жмЯцдмзд мд нопдгдкдмн.

Лнемн бннашд мд нащюбкюсы одпдлдммъд. НгмЯйн сЯйЯю опЯйсзйЯ юбкюдсрю зрснцмзйнл нчзанй, з дд мЯгн зжадвЯсы. Цснаъ VB пЯрхдмзбЯк кэатэ мднащюбкдммтэ одпдлдммтэ унплъ зкз лнгткю йЯй нчзанцмтэ, б

вкЯбмни рдйхзз унплъ зкз лнгткю одпбни гнкемЯ ркдгнбЯсы змрсптйхзю

Option Explicit. ЬсЯ змрсптйхзю мЯкЯвЯдс спданбЯмзд юбмнвн нозрЯмзю брдф одпдлдммъф ьсни унплъ зкз лнгткю. Дркз унплЯ рнгдпезс змрсптйхзэ

Option Explicit, опз оноъсйд зронкыжнбЯмзю мднозрЯммнвн зкз мдбдпмн ббдгдммнвн злдмз одпдлдммни опз жЯотрйд опндйсЯ бнжмзйЯдс рннашдмзд на нчзайд.

Лнемн сЯй мЯрспнзсы рпдгт VB, цсн змрсптйхзю Option Explicit атгдс ЯбснлЯсзцдрйз онлдшЯсырю рзрсдлни VB б вкЯбмни рдйхзз рнжгЯбЯдлни унплъ зкз лнгткю. Гкю ьснвн мЯгн бъонкмзсы йнлЯмгъ лдмэ Tools

(Змрсптлдмсъ), жЯсдл Options (РбнирсбЯ), жЯсдл мЯ бйкЯгйд Editor (ПдгЯйснп)

трсЯмнбзсы укЯенй б нйнчйд Require Variable Declaration (спданбЯсы нащюбкдмзю одпдлдммъф) з, мЯйнмдх, шдкймтсы мЯ ймнойд ОК. Мн ьсн ркдгтдс ргдкЯсы гн рнжгЯмзю унплъ зкз лнгткю.

2.4Преобразование и совместимость типов

Бьснл пЯжгдкд пдцы атгдс згсз н сдф рзстЯхзюф, йнвгЯ опз бъонкмдмзз нодпЯхзз зкз змрсптйхзз тцЯрсбтэс гЯммъд пЯжмъф сзонб.

МЯопзлдп, цсн опнзжнигдс, дркз одпдлдммни хдкнвн сзоЯ опзрбЯзбЯдсрю цзркнбнд жмЯцдмзд сзоЯ Single.

Б нсмнчдмзз сзонб VB опнюбкюдс лЯйрзлЯкымтэ сдпозлнрсы – йнвгЯ ьсн бнжлнемн, опднапЯжнбЯмзд нгмнвн сзоЯ б гптвни атгдс бъонкмдмн ЯбснлЯсзцдрйз з опнвпЯллзрст мдс мтегъ на ьснл жЯансзсырю. Опз ьснл рнакэгЯэсрю одпдцзркдммъд мзед опЯбзкЯ.

Опз опднапЯжнбЯмзз цзркЯ р окЯбЯэшди снцйни б хдкнд опнзрфнгзс нйптвкдмзд гн акзеЯичдвн хдкнвн.

Опз опднапЯжнбЯмзз хдкнвн цзркЯ б цзркн р окЯбЯэшди снцйни гпнамЯю цЯрсы опзмзлЯдсрю пЯбмни мткэ.

Б рктцЯд опднапЯжнбЯмзю хдкнвн сзоЯ б гптвни хдкъи сзо бнжлнемЯ рзстЯхзю, йнвгЯ хдкъи сзо р анкычзл гзЯоЯжнмнл жмЯцдмзи опднапЯжтдсрю б хдкъи сзо р лдмычзл гзЯоЯжнмнл жмЯцдмзи. Дркз жмЯцдмзд, опзрбЯзбЯдлнд

«йнпнсйнлт» сзот, бъигдс жЯ опдгдкъ гзЯоЯжнмЯ двн гнотрсзлъф жмЯцдмзи,

опнзжнигдс нчзайЯ бпдлдмз зронкмдмзю.

Рспнйнбъд з цзркнбъд сзоъ рнблдрсзлъ. Лнемн опзрбнзсы цзркнбнд жмЯцдмзд рспнйнбни одпдлдммни з мЯнанпнс.

МЯопзлдп, мд бнжмзймдс нчзайз бпдлдмз зронкмдмзю опз опзрбЯзбЯмзз рбнирсбт Caption, йнснпнд злддс сзо String, жмЯцдмзю 125

одпдлдммни сзоЯ Integer. Опнзжнигдс опднапЯжнбЯмзд хдкнвн цзркнбнвн жмЯцдмзю 125 б рспнйт рзлбнкнб "125".

З мЯнанпнс. Опз опзрбЯзбЯмзз одпдлдммни хдкнвн сзоЯ жмЯцдмзю рбнирсбЯ Text мдйнснпнвн сдйрснбнвн нймЯ, йнснпнд злддс сзо String (отрсы,

мЯопзлдп, б ьснл сдйрснбнл нймд мЯапЯмн спз рзлбнкЯ 125), опнзжнигдс опднапЯжнбЯмзд рспнйз рзлбнкнб "125" б хдкнд цзркн з хдкнцзркдммЯю одпдлдммЯю онктцзс жмЯцдмзд 125. НгмЯйн рспнйЯ рзлбнкнб гнкемЯ аъсы сЯйни, цснаъ нмЯ лнвкЯ спЯйснбЯсырю йЯй цзркн.

Бнжлнемн сЯйед бъонкмдмзд Япзулдсзцдрйни нодпЯхзз, мЯопзлдп тлмнедмзю (*), йнвгЯ нгзм зкз наЯ нодпЯмгъ юбкюэсрю рспнйни рзлбнкнб, мн опз тркнбзз, цсн зф жмЯцдмзю, лнемн змсдпопдсзпнбЯсы йЯй цзркЯ. Опз ьснл нрнатэ нрснпнемнрсы ркдгтдс рнакэгЯсы р нодпЯхзди (+), йнснпЯю б жЯбзрзлнрсз нс йнмсдйрсЯ лнедс нжмЯцЯсы кзан нодпЯхзэ ркнедмзю, кзан нодпЯхзэ рхдокдмзю.

Б нодпЯхзз нодпЯмг1 + нодпЯмг2 рзлбнк (+) VB атгдс бнропзмзлЯсы

йЯй:

нодпЯхзэ ркнедмзю, дркз наЯ нодпЯмгЯ злдэс йЯйни-кзан зж цзркнбъф сзонб;

нодпЯхзэ ркнедмзю, дркз нгзм нодпЯмг злддс цзркнбни сзо, Я