LẬP TRÌNH VB.NET BÀI 7:THAO TÁC VỚI FILE CÁC VẤN ĐỀ KHÁC

Public Class Form1 Private Sub Button1_ClickByVal sender As System.Object, ByVal e As System.EventArgs Handles Button1.Click Dim i As Integer Dim I temList As New ArrayList I temLi

BÀI 7:

THAO TÁC V I FI LE & CÁC V N KHÁC

Cách khai báo m ng 1 chi u

Truy c p đ n các ph n t c a m ng 1 chi u

L y s l ng ph n t c a m ng 1 chi u

Cách duy t m ng 1 chi u

Cách khai báo m ng 2 chi u

Cách truy c p và duy t m ng 2 chi u

H th ng bài c

BÀI 7: THAO TÁC V I FILE TRUY C P TU N T 2

Hi u v h th ng phân c p d li u mà máy tính x lý

Hi u v file, bi t cách đ c và ghi d li u t file truy c p

tu n t

Bi t cách s d ng đi u khi n OpenFileDialog

Bi t cách s d ng đi u khi n MonthCalendar

Bi t cách s d ng đi u khi n MenuStrip

Bi t cách s d ng m ng và m ng đ ng

M c tiêu bài h c

File là m t t p h p d li u đ c l u l i ngay c khi ng

d ng đã k t thúc

File đ c l u tr trên các ph ng ti n th c p nh

Visual cung c p các thao tác t o, đ c và ghi d li u vào

RAM

File truy c p tu n t

Là file mà thông tin đ c đ c ra theo th t mà nó đ c ghi vào tr c đó

Bài này s gi i thi u v cách đ c và ghi file tu n t

File truy c p ng u nhiên

Là file mà thông tin đ c đ c ra theo th t ng u nhiên

Bit

Ph n t nh nh t mà máy tính x lý

Ch l u giá tr 0 ho c 1 Máy tính th c hi n thao tác đ n gi n trên bit (ki m tra giá tr

c a bit, gán giá tr cho bit, đ o giá tr bit)

Byte

T p h p g m 8 bit Trong Visual Basic, m i ký t g m 2 byte

L p trình t o ra các ph n t d li u b ng các ký t , máy tính thao tác trên chu i bit

H th ng phân c p d li u

BÀI 7: THAO TÁC V I FILE TRUY C P TU N T 8

Là t p h p các b n ghi có liên quan

Ví d nh file l u thông tin v đi m cho m t l p h c

l y b n ghi d dàng, m t tr ng trong b n ghi đ c ch n làm khóa b n ghi (ví d nh mã s sinh viên)

C s d li u

Là m t nhóm file có liên quan

H th ng phân c p d li u

Visual Basic cung c p đ i t ng lu ng (stream) đ h

tr cho vi c đ c và ghi thông tin vào File

Khi m t file đ c m , m t lu ng đ c g n vào đ i t ng file đ “đ ” thông tin vào File hay “hút” d li u t file

Thêm namespace System.I O

Khai báo bi n StreamWriter

Kh i t o giá tr cho đ i t ng StreamWriter

N u tham s th hai là False, n i dung có s n trong file

Demo ghi d li u ra file

BÀI 7: THAO TÁC V I FILE TRUY C P TU N T 12

C

C ch ghi

ng d ng không đ c d li u ra file ngay khi th c hi n l nh

Write hay WriteLine

C ch đ c

ng d ng đ c t ng kh i d li u t file vào RAM

T i m t th i đi m, ch m t ng d ng truy c p đ n file

C g ng m m t file đang m s gây l i

C ch đ c và ghi ra file

BÀI 7: THAO TÁC V I FILE TRUY C P TU N T 14

Thêm namespace System.I O

Khai báo kh i t o bi n StreamReader

Thêm OpenFileDialog vào Form

Hi n th h p tho i cho ng i dùng ch n file khi Click vào

m t Button trên Form

S d ng thu c tính FileName đ l y tên file đ c ch n

Dùng MessageBox đ hi n th tên file

Demo s d ng h p tho i

OpenFileDialog

S ki n

DateChanged - c th c thi khi m t ngày (ho c m t

kho ng ngày tháng) m i đ c ch n.

Name - Xác đ nh tên đ c dùng đ truy c p các thu c

tính c a đi u khi n MonthCalendar trong mã c a ng

d ng Tên nên có h u t MonthCalendar.

SelectionStart - tr v ngày đ c ch n đ u tiên (ho c duy nh t).

i u khi n MonthCalendar

BÀI 7: THAO TÁC V I FILE TRUY C P TU N T 18

Demo s d ng h p tho i

OpenFileDialog

Private Sub openFileButton_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) Handles openFileButton.Click

Dim ketqua As DialogResult = openFileDialog.ShowDialog()

'm file n u ng i dùng không nh n vào Button Cancel

If ketqua <> Windows.Forms.DialogResult.Cancel Then

trên T B

vào Form

Thêm MonthCalendar vào Form

X lý s ki n DateChanged cho đi u khi n này

Khi ng i dùng ch n ngày thì s hi n th ngày v a ch n

Demo s d ng MonthCalendar

D C M C Private Sub dateMonthCalendar_DateChanged( _ ByVal sender As System.Object, ByVal e As _ System.Windows.Forms.DateRangeEventArgs) _ Handles dateMonthCalendar.DateChanged

'

MessageBox.Show(dateMonthCalendar.SelectionStart)

End Sub ' dateMonthCalendar_DateChanged

Dùng đ nhóm các ch c n ng liên quan trong ng d ng

Windows

Menu

BÀI 7: THAO TÁC V I FILE TRUY C P TU N T 22

Thêm MenuStrip vào Form

Thi t k Menu

X lý s ki n khi nh n vào m c Menu

Demo s d ng MenuStrip

Thêm MenuStrip vào Form

BÀI 7: THAO TÁC V I FILE TRUY C P TU N T 24

thêm vào Form

Thi t k MenuStrip

C

F

font

X lý s ki n khi nh n vào m c Color…

BÀI 7: THAO TÁC V I FILE TRUY C P TU N T 26

M

Khai báo m ng không kh i t o ph n t

Dim arr As Array

Dim int() As Integer = { 12, 16, 20, 24, 28, 32}

arr = CType(int, Array)

Dim MangSo() As Integer = { 12, 24, 36, 48}

Dim MangKyTu() As String = { "K", "S", "S", "D", "N"}

Dim MangDoiTuong() As Object = { "this", ”a”}

Dim objArray() As Object

M ng và các cách khai báo

Ta s d ng vòng l p đ đ c d li u t m ng

Dim sourceArray() As Integer = { 1, 2, 3}

Dim counter As Integer

For counter = 0 To sourceArray.Length - 1

Ta s d ng InsertArrayElement đ thêm d li u vào m ng

Dim arrayInsert() As String = { "O", "A", "G", "B", "B"}

InsertArrayElement(Of String)(arrayInsert, 2, “Chanh")

Thêm d li u vào m ng

Khai báo d li u ki u c u trúc

Structure Person

Dim strLastName As String

Dim strFirstName As String

Dim strPhone As String

Khai báo ArrayList

Dim alPersons As New ArrayList

Thêm d li u vào ArrayList

alPersons.Add(udtPerson)

Insert d li u vào m t v trí b t k trong ArrayList

I f Not alPersons.Contains(udtPerson) Then

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object,

ByVal e As System.EventArgs) Handles Button1.Click Dim i As Integer

Dim I temList As New ArrayList()

I temList.Insert(3, "I tem6")

'sort itemms in an arraylist

Các ph n t đ c x lý b i máy tính là m t h th ng

phân c p d li u Các ph n t ph c t p đ c c u thành

t các ph n t đ n gi n h n

Bit là ph n t nh nh t mà máy tính x lý

File là m t t p d li u đ c l u l i ngay c khi ng d ng

k t thúc File đ c l u trên thi t b l u tr th c p

D li u t file đ c đ c vào RAM, sau đó CPU x lý d

li u trên RAM

File đ c phân làm hai lo i, file truy c p ng u nhiên và file truy c p tu n t

Visual Basic cung c p lu ng đ h tr vi c đ c và ghi

file S d ng StreamWriter đ ghi d li u vào file và

StreamReader đ đ c d li u t file

T ng k t bài h c

BÀI 7: THAO TÁC V I FILE TRUY C P TU N T 34

Hãy nh đóng file sau khi đã thao tác xong v i file đ

XIN C M N!