Hệ thống bài tập visual basic pptx

TH NG BÀI T P VISUAL BASIC

Email : dontruongbt@yahoo.comMobile : 0989995221

PH N I : Bài T p C S Làm Vi c Trên u Khi n

Bài 1 : T ng Quan V Visual Basic

• TextBox cho phép nh p thông tin tr c ti p ho c qua l nh

• Khi click nút InputBox : s d ng l nh InputBox nh p thông tin Sau ó hi n ththông tin vào TextBox

• Khi Click nút MsgBox : s xu t thông tin trênTextBox ra thông báo b ng MsgBox

• Khi Click nút l nh Exit : s thoát kh i ch ng trình

BT3, S d ng hàm MsgBox hi n th ti n trình kh i ng và k t thúc Form

{s ki n : Initialize, Load, QueryUnload, Unload, Terminate}

Yêu c u h c viên cho bi t th t ti n trình th c hi n c a ch ng trình

Bài 2 : Làm Vi c Trên Các u Khi n C S

BT1, Ch ng trình Hello

• Thi t k Form

• Khi b n nh p tên vào ô text bên d i và kích nút Hello thì k t qu là 1 l i chào

hi n th lên Label trên

• Nút Clea dùng xoá tr ng n i dung c a textbox và label

BT2, Di chuy n Form (Top,Left)

• Thi t k giao di n ch ng trình

• Khi click trên các nút l nh thì Form s di chuy n t i các v trí nh trên

• Label s hi n th k t qu v trí hi n v a c di chuy n t i

BT3, S ki n n Enter trên TextBox

• Cho phép nh p thông tin b t k vào ô Text1 Không cho phép c p nh t b t kthông tin nào trên Text2

• Sau khi n Enter Text1 thì n i dung trên ó s c hi n th xu ng bên d iText2

BT4, C n ch nh và thi t l p ki u font, màu s c trên Textbox

• Ph n c n ch nh : làm vi c trên OptionBox

o Cho phép b n ch n 1 trong 3 lo i c n ch nh : trái - gi a - ph i

o VD : Text1.Alignment = 0’

• Ph n x lý cho phép b n thi t l p ki u ch cho Text : làm vi c trên CheckBox

o Các ki u ch : m – Nghiêng - G ch Chân - G ch Ngang

o Text1.FontBold = Check1.Value

• Ph n Màu S c : Làm vi c trên OptionBox

o Cho phép thay i màu n n (BackColor) và màu ch (ForeColor)

o S d ng 2 lo i màu s c là tr ng (vbWhite) và en (vbBlack)

BT5, Làm vi c trên OptionBox và N i Chu i

• B n s thay i n i dung trên ô Text tu thu c vào s l a ch n bên d i cácOptionBox

• Khi n OptionBox thì thông tin s l u vào bi n strLoaiMay và strHDH.Sau ó s

ng hi n th lên Textbox

• Text1.Text = "B n ang ch n s d ng " & strLoaiMay & " ch y trên n n " &strHDH

BT6, Công c Timer

o Thi t k ch ng trình g m 1 Timer và 3 Label

o Label th nh t cho hi n th liên t c gi hi n t i c a h th ng

o Label th hai hi n th ngày tháng c a h th ng b ng ti ng anh

o Label th ba hi n th ngày tháng c a h th ng b ng ti ng vi t

BT7, Làm vi c trên ListBox

Yêu c u :

• Thi t k giao di n nh trên

• Cho phép nh p d li u vào 1 ô text, d li u có th c a vào ListBox khi nnút [Thêm Vào ListBox]

• Khi n nút [Xoá Kh i ListBox] thì ph n t ang c ch n s b xoá b kh i listbox(chú ý n u ch a ch n ho c listbox tr ng thì không th c hi n ch c n ng này)

• Ph n thông tin c a ListBox s cho bi t các thông tin nh sau :

o ListCount : t ng s ph n t ang có trong listbox(ListCount)

o ListIndex : v trí c a ph n t ang c l a ch n trên list box (ListIndex )

o Text : n i dung c a ph n t ang ch n tên listbox (Text)

• Ch ng trình s k t thúc khi b n n nút K t Thúc

BT8, Bài Toán Tính T ng

Yêu c u :

• B n s thi t k 3 m u form nh th c hi n vi c vi c tính toán trên 2 s

• Vi c l a ch n phép toán s tu thu c b n l a ch n u khi n t ng ng

BT9, Bài t p v HscrollBar và VscrollBar

• Thi t k giao di n

• Yêu c u :

o Thi t l p các HscrollBar có min =0 và max =255

o Khi thay i giá tr các Hscroll thì pha màu l i cho n n Form

• Me.BackColor = RGB(HScroll1.Value, HScroll2.Value,HScroll3.Value)

o Các giá tr màu t ng ng c hi n th bên c nh

Bài 3 : C u Trúc u Khi n – Hàm – Th T c

BT1, Gi i ph ng trình b c 2

• Yêu c u

o Ch cho phép thay i giá tr h s a,b,c

o Khi click Gi i ph ng trình, yêu c u a ra thông báo nghi m Label k t qu :

§ N u vô nghi m, n 2 ô text ch a nghi m i

§ N u nghi m kép, ch hi n th 1 ô text ch a nghi m ó

§ N u 2 nghi m, cho hi n th y trên 2 ô text

BT2, Tìm Max – Min trong 6 s nguyên c nh p

Yêu C u

• Cho phép nh p 6 s b t k vào 6 ô text Chú ý n u nh p sai(không là ki u s ) thì

ph i b t ng i dùng nh p l i (S d ng s ki n Validate)

• Khi click nút Tìm s l n nh t thì ki m tra xem s nào trong 6 s ó l n nh t thì

hi n th ra ô text k t qu

• Ti n hành t ng t tìm s nh nh t trong 6 s

BT3, L ch Can – Chi

• Yêu c u

o Sau khi click nút m Âm L ch thì nút này s b m Nút này ch sáng lên

khi có s thay i trên ô text nh p n m d ng l ch

o Ô Text k t qu luôn m , không cho ch nh s a.(Có th s d ng Label thay

th )

• H ng d n

o N m âm l ch c ghép l i t 10 Can và 12 Chi.(v i chu k 60 n m)

o Can có c khi ta l y n m d ng l ch chia cho 10 và l y ph n d

o Chi có c khi ta l y n m d ng l ch chia cho 12 và c ng l y ph n d

o Nh ng ph n d ó là ch s t ng ng trong b ng Can-Chi sau :

CAN Canh Tân Nhâm Quý Giáp t Bính inh u

CHI Tí u n Mão Thìn Ng Mùi Thân u Tu t i

N mod 12 4 5 6 7 8 9 10 11 0 1 2 3

BT4, Ki m tra s nh p có là nguyên t ho c hoàn thi n không?

Yêu c u :

• Cho phép b n nh p 1 s nguyên b t k (ch cho phép nh p s vào ô Text)

• Cho phép b n l a ch n 2 ch c n ng ki m tra s ó là nguyên t hay hoànthi n Khi mu n ch y ch c n ng nào thì b n kích vào u khi n ch c n ng ó

BT5, Ki m tra tam giác

o N u úng là tam giác thì b n ti n hành ki m tra xem ó là lo i tam giác gì

u – cân – vuông cân – vuông – th ng) ng th i vi c thông báo lo itam giác thì b n tính chu vi và di n tích c a tam giác ó và hi n ra text k t

qu t ng ng

BT6 , Bài toán tính ti n n

Yêu c u :

• Ch cho phép nh p d li u ki u s trên 2 ô ch s n

• Khi n Tính ti n thì ta ph i ki m tra và m b o xem ch s m i >= ch s c thì

i th c hi n tính ti n,n u không tho mãn thì hi n thông báo lên cho ng i dùng

Yêu c u :

• Cho phép b n nh p các thông tin c b n nh sau : s ti n ban u b n g i, lãi

su t ngân hàng theo chu k tháng, chu k tính lãi

• Cho phép b n nh p 1 chu i ký t b t k vào ô text chu i

• Sau ó ti n hành in ra chu i o ng c c a nó xu ng ô text k t qu Vi c th c

hi n in ng c có th ti n hành theo 2 cách là s d ng vòng For in o ng c

ng ký t trong chu i n i dung nh p ho c dùng hàm StrReverse (Text2.Text =StrReverse(Text1.Text)) t ng o chu i

BT2, L c ký t trùng l p trong chu i

Yêu c u :

• Cho phép b n nh p 1 chu i ký t có n i dung b t k vào ô text n i dung

• Khi n nút th c hi n thì b n ti n hành duy t chu i và l c b nh ng ký t trùng l p

i dung k t qu s là 1 chu i m i không có ký t trùng l p n a

BT3, Ki m tra nguyên âm - ph âm trong chu i ký t

• Sau khi b n n nút Li t kê thì ch ng trình ti n hành ki m tra chu i v a nh p K t

qu tr l i s là :

o Các Nguyên âm trong chu i (không trùng l p) và t ng s l ng c a nó

o Các ph âm (không trùng l p) và t ng s l ng có trong chu i nh p

• K t thúc ch ng trình b ng cách n nút Thoát

BT4, Chu n hoá chu i ký t

Yêu c u :

• Cho phép b n nh p 1 chu i ký t b t k và có l i (th a d u cách, ký t u không

vi t hoa) vào ô text

• Vi c chu n hoá n i dung thì tu thu c ch c n ng c l a ch n OptionBox Có

2 ch c n ng chu n hoá là chu n hoá cách (xoá các d u cách th a) ho c chu nhoá xâu (xoá toàn b d u cách th a và bi n ch cái u thành ch hoa)

• K t qu thu c s hi n th ra ô text k t qu bên d i

CSDL 1 : Qu n Lý Sinh Viên (qlsinhvien.mdb)

Thi t k các b ng (table) sau :

ng Khoa

Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description)

TenKhoa Text (50) Tên khoa

ng Sinh Viên

Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description)

Ngaysinh Date/Time Ngày sinh

Dienthoai Text (50) n tho i

ng Môn H c

Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description)

Sotinchi Number (Integer) S tín ch (S ti t)

ng K t Qu

Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description)

Diem Number (Single) m thi môn c a SV

Liên k t các b ng (Relation Ship)

Dienthoai Text (50) n tho i

ng Hoá n

ng Hàng Hoá

Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description)

Tenhh Text (50) Tên hàng hoá

ng Chi Ti t Hoá n

Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description)

Soluong Number (Integer) S l ng

Dongia Number (Double) n giá

Liên k t các b ng (Relation Ship) :

Bài 2 : H Th ng Bài T p

I, H th ng bài v i CSDL qlsinhvien.mdb

BT 1 : Thi t k 1 Form có giao di n nh sau :

Form trên có ch c n ng dùng c p nh t danh m c Khoa

Các ch c n ng trên form :

• B nút di chuy n cho phép di chuy n qua l i các b n ghi

• Nút Thêm : dùng cho phép thêm m i 1 b n ghi m i

• Nút S a : dùng ghi d li u theo s thay i c a ng i dùng

• Nút Xoá : xoá b b n ghi hi n hành

BT 2 : Thi t k 1 Form có giao di n nh sau :

Form trên có ch c n ng dùng c p nh t danh m c Môn h c

Các ch c n ng trên form :

• B nút di chuy n cho phép di chuy n qua l i các b n ghi

• Nút Thêm : dùng cho phép thêm m i 1 b n ghi m i

• Nút S a : dùng ghi d li u theo s thay i c a ng i dùng

• Nút Xoá : xoá b b n ghi hi n hành

• Ô TextBox s tín ch : ch cho phép nh p giá tr là ki u s

BT 3 : Thi t k 1 Form có giao di n nh sau :

Form trên có ch c n ng dùng c p nh t h s sinh viên

Các ch c n ng chính c a Form :

• B nút di chuy n cho phép di chuy n qua l i gi a các b n ghi Khi di chuy n thì

ph i ch rõ th t b n ghi hi n hành trên t ng s b n ghi

• B nút c p nh t (Thêm, S a, Xoá) th c hi n các ch c n ng t ng ng

• S d ng DataCombo li t kê tên khoa mà sinh viên theo h c

• S d ng Option hi n th tr ng Phái (Gi i Tính)

• N u nh p ngày sinh thì ph i ki m tra d li u nh p vào có ph i là ki u ngày thánghay không (S d ng s ki n Validate)

Bài 4 : Thi t k 1 Form có giao di n nh sau :

Form trên có ch c n ng dùng qu n lý sinh viên theo khoa

Các ch c n ng chính c a Form :

• Các ô TextBox hi n th danh m c các khoa có trong CSDL

• B nút di chuy n dùng di chuy n các b n ghi danh m c khoa

• Khi các b n ghi danh m c khoa di chuy n thì tìm ki m danh sách các sinh viên

a khoa ó và hi n th lên DataGrid bên d i

Bài 5 : Thi t k 1 Form có giao di n nh sau :

Form trên có ch c n ng dùng qu n lý m thi c a sinh viên

Các ch c n ng chính c a form là :

• Các ô Textbox li t kê 1 thông tin ch y u c a sinh viên là mã sinh viên hà h tênsinh viên

• B nút di chuy n cho phép di chuy n qua l i gi a các b n ghi Khi di chuy n thì

ph i cho bi t v trí b n ghi hi n hành trên t ng s b n ghi

• trong DataGrid li t kê k t qu h c t p c a sinh viên ang xem Thông tin li t kê

m : mã sinh viên, Tên môn mà SV ã thi, m thi, k t qu c a t ng môn

• M c k t qu hi n th là “ ” khi m thi >=5, ng c l i hi n th là “Tr t”

II, H th ng bài v i CSDL HangHoa.mdb

Bài 1 : Thi t k 1 Form có giao di n nh sau :

Form trên có ch c n ng dùng c p nh t danh m c Khách hàng

Các ch c n ng chính c a ch ng trình :

• B nút di chuy n cho phép di chuy n qua l i gi a các b n ghi Khi di chuy n thì

ph i cho bi t v trí b n ghi hi n hành trên t ng s b n ghi

• B nút c p nh t (Thêm, S a, Xoá) th c hi n các ch c n ng t ng ng

Bài 2 : Thi t k 1 Form có giao di n nh sau :

Form trên có ch c n ng dùng c p nh t danh m c Hàng hoá

Các ch c n ng chính c a Form là :

• DataCombo li t kê toàn b các hoá n có trong CSDL

• Khi ta ch n b t k s hoá n nào, d i DataGird s li t kê chi ti t các m thàng có trong hoá n ó

• Cho bi t t ng s m t hàng c bán trong hoá n ã ch n ó

Bài 4 :

Thi t k 1 Form có giao di n nh sau :

Form trên có ch c n ng dùng qu n lý hoá n theo khách hàng

Các ch c n ng chính c a Form là ;

• Các ô TextBox li t kê danh sách khách hàng trong CSDL

• B nút di chuy n cho phép di chuy n qua l i gi a các b n ghi Khi di chuy n thì

ph i cho bi t v trí b n ghi hi n hành trên t ng s b n ghi

• V i m i khách hàng, ta li t kê các hoá n mà khách hàng ó ã giao d ch Thôngtin bao g m : S hoá n giao d ch, Ngày l p hoá n và t ng giá tr c a hoá nó

• T ng giá tr hoá n tính theo công th c

o TongThanhTien = SUM(Soluong*Dongia)