vb6 дахь жагсаалт хэлбэрээр файлын систем. Файл зөөх, хуулах, устгах

Windows

Ажлын зорилго: VB 6 хэлний операторуудыг файлтай ажиллахад ашиглаж сурах янз бүрийн төрөл: дараалсан (текст) файлууд, санамсаргүй хандалтын файлууд, хоёртын файлууд. Хэрэгслийг судлах, ашиглах НийтлэгХарилцах цонхфайл нээх, хадгалах, фонт, өнгө сонгох, объектыг ашиглахад зориулагдсан Түр санах ойэнгийн текст засварлагч үүсгэх жишээг ашиглан текстийн хэсгүүдийг хадгалахад зориулагдсан.

Хяналтын асуултууд:

1. Текст файлыг ямар аргаар нээж болох вэ? Текст болон бусад зүйлийг хэрхэн хаах вэ нээлттэй файл?

2. Бичихэд нээлттэй текст файлд өгөгдлийг хэрхэн бичих вэ? Бичих ба Хэвлэх мэдэгдлийн хооронд ямар ялгаа байдаг вэ?

3. Өгөгдлийг уншихын тулд нээлттэй байдлаас хэрхэн уншдаг текст файл? Оролт ба Шугамын оролтын операторууд бие биенээсээ юугаараа ялгаатай вэ? Файлаас тодорхой тооны тэмдэгтүүдийг уншихын тулд ямар функцийг ашиглаж болох вэ? Файлын бүх тэмдэгтийг хэрхэн унших вэ?

4. Хэрэглэгчийн өгөгдлийн төрөл гэж юу вэ, энэ ойлголтыг санамсаргүй хандалтын файлуудтай ажиллахад хэрхэн ашигладаг вэ ( raf)?

5. Файлаас ямар операторуудыг ашиглах rafбичлэгүүдийг мөн файлд уншина rafШинэ бичлэгүүд бичигдэж байна уу?

6. Файлтай ажиллахдаа индексийг ямар зорилгоор тодорхойлж ашигладаг вэ? raf?

7. Хоёртын файлыг ашиглах онцлог нь юу вэ? Тэд хэрхэн нээх вэ? Хоёртын файлаас унших, хоёртын файл руу бичих ажил хэрхэн хийгддэг вэ?

8. Удирдлагыг хэрхэн ашиглах талаар НийтлэгХарилцах цонхтекст файлын агуулгыг текст талбарт ачаалах уу? Би засварласан текстийг текст файлд хадгалахын тулд ижил хяналтыг хэрхэн ашиглах вэ?

9. Удирдлагыг хэрхэн ашиглах талаар НийтлэгХарилцах цонхфайлын агуулгыг татаж авах rtfталбайд БаянТекст хайрцаг? Засварласан текстийг файлд хадгалахын тулд ижил удирдлагыг хэрхэн ашиглах вэ rtf?

10. Удирдлагыг хэрхэн ашиглах талаар НийтлэгХарилцах цонхүсгийн параметрийн утгыг өөрчлөх, цонхны текстийн өнгийг өөрчлөх Текст хайрцаг(эсвэл цонхон дээрх сонгосон текстийн хэсэг БаянТекст хайрцаг)?

Жишээ 7.1. Текст файл руу бичих (мөн текст файлаас унших) "ажилтны мэдээлэл" - мөр тус бүр нь таних дугаар, овог нэр, төрсөн огноо, ажилтны төрсөн газар зэргийг агуулсан програмыг авч үзье. Мөрүүд нь хүснэгтийг үүсгэдэг бөгөөд дэлгэцэн дээр Combo Box-ын 4 удирдлага (Зураг 7.1) дуурайлган, Style шинж чанар нь 1 – SimpleCombo утгатай Comb(i) объектуудын массивыг бүрдүүлнэ.

Устгах мөрийг сонгоно уу", 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).Жагсаалтын тоо

№1-р гаралтын хувьд "хүн. 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 НийтлэгХарилцах цонхцэсийн командуудыг хэрэгжүүлэх ФонтТэгээд Өнгө(дэд цэстэй Дүрийн өнгөТэгээд Дэвсгэр өнгө). Эдгээр командыг ашиглан цонхон дээрх сонгосон текстийн фрагментийн фонт (түүний нэр, загвар, хэмжээ) сонгох боломжтой байх ёстой. БаянТекст хайрцаг, түүнчлэн сонгосон фрагментийн тэмдэгтүүдийн өнгийг сонгох, бүх цонхны дэвсгэр өнгийг сонгох.

Жич:Объектыг тохируулах үед НийтлэгХарилцах цонх(Захиалгат) шинж чанарыг ашиглан фонт сонгохдоо Flags шинж чанарын утгыг 1, 2 эсвэл 3 болгож тохируулахаа мартуузай (гарын авлага, хуудас 183-ыг үзнэ үү).

Сонголт 2. Удирдлага ашиглах НийтлэгХарилцах цонхцэсийн командуудыг хэрэгжүүлэх Засварлах(дэд цэс Хуулбарлах, ТаслахТэгээд Буулгах), зорилго нь хуулбарлахэсвэл устгахсонгосон текст фрагментийн санах ой руу, мөн түүнчлэн оруулахсанах ойн агуулгын сонгосон текст талбарт.

Жич:Түр санах ой руу (объект Түр санах ой) та SetText болон GetText аргыг ашиглаж болно:

Түр санах ой. SetText RichTextBox1.SelText

RichTextBox1.SelText = Түр санах ой. GetText

Програм бүр өгөгдлийг дискэнд хадгалж, дискнээс унших ёстой. Жишээлбэл, програмын тохиргоог хадгалахын тулд энэ нь зайлшгүй шаардлагатай бөгөөд дараагийн удаа эхлүүлэхэд дахин тохируулах шаардлагатай программ хэрэглэгчдэд таалагдахгүй байх магадлалтай.

Энэ нийтлэлд бид текст файлуудтай ажиллах талаар ярих болно Visual Basic.

Файлын тодорхойлогч

Файлуудтай ажиллахын тулд үйлдлийн систем I/O сувгуудыг ашигладаг, i.e. Нээлттэй файл бүр өөрийн гэсэн дугаартай.

Visual Basic-д функц байдаг Үнэгүй файл, энэ нь файлтай ажиллахад ашиглаж болох үнэгүй сувгийн дугаарыг буцаана. Хэрэв үнэгүй суваг байхгүй бол алдаа гарна.

Үнэгүй файл[(Хүрээний дугаар) ]

Хүрээний дугаар- чөлөөт сувгийн утгын хүрээг тодорхойлох боломжийг олгодог нэмэлт параметр Хүрээний дугаар= 0 (анхдагч), дараа нь сувгийн дугаарыг 1 - 255 мужаас, хэрэв 1 бол 256 - 511 мужаас буцаана.

MyFile = FreeFile "MyFile хувьсагчийг томилсон үнэгүй сувагодоо үүнийг файлуудтай ажиллахад ашиглаж болно

Текст файлуудтай ажиллах

Ихэнхдээ та текст файлуудтай тулгардаг. Текст файлууд нь ASCII (Америкийн мэдээлэл солилцох стандарт код) тэмдэгтийн багцаас бүрдэнэ.

Өгөгдөл бичиж/уншиж эхлэхээсээ өмнө файлыг нээх шаардлагатай бөгөөд үүнийг оператор ашиглан хийдэг Нээлттэй (Файлын нэр) # хувьдФайлын_тоо, Хаана:

Оролт- файлыг уншихаар нээх, хэрэв файл байхгүй бол алдаа гарна;

Гаралт- бичихийн тулд хэрэв файл байхгүй бол түүнийг үүсгэнэ, хэрэв байгаа бол түүнийг дарж бичнэ;

Хавсаргах- нэмэхийн тулд хэрэв файл байхгүй бол түүнийг үүсгэнэ, хэрэв байгаа бол өгөгдлийг файлын төгсгөлд нэмнэ.

Текст файлуудыг уншихыг хоёр аргаар хийж болно: тэмдэгт тус бүрийг унших, үүний тулд функцийг ашиглана уу Оролт(Уншсан_тэмдэгтийн_тоо, #Файлын_тоо) ба мөр мөрөөр функцийг үүнд ашигладаг Шугамын оролт #Файлын_тоо, Хаана_унших.

Миний файлыг бүдгэрүүлнэ

Dim S As String "Уншсан өгөгдлийг хадгалах хувьсагч

MyFile = FreeFile

Нээлттэй("C:\TEST.txt") #MyFile хэлбэрээр оруулах

Шугамын оролт #MyFile, S "TEST.TXT файлын эхний мөрийг S хувьсагч руу уншина уу

Миний файлыг бүдгэрүүлнэ "Үнэгүй файлын хувьсагчийг зарлах

Бүдэг 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) "С хувьсагч руу файлыг бүхэлд нь уншина уу

Хаах #MyFile "Файлыг хаа

Файл руу бичих операторууд байдаг # хэвлэхФайлын_тоо, ӨгөгдөлТэгээд # бичихФайлын_тоо, Өгөгдөл. Эдгээр операторуудын цорын ганц ялгаа нь бичиххашилтанд өгөгдлийг бичнэ, мөн Хэвлэхишлэлгүйгээр.

Дараах код нь C:\ диск дээр шинэ TEST.TXT файл үүсгэж, түүн рүү эхнийх нь хашилтгүй, хоёр дахь нь хашилттай хоёр мөр бичих болно.

Миний файлыг бүдгэрүүлнэ "Үнэгүй файлын хувьсагчийг зарлах

MyFile = FreeFile "Файлтай ажиллах үнэгүй суваг оноох

Нээлттэй("C:\TEST.txt") #MyFile хэлбэрээр гаргана "Бичихийн тулд TEST.TXT файлыг нээнэ үү

Print #MyFile, "Энэ мөрийг Print оператор бичсэн, хашилтгүй..."

#MyFile гэж бичээд "Энэ мөрийг Write оператор бичсэн, хашилтанд байна..."

Хаах #MyFile "Файлыг хаа

Тэгээд л болоо. Та аль хэдийн ойлгосон байх, оператор нь файлыг хаахад ашиглагддаг Хаах #Файлын_тоо, үүнд, # Файлын_тоозааж өгөх шаардлагагүй.

Нийтлэл нь бага зэрэг бүдүүлэг боловч шинэхэн програмистуудад ашигтай байх болно. Дараагийн удаа би хоёртын файлуудтай ажиллах талаар ярих болно.

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 – мэдээлэл унших хувьсагч.

"Мөрийн оролт" ба "Оролт" операторуудын ялгаа нь эхнийх нь зөвхөн текст файлд зориулагдсан, хоёр дахь нь аль ч операторт зориулагдсан юм. Текст файлын хувьд "Оролт" нь өгөгдлийг эхний хязгаарлагч хүртэл нэг мөрөнд уншина (текст мэдээллийн хувьд тусгаарлах нь "," (таслал), тоон мэдээллийн хувьд "" (зай) ба ",") , мөн “Мөрийн оролт » нь ямар ч хязгаарлагчийг үл тоомсорлон мөрийг бүхэлд нь нэг дор уншина.

Анхаарна уу

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 ба VBA програмын тохиргоо" гэсэн бүртгэлийн тусгай түлхүүрээс өгөгдөлд хандах боломжтой. Бүртгэлийн бусад хэсгүүдэд хандахын тулд та "Win 32 API" тусгай функцийг ашиглах хэрэгтэй.

Windows бүртгэлийн Visual Basic хэсгээс тохиргооны утгыг авахын тулд та дараах функцийг ашиглах хэрэгтэй.

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 - операторын нэр.

Өөрийгөө шалгах тестийн асуултууд

  1. Та зарим мэдээллийг хэрхэн урт хугацаанд хадгалах вэ?
  2. Файл гэж юу вэ?
  3. Та ямар файлын нэрийг мэдэх вэ?
  4. "Нээлттэй" операторын синтаксийг өг. Түүний параметрүүдийн зорилгыг тайлбарла.
  5. Хэрхэн олон програмууд нэг файлд хандах хандалтыг нэгэн зэрэг хуваалцах вэ?
  6. Файл дахь мэдээлэл дууссан гэдгийг хэрхэн тодорхойлох вэ?
  7. Яагаад файлтай ажилласны дараа үүнийг хаахыг зөвлөдөг вэ?
  8. Текст болон хоёртын файлын горимуудын ялгааг та юу гэж харж байна вэ?
  9. Текст файлын горимд өгөгдлийг хэрхэн уншиж, бичдэг вэ?
  10. Хоёртын файлын горимд өгөгдлийг хэрхэн уншиж, бичдэг вэ?
  11. Файлтай ажиллахдаа "Хэвлэх" болон "Бичих" операторуудын хооронд ямар ялгаа байдаг вэ?
  12. Файлтай ажиллахдаа "Оролт" болон "Шуурын оролт" операторуудын хооронд ямар ялгаа байдаг вэ?
  13. График өгөгдөлтэй хэрхэн ажиллах вэ?
  14. Windows бүртгэлтэй ажиллах үндсэн зарчим юу вэ?