GVHD: D ng Khai Phong L p trìnhVisualBasic6.0 - Bài Th c Hành s Bài Th c Hành s L P TRÌNHVISUALBASIC TH T C VÀ HÀM (SUB END SUB, FUNCTION END FUNCTION ) Trong h c này, sinh viên xây d ng ch ng trình đ tìm hi u v vi c s d ng th t c hàm c b n VisualBasic Yêu c u: sinh viên đ I BÀI T P CÓ H c trang b ki n th c xây d ng th t c hàm NG D N Bài 01 Thi t k ch ng trình máy tính c b n TEXTBOX Nhóm BUTTON s t BUTTON dùng đ reset (kh i t o l i) BUTTON dùng đ tính ngh ch đ o ` BUTTON dùng đ xem k t qu Nhóm BUTTON phép tốn: +,-,*,/ BUTTON d u âm H ng d n: B c 1: sinh viên ph i thi t k đ B c form nh hình c 2: Thi t l p thu c tính Properties cho form control form theo b ng sau Control TEXTBOX Nhóm button s t Button C BUTTON d u th p phân Thu c tính Name Caption Alignment Name Caption Name Caption http://khaiphong.tk - Email: phongdk@uit.edu.vn Giá tr txtNoidung 1- Right Justify b0, b1, , b9 0,1, …, bXoa C Page GVHD: D ng Khai Phong Button 1/x Button = Button +/Button “.” Nhóm button phép tốn +,-,*,/ B L p trìnhVisualBasic6.0 - Bài Th c Hành s Name Caption Name Text Name Text Name Text Name Text bNghichdao 1/x bBang = bAmduong +/bChamdong bCong,bTru,bNhan,bChia +,-,*,/ c 3: Vi t code x lý máy tính Do ph n l p trình x lý có nhi u đo n code nên sinh viên c n chia thành kh i l nh nh sau: Ph n khai báo bi n toàn c c: (vào menu View / Code), t i c a s vi t code ch n (General) Khai báo bi n tồn c c nh hình d i Ý ngh a bi n: Bi n sothunhat, sothuhai: dùng đ l u l n l t giá tr textbox txtNoidung cho s c n tính tốn Bi n bMemoryTime: dùng đ ki m tra xem l n l u l n th m y (n u bMemoryTime = s l u giá tr textbox txtNoidung cho bi n sothunhat ng c l i n u bMemoryTime = s l u giá tr textbox txtNoidung cho bi n sothuhai) Bi n fClear dùng đ xóa n i dung c a textbox txtNoidung sau nh p xong giá tr ho c nh n button CE Bi n pheptoan dùng đ l u giá tr ký hi u phép toán ch n: +,-,*,/ Bi n fDaucham dùng đ ki m tra button d u th p phân “.” đ c nh n hay ch a Xây d ng module ch a th t c hàm nh sau: Right Click vào project nh hình d Add Module http://khaiphong.tk - Email: phongdk@uit.edu.vn i ch n Page GVHD: D ng Khai Phong L p trìnhVisualBasic6.0 - Bài Th c Hành s 4 t tên cho module: mylibrary Double Click vào module mylibrary nh p đo n code sau: Xây d ng module ch a th t c hàm nh sau: Right Click vào project nh hình d Add Module i ch n Th t c xulyso dùng đ x lý n i ký s l i v i sau button s đ c nh n Hàm tinhtoan dùng đ tính k t qu t tốn +,-,*,/ đ c nh n L nl ng ng v i phép t Double Click vào Button nh p l nh cho button nh sau: http://khaiphong.tk - Email: phongdk@uit.edu.vn Page GVHD: D ng Khai Phong L p trìnhVisualBasic6.0 - Bài Th c Hành s Kh i t o giá tr cho bi n form đ c kích ho t Gán l i giá tr cho bi n click button CE G i th t c xulyso đ n i ký s l i v i T ng t cho button s l i Nh p l nh x lý cho button bChamdong, bAmduong bNghichdao http://khaiphong.tk - Email: phongdk@uit.edu.vn Page GVHD: D ng Khai Phong L p trìnhVisualBasic6.0 - Bài Th c Hành s T ng t , nh p l nh x lý cho button bCong, bTru, bNhan, bChia (ch vi c đ i d u c a phép toán t ng ng) bBang G i hàm tinhtoan đ th c hi n tính tốn tùy theo pheptoan đ c click ch n B c 4: Th c thi ch tính ng trình ki m tra k t qu , hoàn thi n ch c n ng thi u c a máy http://khaiphong.tk - Email: phongdk@uit.edu.vn Page GVHD: D ng Khai Phong Bài 02 Thi t k ch L p trìnhVisualBasic6.0 - Bài Th c Hành s ng trình máy tính c b n bBackspace: xóa lùi ký s v a nh p bCE: (clear entry) xóa s v a nh p bEmpty: nút thơng báo b nh l u bClear: xóa làm l i t đ u bMC: memory clear bSqrt: rút c n bMR: memory read bPercent: tính ph n tr m bMS: memory save bMS: memory add H II ng d n: Sinh viên s d ng l i k t qu thêm nhóm button nh hình BÀI T P M R NG Sinh viên hoàn t t ch c n ng máy tính l i t p http://khaiphong.tk - Email: phongdk@uit.edu.vn Page