intTypePromotion=1
zunia.vn Tuyển sinh 2024 dành cho Gen-Z zunia.vn zunia.vn
ADSENSE
 » 
 » 

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

Chia sẻ: Châu Văn Hồ | Ngày: | Loại File: PDF | Số trang:23

Thêm vào BST
Báo xấu
402
lượt xem 93
download
 
  Download Vui lòng tải xuống để xem tài liệu đầy đủ

Tài liệu tham khảo về hệ thống bài tập visual basic...

Chủ đề:

Bình luận(0) Đăng nhập để gửi bình luận!

Lưu

Nội dung Text: Hệ thống bài tập visual basic

  1. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng TH NG BÀI T P VISUAL BASIC Email : dontruongbt@yahoo.com Mobile : 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 BT1, Xây d ng ng d ng • a Form vào ng d ng • Thi t l p Form kh i ng • G i Form2 hi n th t u khi n trên Form1 • Cách thoát kh i ng d ng BT2, S d ng hàm MsgBox và InputBox • Thi t k ch ng trình • 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 th thô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. Ngu n : http://dontruongbt.spaces.live.com/ -1-
  2. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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. Ngu n : http://dontruongbt.spaces.live.com/ -2-
  3. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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 k thô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 i Text2 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 Ngu n : http://dontruongbt.spaces.live.com/ -3-
  4. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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ác OptionBox • 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 • Yêu c u : Ngu n : http://dontruongbt.spaces.live.com/ -4-
  5. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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 o 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 n nú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 Ngu n : http://dontruongbt.spaces.live.com/ -5-
  6. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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 Ngu n : http://dontruongbt.spaces.live.com/ -6-
  7. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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). Ngu n : http://dontruongbt.spaces.live.com/ -7-
  8. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng • 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 0 1 2 3 4 5 6 7 8 9 N mod 10 CHI Tí u n Mão Thìn Ng Mùi Thân u Tu t i 4 5 6 7 8 9 10 11 0 1 2 3 N mod 12 Ngu n : http://dontruongbt.spaces.live.com/ -8-
  9. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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àn thi 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 Yêu c u : • Bn c phép nh p 3 c nh c a tam giác vào 3 ô Text (chú ý ch cho phép nh p vào ô text) • Khi n th c hi n thì ti n hành ki m tra xem 3 c nh b n nh p có l p thành tam giác hay không. o N u không l p thành tam giác thì thông báo ra ô text k t qu Ngu n : http://dontruongbt.spaces.live.com/ -9-
  10. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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 i tam 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 bi t nh p l i • Ti n n c tính d a trên t ng s n ã s d ng o 100 s u tính giá 500 /s o T 101-150 m i s có giá là 800 /s o T 151-200 giá m i s n là 1000 /s o T 210 tr i thì s là 1200 /s BT7, Tính lãi su t và s tháng v i giao d ch g i ti n Ngu n : http://dontruongbt.spaces.live.com/ - 10 -
  11. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr 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. • Giao d ch 1 o Cho phép b n nh p s tháng mà b n s d ki n g i o Sau ó th c hi n tính toán cho b n bi t c s ti n lãi và t ng s ti n s nh n c n u b n g i úng theo s tháng ó • Giao d ch 2 o Cho phép b n nh p s ti n mình mu n nh n c t s ti n g c o Ch ng trình s ti n hành tính toán và cho b n bi t là s tháng t i thi u n ph i g i nh n c s ti n ó. Bài 4 : X Lý Chu i và M ng S Nguyên BT1, In o ng c chu i ký t Yêu c u : • 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 i n 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 Ngu n : http://dontruongbt.spaces.live.com/ - 11 -
  12. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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 Yêu c u : • Cho phép b n nh p 1 chu i ký t b t k vào ô nh p Ngu n : http://dontruongbt.spaces.live.com/ - 12 -
  13. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng • 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 n hoá 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 Ngu n : http://dontruongbt.spaces.live.com/ - 13 -
  14. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng BT5, Bài t p t ng h p v m ng s nguyên Yêu c u : • Nh p s l ng ph n t m ng mu n có, Sau ó n nút sinh s thì ch ng trình s ng sinh ra 1 m ng s nguyên ng u nhiên và hi n ra ô text bên d i • Ch c n ng ki m tra s trong m ng : o Tìm và in ra trong m ng các ph n t là s nguyên t (ch có 2 c) o Tìm và in ra các ph n t là s hoàn thi n (t ng c b ng chính nó) • Ch c n ng ki m tra s theo u ki n : o Bn a s t [1-9] vào 2 ô ComboBox o Cho phép b n ch n ch c n ng chia h t cho [combo1] và t n cùng là [combo2].. o Khi n tìm ki m thì ch ng trình ti n hành duy t m ng và in ra các ph n t tho mãn u ki n mà b n ch n • Ch c n ng tính toán trên m ng : o Tính t ng trên m ng : t ng các ph n t ch n, l và t ng toàn b các ph n Ngu n : http://dontruongbt.spaces.live.com/ - 14 -
  15. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng o Ph n t có giá tr l n nh t, nh nh t trong m ng. • Ch c n ng s p x p : o S p x p các ph n t t ng d n, gi m d n o S p x p các ph n t ch n lên trên, l thì xu ng d i o S p x p các ph n t l lên trên, ch n thì xu ng d i PH N II : L p Trình C S D Li u Bài 1 : C S D Li u Access – Truy V n SQL 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) Makhoa Text (5) Mã khoa TenKhoa Text (50) Tên khoa ng Sinh Viên Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description) MaSV Text (5) Mã sinh viên HoTen Text (50) và tên Makhoa Text (5) Mã khoa Ngaysinh Date/Time Ngày sinh Phai Yes/No Phái (Nam/N ) Dienthoai Text (50) n tho i Diachi Text (50) a ch ng Môn H c Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description) Mamon Text (5) Mã môn h c Tenmon Text (5) Tên môn Sotinchi Number (Integer) S tín ch (S ti t) Ngu n : http://dontruongbt.spaces.live.com/ - 15 -
  16. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng ng K t Qu Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description) MaSV Text (5) Mã sinh viên Mamon Text (5) Mã môn h c Diem Number (Single) m thi môn c a SV Liên k t các b ng (Relation Ship) CSDL 2 : Qu n Lý Bán Hàng Hoá (hanghoa.mdb) Thi t k các b ng (table) sau : ng Khách Hàng Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description) Makh Text (5) Mã khách hàng Tenkh Text (50) tên khách hàng Diachi Text (50) a ch Dienthoai Text (50) n tho i Fax Text (50) Fax ng Hoá n Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description) Sohd Text (5) hoá n Makh Text (5) Mã khách hàng Ngayhd Date/Time Ngày l p hoá n Ngu n : http://dontruongbt.spaces.live.com/ - 16 -
  17. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng ng Hàng Hoá Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description) Mahh Text (5) Mã hàng hoá Tenhh Text (50) Tên hàng hoá Donvi Text (10) n v tính ng Chi Ti t Hoá n Tên Tr ng (Field) Ki u D Li u (Type) Mô T (Description) Sohd Text (5) hoá n Mahh Text (5) Mã hàng hoá Soluong Number (Integer) Sl 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 : Ngu n : http://dontruongbt.spaces.live.com/ - 17 -
  18. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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 Ngu n : http://dontruongbt.spaces.live.com/ - 18 -
  19. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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áng hay không. (S d ng s ki n Validate) Ngu n : http://dontruongbt.spaces.live.com/ - 19 -
  20. th ng bài t p Visual Basic Biên so n : GV Bùi Ti n Tr ng 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. Ngu n : http://dontruongbt.spaces.live.com/ - 20 -
ADSENSE

CÓ THỂ BẠN MUỐN DOWNLOAD

THÔNG TIN
TRỢ GIÚP
HỖ TRỢ KHÁCH HÀNG
Theo dõi chúng tôi

Chịu trách nhiệm nội dung:

Nguyễn Công Hà - Giám đốc Công ty TNHH TÀI LIỆU TRỰC TUYẾN VI NA

LIÊN HỆ

Địa chỉ: P402, 54A Nơ Trang Long, Phường 14, Q.Bình Thạnh, TP.HCM

Hotline: 093 303 0098

Email: support@tailieu.vn

Giấy phép Mạng Xã Hội số: 670/GP-BTTTT cấp ngày 30/11/2015 Copyright © 2022-2032 TaiLieu.VN. All rights reserved.

 

Đồng bộ tài khoản
2=>2