u.v n ed ui Th.S: XUÂN THỊNH - NAM THUẬN u.v n- ww w lib nhóm Un học thực dụng u.v n- ww w lib ui ed Kỹ thuật thủ thuật lập trình VISUAL BASIC 2010 - 2011 ui ed Từ đến nâng cao - dành cho học sinh, sinh viên trường Cao Đẳng Đ ại Học -w ww lib ♦ M icrosoít V isuaJ B asic 2010-2011 b ản nâiig cấp cải liế n qxian trọng ciia ngôn n g ữ lậ p tr in h lâ ê m trìn h biên d ịc h V lsual B asic p h o b iế n , m ộ t cơng Iighệ điíỢc r ắ t n h iề u n h lập trìn li Id iắp th ế giới tin cậy sử diuig ed u.v n ♦ V i cách bố cục c h ặ t c h ẽ th e o từ n g c h ủ đ ề chitơng rát Iihiều tập thực Ì i ằ i ì bước chương trùửi ♦ Các tín h n ăn g m ới n h t c ủ a Visi.ial B asic giiip b ạn lập trìn h n h an li (ĩạ t h iệ u qiiâ cao hơn, n h ấ t k h i b n tliíc h sử dụiig tíc h h ợp th ô n g tlii từ sở d ữ liệ u , phư ơng tiệ n g iả i trí» tra n g W eb Wcb slte Hy vọng saii k h i học xong birôc t h ủ th u ậ t lậ p trìn h tro n g q u y ển sá c h n ày với V isiial Basic ww w lib ui ed u.v n -w ww lib ui New Edition m ăii, b a n n h a n h chóĩig học đư ợc cá ch tạ o ííng dụncị V isuai Basic NHÀ XUẤT BẢN HỒNG ĐỨC u.v n ed ui .lib ww w ed u.v n ui .lib -w ww lib -w ww ed ui n- u.v ww w lib ui ed n- u.v ww w lib ui ed u.v n u.v n ed ww w lib ui L ỜI NỐI ĐẦU M icro so ft V isu a l B asic 8010-8011 b ả n n â n g c ấ p cải tiế n q u a ii trọ n g c ủ a n g ò n Iigữ lậ p tr ìn h ld.êm trìrứ i b iê n d ịc h n- V istia l B a sic p h ổ b iế n , m ộ t công n g h ệ đưỢc r ắ t lủ iiề u n h ed u.v lậ p trìiử i Ichắp ứ iế giớ i tin cậy s d ụ n g V is u a l B asic 2 1 lchông p h ả i s ả n p h ẩ m độc lậ p m m ộ t th iứ i p h ầ n ui c h in h c a M ỉcro so V isu a l S tu d io 201 -2 1 - m ộ t h ệ th ố n g p h p t r i ể n to n d iệ n cho p h é p Hgười d ù n g tạ o r a lứ iữ ng ứ ng ww w lib diỊHg m n h m ẽ d n h ch o W indow s, W eb, t l ii ế t b ị cầ m tay , v r ấ t n liiề u m ô i trư n g Iđiác n- Bộ s c h "K ỷ t h u ậ t v tJhủ t h u ậ t lậ p t r ìn h VTSIIA L B A u.v S IC -2 1 " gồ m tậ p , h ng d ẩ n to n đ iệ n lậ p trìn li ed V is u a l B a sic s d ụ n g p h ầ n m ề m V isu a l B a sic 2010-2011 .ha ui V ới c c h b ố cụ c c h ặ t c h ẽ th e o từ n g c h ủ đ ề ch n g r ắ t n h iề u b i tậ p th ự c h n h từ n g bư c ch n g tr ì n h m ẫ\i, -w ww lib b n s ẽ n h a n h ch ó n g h ọ c cá ch tạ o ứ n g d tư ig V istial B a sic -2 1 c h ấ t lượng c h u y ê n n g h iệ p d n h ch o h ệ đ iề u h n h W ữ id o w s n h iề u t i ì n h d u y ệ t W eb C ác t í n h n ăn g m i n h ắ t c ủ a V isu a l B asic g iú p b n lậ p tr ù ứ i n h a iứ i h n ed u.v n v đ t h iệ u q u ả cao hơ n , n liấ t k lii b n tliic h s d ự n g t íc h h ợ p th ô iig t i n t sở d ữ liệ u , p h n g tiệ n g iả i ui t r í, tr a n g W cb v W cb sitc .lib H y v ọ n g s a u k h i h ọ c x o ĩ i g bư c v t h ủ t h u ậ t lậ p trìiứ i tro n g q u y ể n sác li n ày với V isu al B asic V is u a l S tu d io In te- -w ww g r a te d D e v e lo p m e n t E n \lro n n ie n t (ID E ), b n s ẽ Id iô n g nhữmg tạ o đưỢc ch n g tr ìn h ứ ng d iu ig c ă n b ả ii m có k h ả u.v n n ă n g s d ụ n g n liiề u công c ụ c ủ a p h ầ n m ề m n y đ ể v iế t ww w lib ui ed ch n g tr b ủ i ch o M icro soít V isu a l -2 1 , M icrosoít V is u a l c # -2 1 , M icrosoữ V isu a l W eb D ev elo p er 2010, v n h i ề u s ả n p h ẩ m k h ác T c g iả u.v n ed ui .lib ww w ed u.v n ui .lib -w ww lib -w ww ed ui n- u.v ww w lib ui ed n- u.v ww w lib ui ed u.v n u.v n ww w lib ui ed C h n g 11: S dụng m ảng đ ể quản lý liệu s ố chuỗi ed u.v n- PHẦN (II ww w lib ui Lộp trình nâng coo thiết kế giao diện người dùng n- Chương II : Sử dụ n g c c m ản g đ ể qu ản lý u.v d liệu s ố v chuỗi ui ed ChtMĩig 12: Làm việ c vớ i cá c tậ p hợp lib Chướng 13: K h ả o s ấ t c c File T ex t v x lý chuỗi -w ww Chương 14: Q uản lý c c ịo r tn Windou)s c c cơntroỉ v o th i g ia n ch ạy ww w lib ui ed u.v n -w ww lib ui ed u.v n Chương 15: Tbêm đ h ọa v cá c h iệu ứìig h o t h ìn h Chươĩtg 16: Thừa k ế c c fo r m v tạ o c la s s c s Chương 7: Làm việ c vớ i c c m y in u.v n C h d n g 11; Sử dụng m ảng đ ể quản lý liệu s ố v chuỗi Sử dụng mỏng để quỏn ụ liệu số chuỗi ui ed u.v n- ww ” w lib , ui ed u.v n- ww w lib ui ed TỔ chức thông tin m ảng có kicb cỡ cố định I>à m ảng dộng, -w ww * lib Sau k h i hoàn th n h chtM ng n y bạn s ẽ có thể: K G iữ gìn d ữ liệu m ảng bạn tái định chiềíi mảng Sứ dụng m ảng m ã đ ể quản lý lượng lởn clữ liệu ed u.v n * a S ứ dụng phĩccmg tbữc Hort Keverse class Array d ể sáp xế p lại thứ tự mảng -w ww lib ui ^ S dụng control ProgressBar cbĩcơng trình đ ể th ể ĩtĩọt tác ưít m ất thời gian bao lân u ản lý th ô n g tin tro n g m ột ứng dụng M icrosoíl Visual Basic u.v n m ột tá c vụ quan trọ n g k h i chương trìn h trở n ên đáng kể hơn, b ạn cần công cụ bổ sung để lưu trữ v xử lý liệu ed M ột phường p h áp n h a n h để quản lý liệu tro n g chương trìn h lưu ui trữ tru y tìm th n g tin tro n g íĩle tex t phụ n h b n th ấ y chương 13 Tuy n h iên , phưcmg pháp to àn diện n h ấ t lưu trữ truy tìm ww w lib thơng tin b ằn g việc sử dụng sở liệu b ạn b ắ t đầu học cách tích hợp chương trìn h với sd liệu tro n g chương 18- u.v n C h n g 11: s dụng m ảng để quản lý liệu s ố chuỗi w lib ui ed u.v n- ui ww w lib T rong chưcmg này, b ạn học cách tổ chức biến th ô n g tin khác th n h k h u n g chứa hữu dụng gọi m ảng (array) B ạn học cách hợp lý h ó a tác vụ quản lý liệu b ằn g m ảng có kích cỡ cố đ ịn h m ảng động cách sử dụng m ảng tro n g m ã để quản lý lượng lớn liệu B ạn học cách tá i định chiều m ảng gìn giữ liệu tro n g m ản g k h i b ạn định th a y đổi kích cỡ m ộ t m ảng Để m inh họa m ảng lớn có th ể xử lý thê' nào, b ạn sử dụng phương thức S o rt R everse tro n g class A rray M icrosoft NET F ram ew ork để sắ p xếp lạ i th ứ tự m ột m ảng chứa giá trị số nguyên chữ sô’ ngầu nhiên Sau cùng, b n học sử dụng control P rogressB ar người dùng biết m ột tiế n tr ìn h (liên quan đến m ảng dó) m ấ t th i gian N hững kỹ th u ậ t m b ạn học m ang lại m ột bước khởi đầu làm quen vững với n h ữ n g kỹ th u ậ t lập trìn h sở liệu m b ạn k h th c sau ed ww tro n g sách u.v n- Làm việc với mảng biến ed u.v n -w ww lib ui ed Trong p h ầ n n ày b ạn học m ảng (array), m ột phương p h áp hữu dụng để lưu trữ h ầu b ất kỳ lượng liệu tro n g trin h thực th i chương trìn h Các m ảng m ột cấu m ạn h th nghiệm qua thời gian để lưu trữ giá trị liên quan m ột cách logic tro n g m ột chương trìn h N hững người p h t triể n BASIC, Pascal, c , ngôn ngữ lập trìn h phổ biến k h c k ế t n h ập m ảng vào p h iên b ả n sớm n h ấ t sả n p h ẩm n y để th am chiếu đến m ột nhóm giá tr ị b ăn g việc sử dụng tê n để xử lý giá t n m ột cách riên g lẻ chung ww w lib ui ed u.v n -w ww lib ui Các m ản g có th ể giúp b ạn theo dõi m ột tậ p hợp nhỏ giá trị nhữ ng cách k h ông thực tiễ n sử dụng biến tru y ền thống Ví dụ, tưởng tượng tạo m ột b ản g điểm bóng chày chín lượt chơi tro n g m ộ t chương trìn h Đ ể lưu gọi lại số điểm cho ỉược chơi tr ậ n đấu, có th ể b ạn r ấ t m n tạo h nhóm gồm biến {tổng cộng 18 biến) tro n g chương trìn h Có lẽ b ạn đ ặ t cho chúng m ột tê n dó n h InninglH om eT eam , InninglV istingT eam để làm cho chúng rõ ràng L àm việc riên g lẻ với nhữ ng biến n ày đòi hỏi thời gian không gian đ án g kể tro n g chưcmg trìn h T h ậ t m ay th ay , với Visual Basic, b ạn có th ể tổ chức nhóm gồm biến tương tự th n h m ột m ảng có m ột tê n chung m ột index dễ sử dụng Ví dụ, b ạn có th ể tạo m ột m ảng hai chiều (cao h a i đơn vị rộng đơn vị) đ ậ t tê n Scoreboard để chứa số điểm cho tr ậ n đấu bóng chày H ãy xem diều n ày làm việc th ế u.v n ed 10 C h n g 11: sử dụng m àng để quản lý liệu s ố chuỗi ui Tạo m ột mảng n- Nếĩt bạn khai báo m ột m ảng cách cục m ột thủ tục, bạn có th ề sứ dụng thủ tục u.v * ww w lib B ạn tạo k h a i báo m ảng m â chương trìn h tương tự bạn k h báo biến dơn giản N hư thường lệ, vị trí m b ạn k h báo biến tro n g đ ịn h nơi có th ể sử dụng phạm vi (scope) nh sau: ui ed u Nếu bạn khai báo m ột m ảng p h ầ n trôn củng cùa m ột /orm bạn củ tb ể sứ dụng qua siiốt fo n n w lib ^ N ếu bạn khai báo m ột m ảng m ột cách pttbỉíc m ộtpỉiblỉc, bạn có th ể s ủ dụng ncH proịecỉ n- ww K hi b n k h báo m ột biến, b ạn thường bao hàm th n g tin trìn h bày tro n g b ản g 11.1 tro n g câu lệnh k h báo u.v Bảng 11.1 Các phẩn tử cú pháp cho phẩn khai báo m ảng Mô tà ui ed Các p h ầ n tử cú pháp tron g k h báo m àng Tên mà bạn sử dụng để đại diện cho mảng chương trình Nói chung, tên mảng tuân theo quy tắc y tên biến, (Xem chương 5, để biết thêm thông tin biến) -w ww lib Tên mảng ui ed u.v n -w ww Số chiều lib ui ed u.v n Kiểu liệu ww w lib SỐ phần tử Kiểu liệu mà bạn lưu trữ mảng Trong hầu hết trường hợp tấ t biến inộL mảug kiểu Bạn có th ể xác định kiểu liệu hoặr bạn chưa chắn kiểu liệu dược lưu trữ m ảng bạn sử đụng nhiều kiểu hay không, bạn xác định kiểu Object Số chiều mà mảng chứa Hầu h ế t mảng chiều (raột danh sách giá trị) hai chiều (một bảng giá trị), bạn xác định chiều bổ sung bạn làm việc với mơ hình tốn học phức lạp chẳng hạn hình dạng ba chiều Số chiều mảng gọi hạng (rank) mảng Sô' phần tử mà mảng chứa Các phần tử mảng tương ứng trực tiếp với iniex mảng Index mảng (zero)- u.v n 11 ed C h n g 1 : S d ụ n g c c m ả n g đ ể q u ản !ý d ữ liệ u s ố v c h u ỗ i ui • • • • • • • Thủ thuật ww w lib Các mảng chứa số phần tử xác lập gọi mảng có kích cỡ cố đ ịn h (flx e d size array) Các m ảng chứa m ọt số phần tử khả biến (các mảng có th ể m rộ n g tro n g trìn h thực th i chương trìn h ) gọi m ảng động (d y n a tĩiic array) u.v n- Khai báo m ột mảng có kích cỡ cố định ed Cú p h áp b ản cho m ột m ảng có kích cỡ cơ' định public ui Dim ArrayNam e(Dim 1lndex, Dim2lndex, ) As DataType w lib Các đối sô’ sau quan trọng: a D im từ khóa khai báo mảng, sứ dụng Public thay ỉ’ì bạn đặi ww m ả n g m ột modnỉe n- m A rrayN am e tên biển mảng u.v » D im lỉn d e x giởi hạn trẽn chiều thứ n h ấ t mảng, đ â y số ed p h ầ n tứ trt'c cho ui a D im ỉn d ex giới hạn chiền thứ hai mảng, đ â y số p h ầ n tứ tnc cho (Các chiều bổ sung có th ề đìCa vào chúng lib tách biệt bàng ảấn phẩy) -w ww M D ataType m ột tì( khóa ticơng ứng t>ới kiểu d ũ liệu m đìCa vào m ảng ed u.v n Ví dụ để k h a i báo m ột m ảng chuỗi m ột chiều có tê n Em ployees có chồ d àn h cho 10 tê n n h ân viên (dược đ án h số từ đ ến 9), b ạn có th ể gõ nhập dịng m ả sau tro n g m ột thủ tục kiện; ui Dim Employees{9) As string lib T rong m ộ t module, p h ần khai báo m ảng trô n g sau: -w ww Public Employees(9) As string u.v n B ạn có th ể xác định m ột cách tường m inh giới h n m ảng zero b ằn g việc sử dụng m ã tro n g m ột th ủ tục kiện: ed Dim Employees(0 To 9) As string ww w lib ui Cú p h áp "0 to 9" n ày đưa vào để làm cho m ã dễ đọc - nểười đ ến chương trìn h b ạn hiểu rằ n g m ảng Employees có 10 p h ầ n tử đ án h số từ đến Tuy nhiên, giới h n m ảng ed C h n g 11: S dụng m ảng đ ể quản lý dư liệu s ố chuỗi u.v n 12 ww w lib ui p h ải zero B ạn không th ể sử dụng cú pháp n ày để tạo m ộ t giới hạn khác cho mảngOành riêng nhớ ed u.v n- K hi b ạn tạo m ột m ảng, Visual Basic dành riên g chỗ trố n g cho tro n g nhớ Ả nh chụp m àn h ìn h sau m inh họa k h i niệm m ả n g Employees 10 p h ần tử tổ chức n h th ế Các p h ần tử đ án h sô' từ đến th a y từ đến 10 bdi index m ảng b ắ t đầu với ed u.v n -w ww lib ui ed u.v n- ww w lib ui E m p lo y e e s ui Đ ể k h báo m ột m ảng chiều public có tên Scoreboard có chỗ trống đ àn h cho hai h àn g chín cột Uệu số nguyên S h o rt, b ạn có th ể gõ n h ập câu lện h sau tro n g m ột th ủ tục kiện p h ần trê n form: lib Dim Scoreboard(1, 8) As Short -w ww Sử dụng cú pháp n h ấ n m n h giới h ạn (zero), b ạn có th ể khai báo m ảng n h sau: u.v n Dim Scoreboard(0 To 1, To 8) As Short ww w lib ui ed Sau b ạn k h báo m ột m ản g hai chiều Visual B asic d ành riê n g chỗ trố n g cho tro n g nhớ, bạn có th ể sử dụng m ả n g chưcmg trìn h n h th ể m ộ t b ản g giá tr ị n h m in h h ọ a ả n h chụp m àn h ìn h (Trong trường hợp n ày p h ầ n tử m ảng đánh sô' từ đến từ dến 8) ... t r ìn h VTSIIA L B A u.v S IC -2 1 " gồ m tậ p , h ng d ẩ n to n đ iệ n lậ p trìn li ed V is u a l B a sic s d ụ n g p h ầ n m ề m V isu a l B a sic 20 10 -20 11 .ha ui V ới c c h b ố cụ c c... tin cậy s d ụ n g V is u a l B asic 2 1 lchông p h ả i s ả n p h ẩ m độc lậ p m m ộ t th iứ i p h ầ n ui c h in h c a M ỉcro so V isu a l S tu d io 20 1 -2 1 - m ộ t h ệ th ố n g p h p t r i... w lib ui ed ch n g tr b ủ i ch o M icro soít V isu a l -2 1 , M icrosoít V is u a l c # -2 1 , M icrosoữ V isu a l W eb D ev elo p er 20 10, v n h i ề u s ả n p h ẩ m k h ác T c g iả u.v n ed