Ажлын зорилго: VB 6 хэлний операторуудыг файлтай ажиллахад суралцах, ашиглах янз бүрийн төрөл: дараалсан (текст) файлууд, санамсаргүй хандалтын файлууд, хоёртын файлууд. Хэрэгслийг судлах, ашиглах НийтлэгХарилцах цонхфайл нээх, хадгалах, фонт, өнгө сонгох, объектыг ашиглах санах ойэнгийн текст засварлагч үүсгэх жишээг ашиглан текстийн хэсгүүдийг хадгалахад зориулагдсан.
Хяналтын асуултууд:
1. Текст файлыг нээх ямар аргууд байдаг вэ? Текст болон бусад зүйлийг хэрхэн хаах вэ нээлттэй файл?
2. Бичих боломжтой текст файлд өгөгдлийг хэрхэн бичих вэ? Write болон Print хэллэгүүдийн хооронд ямар ялгаа байдаг вэ?
3. Уншихаар нээгдсэн текст файлаас өгөгдлийг хэрхэн уншдаг вэ? Оролт ба Шугамын оролтын операторуудын хооронд ямар ялгаа байдаг вэ? Файлаас өгөгдсөн тооны тэмдэгтийг уншихын тулд ямар функцийг ашиглаж болох вэ? Файлын бүх тэмдэгтийг хэрхэн унших вэ?
4. Захиалгат өгөгдлийн төрөл гэж юу вэ, энэ ойлголтыг санамсаргүй хандалтын файлуудтай ажиллахад хэрхэн ашигладаг вэ ( raf)?
5. Файлаас ямар операторуудтай rafбичлэгүүдийг уншиж файл руу оруулна rafшинэ бичлэгүүд бичигдэж байна уу?
6. Ямар зорилгоор индексийг тодорхойлж файлтай ажиллахад ашигладаг raf?
7. Хоёртын файлыг ашиглах онцлог нь юу вэ? Тэд хэрхэн нээх вэ? Хоёртын файлаас унших, хоёртын файл руу бичих ажил хэрхэн хийгддэг вэ?
8. Хяналтыг хэрхэн хэрэгжүүлэх боломжтой НийтлэгХарилцах цонхтекст файлын агуулгыг текст талбарт ачаалах уу? Зассан текстийг текст файлд хадгалахын тулд ижил удирдлагыг хэрхэн ашиглах вэ?
9. Удирдлагыг хэрхэн ашиглах вэ НийтлэгХарилцах цонхфайлын агуулгыг татаж авах rtfталбайд БаянТекст хайрцаг? Засварласан текстийг файлд хадгалахын тулд ижил удирдлагыг хэрхэн ашиглах вэ rtf?
10. Удирдлагыг хэрхэн ашиглах вэ НийтлэгХарилцах цонхүсгийн параметрийн утгыг өөрчлөх, цонхны текстийн өнгийг өөрчлөх Текст хайрцаг(эсвэл цонхон дээрх сонгосон текстийн хэсэг БаянТекст хайрцаг)?
Жишээ 7.1. Ажилтны таних дугаар, овог нэр, төрсөн он, сар, өдөр, төрсөн газар зэргийг агуулсан "ажилтны дэлгэрэнгүй мэдээлэл"-д бичих (мөн текст файлаас унших) програмыг авч үзье. Мөрүүд нь Style шинж чанарыг 1 - SimpleCombo гэж тохируулсан Comb(i) объектуудын массивыг бүрдүүлдэг 4 Combo Box удирдлагаар (Зураг 7.1) дэлгэцийн хэлбэрт дууриах хүснэгтийг үүсгэдэг.
Устгах мөрийг тодруулна уу", vbExclamation
Сам(j).RemoveItem
'Оруулах шинэ оруулгаширээ рүү:
Хувийн дэд mnuInsert_Click()
i% = Сам (0). Жагсаалтын индекс
Хэрвээ би< 0 Then
MsgBox "Өмнө нь оруулах мөрийг сонгоно уу", vbExclamation
Сам(0).AddItem InputBox("Дугаар оруулах"), i
Сам(1).AddItem InputBox("Нэр оруулна уу"), i
Сам(2).AddItem InputBox("Төрсөн огноог оруулна уу."), i
Сам(3).AddItem InputBox("Төрсөн газраа оруулна уу."), i
'Хүснэгт дэх оруулгыг өөрчлөх:
Хувийн дэд mnuUpdate_Click()
i% = Сам (0). Жагсаалтын индекс
Хэрвээ би< 0 Then
MsgBox "Өөрчлөх мөрийг сонгоно уу", vbExclamation
Сам(0).Жагсаалт(i) = InputBox("Дугаар оруулна уу", Сам(0).Жагсаалт(i))
Сам(1).Жагсаалт(i) = InputBox("Нэр оруулна уу", Сам(1). Жагсаалт(i))
Сам(2).Жагсаалт(i) = InputBox("Төрсөн огноог оруулна уу", Сам(2). Жагсаалт(i))
Сам(3).Жагсаалт(i) = InputBox("Төрсөн газраа оруулна уу", Сам(3). Жагсаалт(i))
' Хүснэгтийг бүхэлд нь цэвэрлэх:
Хувийн дэд mnuClear_Click()
‘ Текст файлын мэдээллээр хүснэгтийг бөглөх нь:
Хувийн дэд mnuLoad_Click()
№1 оруулахын тулд "person.txt"-г нээнэ үү
Оролт #1, numb, fio, bdate, bloc
Comb(0).AddItem numb
Сам(1).AddItem fio
Comb(2).AddItem bdate
Comb(3).AddItem блок
‘ Текст файлд хүснэгтийн дэлгэрэнгүйг бичих:
Хувийн дэд mnuSave_Click()
N% = Сам(0).Жагсаалтын тоо
"person.txt"-г нээнэ үү
i = 0-ээс N - 1-ийн хувьд
numb = Val(Comb(0).List(i))
fio = Сам(1).Жагсаалт(i)
bdate = CDate(Comb(2).List(i))
блок = Сам(3).Жагсаалт(i)
#1, numb, fio, bdate, bloc гэж бичнэ
' Аппликешныг унтрааж байна:
Хувийн дэд mnuExit_Click()
Жишээ 7.2 . Удирдлагын хэрэглээг харуулсан програмыг авч үзье НийтлэгХарилцах цонхфайл нээх, хадгалах, фонт, өнгө сонгох, текст засварлах боломжтой.
Файлыг форматлах TXTтекст талбарт (Зураг 7.2-ын зүүн талбар), форматын файл руу ачаалагдах болно RTF- талбарт БаянТекст хайрцаг(Зураг 7.2-ын баруун зах).
обьект
Анги
обьект
Өмч
обьект
Эд хөрөнгийн үнэ цэнэ
“Ерөнхий самбар
харилцан яриа"
Нээх/Хадгалах таб
Фонтын таб
Өнгөт таб
Хүснэгтэнд цэсийн командуудын шинж чанарыг харуулаагүй болно Фонт, өнгөТэгээд Засварлах. Зөвхөн цэсийн командуудад зориулсан процедурын кодыг доор харуулав Файл (нээлттэй, ХадгалахТэгээд Хадгалахгэх мэт). Бусад цэсийн командуудын кодыг эмхэтгэх нь энэ ажлын 2-р даалгаврын сэдэв юм.
Хувийн дэд mnuOpen_Click()
CommonDialog1.ShowOpen
F$ = CommonDialog1.FileName
Хэрэв Зөв(F, 3) = "rtf" Дараа нь
RichTextBox1.LoadFile F
ElseIf Зөв(F, 3) = "txt" Дараа нь
Оролтын хувьд F-ыг №1 гэж нээнэ үү
S$ = Оролтын (N, 1)
Хувийн дэд mnuSave_Click()
CommonDialog1.ShowSave
F$ = CommonDialog1.FileName
Хувийн дэд mnuSaveAs_Click()
CommonDialog1.ShowSave
F$ = CommonDialog1.FileName
RichTextBox1.SaveFile F, rtfRTF
Энэ ажлын явцад оюутан 2 даалгавар гүйцэтгэх ёстой.
Дасгал 1. Даалгаврыг гүйцэтгэх явцад оюутнууд VB 6-д байдаг санамсаргүй хандалтын файлуудтай ажиллах боломжийг эзэмшдэг. RAF-Санамсаргүйхандалтфайл).
Өгөгдсөн өгөгдлийн сангийн хүснэгтийн хувьд хэрэглэгчийн тодорхойлсон өгөгдлийн төрлийг зарлаж, энэ төрлийн хувьсагчийг зарлаж (заавар, хуудас 108 - 112), хэрэглэгчийн тодорхойлсон төрлийн хувьсагчийг ашигладаг процедуруудыг эмхэтгэж, дибаг хийдэг.
Ялангуяа цэсний командын процедурыг хэрэгжүүлдэг. Файл руу бичихRAFТэгээд Файлаас уншихRAF. Жишээ 7.1-ийн нэгэн адил объектуудын массивыг өгөгдлийг засварлахад ашигладаг. КомбоХайрцагболон цэс Засварлахтаван дэд цэсийн командтай: Тэмдэглэл нэмнэ үү, Бүртгэлийг устгах, Бичлэг оруулах, Бичлэгийг засах, Хүснэгтийг цэвэрлэх.
Сонголт 1.
"Авто үйлчилгээ" мэдээллийн сангийн "Машин" хүснэгтэд (Хүснэгт 7.1) тусгай өгөгдлийн төрлийг зарлана.
|
машин |
машин |
доголдол |
Хүснэгт 7.1-ийн доод мөрөнд талбаруудын төрлийг харуулав.
Сонголт 2.
Автомашины үйлчилгээний мэдээллийн сангийн алдааны хүснэгтэд (Хүснэгт 7.2) тусгай өгөгдлийн төрлийг зарлана.
|
доголдол | Нэр доголдол | Үнэ |
Хүснэгт 7.2-ын доод мөрөнд талбаруудын төрлийг харуулав.
Жишээ програм 7.1-ийг жишээ болгон ашиглан танилцуулсан хүснэгтэд өгөгдөл оруулах, засварлах ажлыг зохион байгуулж, энэ өгөгдлийг санамсаргүй хандалтын файлд бичих, санамсаргүй хандалтын файлаас өгөгдлийг унших. Жишээ 7.1-ийн нэгэн адил эдгээр үйлдлүүдийг Зураг дээр үзүүлсэн цэсийн командуудын ажил болгон хэрэгжүүлдэг. 7.1.
Даалгавар 2. Үйл ажиллагааны нэг хэсэг болгон оюутнууд жишээ хэрэглүүр 2-т програмыг энгийн текст засварлагч гэж үзэх боломжийг олгодог шинэ боломжуудыг нэмдэг.
Сонголт 1 НийтлэгХарилцах цонхцэсийн командуудыг хэрэгжүүлэх ФонтТэгээд өнгө(дэд цэстэй Дүрийн өнгөТэгээд Дэвсгэр өнгө). Эдгээр командын тусламжтайгаар цонхон дээрх сонгосон текстийн фрагментийн фонтыг (түүний нэр, хэв маяг, хэмжээ) сонгох боломжтой. БаянТекст хайрцаг, түүнчлэн сонгосон фрагментийн тэмдэглэгээний өнгийг сонгож, энэ цонхны дэвсгэр өнгийг бүхэлд нь сонгох боломжтой.
Жич:Объектыг тохируулах үед НийтлэгХарилцах цонх(Custom) шинж чанарыг ашиглан фонт сонгохдоо Flags шинж чанарын утгыг 1, 2, эсвэл 3 болгож тохируулахаа мартуузай (гарын авлага, х. 183-ыг үзнэ үү).
Сонголт 2. Хяналтыг ашиглах НийтлэгХарилцах цонхцэсийн командуудыг хэрэгжүүлэх Засварлах(дэд цэс Хуулбарлах, ТаслахТэгээд наах), хэний зорилго вэ хуулбарлахэсвэл зайлуулахсонгосон текст фрагментийн санах ойд, түүнчлэн оруулахсанах ойн агуулгын текстийн сонгосон газар.
Жич:Түр санах ой руу (объект санах ой) та SetText болон GetText аргыг ашиглаж болно:
санах ой. SetText RichTextBox1.SelText
RichTextBox1.SelText = Түр санах ой. gettext
8. МЭДЭЭЛЭЛ ХАДГАЛАХ, УНШИХ
Хөтөлбөр дууссаны дараа санах ойд үүсгэсэн бүх өгөгдөл алдагдахгүйн тулд та хатуу диск дээрх мэдээллийг хадгалах боломжтой байх хэрэгтэй. Үгүй бол бүх мэдээлэл ул мөргүй алга болно. Мэдээллийг янз бүрийн аргаар хадгалах, унших боломжтой. Хоёртын болон текст файлуудыг янз бүрийн хэмжээ, форматтай мэдээлэлтэй ажиллахад ашиглаж болно. Та Windows Бүртгэлийг ашиглан бага хэмжээний мэдээлэл хадгалах боломжтой. Мөн хамгийн төвөгтэй ажлуудын хувьд мэдээллийн санг ашиглах нь үндэслэлтэй юм.
8.1. Файлуудыг "" ашиглан нээж байна.Нээх »
Файл нь аливаа гадаад хадгалах хэрэгслийн нэртэй хэсэг юм. Өгөгдөл нь компьютерийн санах ойд "амьд", файлууд нь хатуу диск дээр байдаг. Програм нь файлуудтай шууд ажиллахгүй, харин үйлдлийн системийг зуучлагч болгон ашигладаг.
Хоёр төрлийн файлын нэр байдаг: бүтэн - файлын нэрээс гадна гадаад зөөвөрлөгч дээрх файлын байршлыг мөн зааж өгсөн болно (жишээлбэл, "C:\Program Files\Microsoft Visual Studio\VB98\VB 6.EXE" ) ба богино - зөвхөн файлын нэр (VB 6.EXE ). Хэрэв файлын байршлыг заагаагүй бол түүнийг одоогийн фолдерт хайх болно, анхдагчаар - таны програм байрладаг хавтас. Шууд файлын нэр нь жинхэнэ өвөрмөц файлын нэр ба түүний өргөтгөл гэсэн хоёр хэсгээс бүрдэнэ. Нэр нь өөрөө файлыг тодорхойлдог бол өргөтгөл нь ихэвчлэн файлын формат эсвэл ямар програмаар үүсгэгдсэнийг заадаг.
Файлтай ажиллаж эхлэхээсээ өмнө үйлдлийн системээс асуух ёстой заагч (тодорхойлогч) файл. Үүнийг авахын тулд "FreeFile"-г ашиглана уу. Дараа нь "Нээлттэй" мэдэгдлийг ашиглан энэ заагч нь шаардлагатай файлтай холбогдоно. Зөвхөн үүний дараа програм түүнтэй ажиллах боломжтой болно. Файл нээх синтакс нь дараах байдалтай байна.
‘үнэгүй файлын заагч аваад хувьсагчдад онооно
FileHandle% = FreeFile
' файлыг нээх
FilePath_-г нээх
[#]FileHandle%
...(файлтай ажиллах)
[#]FileHandle-г хаах
· FileHandle % нь файлын заагчийг хадгалдаг хувьсагч юм;
· FreeFile нь файлын заагчийг буцаадаг функцийн нэр юм;
· Нээлттэй - операторын нэр;
· FilePath - файлын бүтэн нэр;
· For нь файлд хандах горимын тайлбар бүхий түлхүүр үг юм;
· Горим – файлд хандах горим (Хүснэгт 15-ыг үзнэ үү);
Хүснэгт 15
Файлд хандах горимууд
|
Хандалтын горимууд |
Тодорхойлолт |
|
Хавсаргах |
Одоо байгаа текст файлын төгсгөлд өгөгдөл нэмж байна. Хэрэв файл байхгүй бол түүнийг үүсгэнэ |
|
Хоёртын |
Файлыг хоёртын горимд нээх, i.e. байтуудын багц хэлбэрээр. Хэрэв файл байхгүй боловч үүсгэгдэх болно |
|
Оролт |
Текст хэлбэрээр унших файлыг нээж байна |
|
Гаралт |
Текст файл бичихийн тулд файлыг нээж байна. Энэ тохиолдолд бүх хуучин мэдээлэл устах болно. Хэрэв файл байхгүй боловч үүсгэгдэх болно |
|
Санамсаргүй |
Санамсаргүй хандалтын горимд файл нээх. Энэ горимыг энгийн бичлэгтэй ажиллахад ашигладаг. Хэрэв файл байхгүй боловч үүсгэгдэх болно |
· Хандалт нь нэмэлт түлхүүр үг бөгөөд дараа нь хандалтын төрлийг тайлбарлана;
· AccessType - хандалтын төрлийн тодорхойлолт:
· Унших - унших;
· Бичих - бичлэг хийх;
· Унших бичих - унших, бичих.
|
Анхаарна уу |
Нэмэлт болон Гаралтын хандалтын горимууд нь зөвхөн бичих хандалт, зөвхөн оролтыг унших хандалт, хоёртын болон санамсаргүй хандалтын бүх гурван төрлийн хандалтыг зөвшөөрдөг. |
· LockType нь таны програмтай ажиллаж байх үед бусад программууд энэ файлыг ашиглах боломжтой эсэхийг тодорхойлох нэмэлт параметр юм. Энэ нь ихэвчлэн сүлжээтэй холбоотой байдаг (Хүснэгт 16-г үзнэ үү).
Хүснэгт 16
LockType параметрийн боломжит утгууд
|
Утга |
Тодорхойлолт |
|
хуваалцсан |
Шаардлагатай эрх бүхий бүх хэрэглэгчид файлд бүрэн хандах эрхтэй болно |
|
түгжээ унших |
Файлыг уншихыг хориглосон боловч бичихийг зөвшөөрдөг |
|
Бичлэгийг түгжих |
Файл руу бичихийг хориглосон боловч уншихыг зөвшөөрдөг |
|
Унших бичихийг түгжих |
Унших, бичихийг хориглоно. |
· As нь файлын заагчтай түлхүүр үг юм.
· # нь түүний дараах утга нь файлын заагч болохыг илтгэх тэмдэгт юм.
· Len нь нэмэлт түлхүүр үг бөгөөд дараа нь оруулгын уртыг зааж өгөх параметр байх ёстой.
· CharInBuffer % - санамсаргүй хандалтын горимд нээгдсэн файлын бичлэгийн урт (Санамсаргүй ).
· Close гэдэг нь заасан бариултай холбоотой файлыг хаадаг мэдэгдэл юм.
Файлтай ажиллаж дууссаны дараа түүнийг хаах нь чухал юм. "Хаах" мэдэгдэл нь файлын заагч болон түүнтэй холбоотой санах ойн хэсгийг чөлөөлдөг.
Файлтай ажиллахдаа, тухайлбал түүнийг уншихдаа файлын төгсгөлийг тодорхойлох нь маш чухал юм. Үүнийг EOF (Файлын төгсгөл) функцийг ашиглан тодорхойлж болно:
EOF(FileHandle)
· EOF - функцын нэр;
· FileHandle нь төгсгөлийг тодорхойлж байгаа файлын бариул юм.
Функц нь файлын төгсгөлд хүрсэн тохиолдолд True (үнэн) буцаана, үгүй бол Худал (Худал) буцаана.
8.2. Текст файлыг унших, бичих
Текст файл нь "Оролт", "Гаралт" эсвэл "Хавсрах" горимд нээгддэг (Хүснэгт 15-ыг үз). Энэ горимын онцлог нь зөвхөн хэвлэх боломжтой тэмдэгтүүдтэй ажилладаг. Үйлчилгээний тэмдэгтэй ажиллах нь ашиггүй.
Мэдээлэл бичихийн тулд "Хэвлэх" ба "Бичих" гэсэн хоёр хэллэгийг ашигладаг бөгөөд тэдгээрийн синтакс нь дараах байдалтай байна.
#FileHandle%, VarBuffer[;] хэвлэх
#FileHandle%, VarBuffer[;] бичих
· Print /Write - оператор түлхүүр үг.
· #FileHandle % - мэдээлэл байршуулах файлын заагч.
· VarBuffer нь файлд бичигдэх утга юм.
· ; – Текст файлд бичихэд ашигладаг нэмэлт параметр нь дараагийн утгыг нэг мөрөнд, хэрэв байхгүй бол дараагийн утгыг бичнэ гэсэн үг юм.
Файлаас мэдээллийг уншихын тулд "Оролт" болон "Мөрийн оролт" операторуудыг ашигладаг. Синтакс нь хоорондоо төстэй:
Шугамын оролт #FileHandle%, VarBuffer
#FileHandle%, VarBuffer оруулна уу
· Шугамын оролт / оролт - операторын түлхүүр үгс.
· #FileHandle % - мэдээлэл унших файлын заагч.
· VarBuffer нь мэдээллийг унших хувьсагч юм.
Line Input болон Input операторуудын ялгаа нь эхнийх нь зөвхөн текст файлд зориулагдсан, хоёр дахь нь дурын операторуудад зориулагдсан байдаг. Текст файлын хувьд "Оролт" нь эхний хязгаарлагч хүртэлх нэг мөрөнд байгаа өгөгдлийг уншдаг (текст өгөгдлийн хувьд зааглагч нь "," (таслал), тоон мэдээллийн хувьд " " (зай) ба "," ) болон "Мөрийн оролт" нь ямар ч хязгаарлагчийг үл тоомсорлон мөрийг бүхэлд нь нэг дор уншдаг.
|
Анхаарна уу |
IN Visual Basicөмнө нь үүсгэсэн файлуудын форматыг хянах ямар ч хэрэгсэл байхгүй. Тиймээс "2" тэмдгийг харгалзах тоо болон эсрэгээр уншиж болно. |
8.3. Хоёртын файлуудтай ажиллах
Файлууд нээгдэнэ хоёртын форматоператор " Нээлттэй" горимд " Хоёртын ". Энэ горимын нэг онцлог шинж чанар нь файлтай ажиллах нь зөвхөн тодорхой байт дээр төвлөрдөг явдал юм. Visual Basic нь файлын хүссэн байршилд шууд хаяглах боломжтой тул энэ горимыг мөн − гэж нэрлэдэг шууд хандалтын горим. Энэ горимын өөр нэг онцлог нь файлын өөр өөр хэсэгт мэдээллийг дахин нээхгүйгээр нэгэн зэрэг бичих, унших чадвар юм. Хоёртын горимд нээгдсэн файл руу бичих нь дараах синтаксийг ашиглан хийгддэг.
#FileHandle%, , NameVar-г тавь
· Put - мэдээлэл бичих операторын нэр.
· RecNumber – мэдээлэл бичих файлын байт тоо (заавал биш параметр).
· NameVar нь агуулга нь файлд бичигдэх хувьсагч юм.
Хоёртын горимд файлаас мэдээллийг унших нь дараах мэдэгдлийг ашиглан хийгддэг.
#FileHandle%, , NameVar аваарай
· Get гэдэг нь мэдээлэл бичих операторын нэр юм.
· FileHandle % - файлын заагч.
· RecNumber – мэдээллийг унших файлын байт тоо (заавал биш).
· NameVar - уншсан мэдээллийг байрлуулах хувьсагчийн нэр.
Хоёртын горим нь мэдээллийн байт дээр төвлөрдөг тул файлаас унших үед буфер хувьсагч нь хатуу тодорхойлсон төрөлтэй байх ёстой: "Байт", дараа нь байтын тоон утга эсвэл тогтмол урттай тэмдэгт уншина. нэг тэмдэгттэй бол байт нь ANSI тэмдэгтээр уншигдах бөгөөд код нь байт утгатай тохирч байна. Энэ тэмдэгт нь текст файлын хувьд хүрэх боломжгүй хяналтын тэмдэгт ч байж болно.
|
Анхаарна уу |
"RecNumber" параметр байхгүй тохиолдолд мэдээлэл нь өмнө нь ажиллаж байсан файлын дараагийн байт дээр бичигдэх эсвэл унших болно.
8.4. Графикийн манипуляци
График зургийг мөн файлд хадгалж, тэдгээрээс татаж авч болно. Bitmap эсвэл дүрс файлаас зургийг гаргаж аваад "PictureBox" болон "Image" удирдлагын "Picture" шинж чанарт хуваарилахын тулд "LoadPicture ()" функцийг дараах синтакс ашиглана уу.
ImageCtrl.Picture = Зургийг ачаалах(Файлын зам)
· ImageCtrl нь зургийн цонхны удирдлага, зургийн удирдлага эсвэл маягтын нэр юм;
· LoadPicture - функцийн нэр;
· FilePath нь файлын бүтэн нэр юм.
SavePicture ImageCtrl .Зураг, FilePath
· SavePicture - операторын нэр;
· ImageCtrl нь зургийн цонхны удирдлага, зургийн удирдлага эсвэл маягтын нэр юм;
· Зураг - зургийг хариуцах объектын өмчийн нэр;
· FilePath нь файлын бүтэн нэр бөгөөд дискэн дээрх байршлыг заана.
8.5. Бүртгэлд байгаа өгөгдөлтэй ажиллах
Та Windows Бүртгэлийг ашиглан тэмдэгт форматтай жижиг хэсгүүдийг хадгалах боломжтой. Visual Basic нь танд хандахын тулд ашиглаж болох дөрвөн процедуртай. Тэдгээрийг ашиглахад маш хялбар боловч нэг том дутагдалтай тал бий: та зөвхөн "MyComputer \HKEY _CURRENT _USER \Software \VB and VBA Program Settings" гэсэн бүртгэлийн тусгай түлхүүрээс өгөгдөлд хандах боломжтой. Бүртгэлийн бусад түлхүүрүүдэд хандахын тулд та " Win 32 API" тусгай функцуудыг ашиглах хэрэгтэй.
Visual Basic-ийн тусгай Windows бүртгэлийн түлхүүрээс тохиргооны утгыг авахын тулд дараах функцийг ашиглана уу.
MyString = GetSetting(VBKeyName, Хэсэг, Түлхүүр [,Өгөгдмөл])
· MyString - функцээс буцаж ирсэн утгыг хадгалах мөр;
· GetSetting нь функцийн нэр юм.
· VBKeyName нь дотоод VB /VBA дэд түлхүүрийн нэр болох мөрийн утга юм.
· Түлхүүр нь хэсэг дэх параметрийн нэрийг илэрхийлэх тэмдэгт мөрийн утга юм.
· Өгөгдмөл нь нэмэлт аргумент бөгөөд алдаа гарсан тохиолдолд (параметр байхгүй) утгыг буцаана.
Windows бүртгэлд утгыг хадгалахын тулд дараах мэдэгдлийг ашиглана уу.
SaveSetting VBKeyName, Section, Key, MyString
· SaveSetting нь операторын нэр юм.
· MyString бол олсон утгыг байрлуулах мөрийн хувьсагч юм.
Тодорхой дэд түлхүүрийн бүх параметрийн утгыг агуулсан бүртгэлээс массив авахын тулд дараах функцийг ашиглана уу.
MyVariant = SetAllSettings(VBKeyName, Хэсэг)
· MyVariant нь функцээс буцаж ирсэн "Variant" төрлийн утгуудын массив юм.
· SetAllSettings нь функцийн нэр юм.
· Section - Тодорхой програмын хэсэг эсвэл дэд хэсгийг төлөөлөх тэмдэгт мөрийн утга.
Параметрийн хэсгийг бүхэлд нь устгахын тулд дараах синтакс бүхий операторыг ашиглана уу.
DeleteSetting VBKeyName, Section, Key
· DeleteSetting нь операторын нэр юм.
Өөрийгөө шалгахад зориулсан аюулгүй байдлын асуултууд
- Зарим мэдээллийг хэрхэн урт хугацаанд хадгалах вэ?
- Файл гэж юу вэ?
- Та ямар файлын нэрийг мэдэх вэ?
- "Нээлттэй" операторын синтаксийг өг. Түүний параметрүүдийн зорилгыг тайлбарла.
- Нэг файл руу хэд хэдэн програмын хамтарсан хандалтыг би хэрхэн зохион байгуулах вэ?
- Файл дахь мэдээлэл дууссан гэдгийг хэрхэн тодорхойлох вэ?
- Файлтай ажилласны дараа яагаад үүнийг хаахыг зөвлөж байна вэ?
- Текст болон хоёртын файлын горимуудын ялгааг та юу гэж харж байна вэ?
- Текст файлын горимд өгөгдлийг хэрхэн уншиж, бичдэг вэ?
- Хоёртын файлын горимд өгөгдлийг хэрхэн уншиж, бичдэг вэ?
- Файлтай ажиллахдаа "Хэвлэх" болон "Бичих" операторуудын хооронд ямар ялгаа байдаг вэ?
- Файлтай ажиллахдаа "Оролт" болон "Шуурын оролт" хэллэгүүдийн хооронд ямар ялгаа байдаг вэ?
- График өгөгдөлтэй хэрхэн ажиллах вэ?
- Windows бүртгэлтэй ажиллах үндсэн зарчим юу вэ?
Програм бүр өгөгдлийг дискэнд хадгалж, дискнээс унших ёстой. Энэ нь жишээлбэл, програмын тохиргоог хадгалахад шаардлагатай бөгөөд дараагийн удаа эхлүүлэхэд дахин тохируулах шаардлагатай программ хэрэглэгчдэд таалагдах магадлал багатай юм.
Энэ нийтлэл нь Visual Basic ашиглан текст файлуудтай ажиллахад чиглэгддэг.
Файлын тодорхойлогч
Файлуудтай ажиллахын тулд үйлдлийн систем I/O сувгуудыг ашигладаг, i.e. нээлттэй файл бүр өөрийн гэсэн дугаартай.
Visual Basic-д функц байдаг үнэгүй файл, энэ нь файлтай ажиллахад ашиглаж болох үнэгүй сувгийн дугаарыг буцаана. Хэрэв үнэгүй суваг байхгүй бол алдаа гарна.
Үнэгүй файл[(Хүрээний дугаар) ]
Хүрээний дугаар- чөлөөт сувгийн хүрээг тодорхойлох боломжтой нэмэлт параметр, хэрэв Хүрээний дугаар= 0 (анхдагч), дараа нь сувгийн дугаарыг 1 - 255 мужаас, хэрэв 1 бол 256 - 511 мужаас буцаана.
MyFile = FreeFile " MyFile хувьсагчийг томилсон үнэгүй сувагодоо үүнийг файлуудтай ажиллахад ашиглаж болно
Текст файлуудтай ажиллах
Ихэнхдээ текст файлуудтай уулзах шаардлагатай байдаг. Текст файлууд нь багцаас бүрдэнэ ASCII тэмдэгтүүд(American Standard Code for Information Interchange - American Standard Code for Information Interchange).
Өгөгдөл бичиж / уншиж эхлэхээсээ өмнө файлыг нээх ёстой бөгөөд үүнийг оператор ашиглан хийдэг нээлттэй(Файлын нэр) # хувьдфайлын_тоо, Хаана:
Оролт- Уншихаар файл нээх, хэрэв файл байхгүй бол алдаа гарна;
Гаралт- бичихийн тулд хэрэв файл байхгүй бол түүнийг үүсгэнэ, хэрэв байгаа бол түүнийг дарж бичнэ;
Хавсаргах- нэмэхийн тулд хэрэв файл байхгүй бол түүнийг үүсгэх бөгөөд хэрэв файл байгаа бол өгөгдлийг файлын төгсгөлд нэмнэ.
Уншиж байна текст файлуудХоёр аргаар хийж болно: тэмдэгт тус бүрийг унших, үүний тулд функцийг ашигладаг Оролт(Уншсан_тэмдэгтийн_тоо, #файлын_тоо) ба мөр мөрөөр, үүний тулд функцийг ашигладаг Шугамын оролт#файлын_тоо, Хаана_унших.
DimMyFile
Dim S As String "Уншсан өгөгдлийг хадгалах хувьсагч
MyFile = FreeFile
Нээлттэй("C:\TEST.txt") #MyFile хэлбэрээр оруулах
Шугамын оролт #MyFile,S "TEST.TXT файлын эхний мөрийг S хувьсагч руу уншина уу
DimMyFile "Үнэгүй файлын хувьсагчийг зарлах
Бүдэг i Бүхэл тоо "Хувьсагч нь давталт
Dim tS As String "Мөрүүдийг унших хувьсагч
Dim S As String "Эцсийн өгөгдлийг хадгалах хувьсагч
MyFile = FreeFile "Файлтай ажиллах үнэгүй суваг оноож өг
Уншихын тулд TEST.TXT файлыг нээнэ үү
i = 1-ээс 5-ын хувьд
Шугамын оролт #MyFile, tS "TEST.TXT файлыг мөр мөрөөр уншина уу
Хэрэв i => 5 бол S = tS болно "Хэрэв тав дахь мөр бол S хувьсагчид хадгална
Дараагийн i
Хаах #MyFile "Файлыг хаа
Dim MyFile "Үнэгүй файлын хувьсагчийг зарлах
Dim S As String "Уншсан өгөгдлийг хадгалах хувьсагч
MyFile = FreeFile "Файлтай ажиллах үнэгүй суваг оноож өг
Нээлттэй("C:\TEST.txt") #MyFile хэлбэрээр оруулах Уншихын тулд TEST.TXT файлыг нээнэ үү
S = Оролт$(LOG(1), 1) "Файлыг бүхэлд нь S хувьсагч болгон уншина уу
Хаах #MyFile "Файлыг хаа
Файл руу бичих операторууд байдаг. # хэвлэхфайлын_тоо, ӨгөгдөлТэгээд # бичихфайлын_тоо, Өгөгдөл. Эдгээр операторуудын цорын ганц ялгаа нь бичихөгөгдлийг хашилтанд бичнэ, мөн хэвлэхишлэлгүйгээр.
Доорх код нь C:\ диск дээр үүсгэгдэнэ. шинэ файл TEST.TXT-г оруулаад түүнд хоёр мөр бичнэ үү, эхнийх нь хашилтгүй, хоёр дахь нь хашилттай:
DimMyFile "Үнэгүй файлын хувьсагчийг зарлах
MyFile = FreeFile "Файлтай ажиллах үнэгүй суваг оноож өг
Нээлттэй("C:\TEST.txt") #MyFile хэлбэрээр гаргана "Бичих бол TEST.TXT файлыг нээ
Print #MyFile, "Энэ мөрийг Print хэллэгээр бичсэн, энэ нь хашилтгүй байна..."
#MyFile гэж бичээд "Энэ мөрийг Write хэллэгээр бичсэн, энэ нь хашилтанд байна..."
Хаах #MyFile "Файлыг хаа
Энэ бол үнэндээ бүх зүйл. Файлыг хаахад ашигладаг оператор гэдгийг та аль хэдийн ойлгосон байх Хаах#файлын_тоо, үүнд, # файлын_тоозааж өгөх шаардлагагүй.
Нийтлэл нь бага зэрэг түүхий боловч шинэхэн програмистуудад ашигтай байх болно. Дараагийн удаа би хоёртын файлуудтай ажиллах талаар ярих болно.
Ачааж байна...