bài tập MicroSoft Visual Basic .NET 2005

Chia sẻ: Trần Ngọc Mai | Ngày: | Loại File: PDF | Số trang:6

Thêm vào BST

Báo xấu

150
lượt xem 29
download

Download Vui lòng tải xuống để xem tài liệu đầy đủ

Tham khảo tài liệu 'bài tập microsoft visual basic .net 2005', công nghệ thông tin, tin học văn phòng phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả

Chủ đề:

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

Lưu

Nội dung Text: bài tập MicroSoft Visual Basic .NET 2005

Bài t p MicroSoft Visual Basic .NET 2005 BÀI T P L P TRÌNH VISUAL BASIC.NET 2005 Bài t p 01: T o 1 project ñ t tên Maytinh th c hi n ch c năng c a 1 máy tính ti n hàng v i phép nhân s lư ng và ñơn giá. Yêu c u ch c năng: Nút Tính : Tính tích ô s lư ng và ñơn giá. Gán k t qu vào ô thành ti n Nút Ti p : Xoá d li u ñã có trong các ô TextBox. ð t con tr ô s lư ng Nút thoát : ðóng màn hình và gi i phóng b nh Hư ng d n: Project Name : MayTinh Form Name: frmMayTinh Caption: May Tinh StartUpPosition : CenterScreen AcceptButton: cmdTinh CancelButton: cmdThoat TextBox Name: txtSoLuong Tab Index: 1 Name: txtDonGia Tab index: 2 Name: txtThanhTien Command Name : cmdTinh Tab Index: 3 Name : cmdTiep Tab Index: 4 Name : cmdThoat Tab Index: 5 ð nh d ng toàn b Form theo m u trên, màu s c tùy ý, Bài t p 02: T o project ñ t tên ChuviDientichHCN , th c hi n tính chu vi và di n tích hình ch nh t. Yêu c u: Cho nh p chi u dài và chi u r ng c a 1 hình ch nh t. Tính và xu t ra chu vi và di n tích c a hình ch nh t. Không cho ngư i dùng ch nh s a giá tr c a “Chu vi” và “Di n tích”, Canh ph i các textbox ch a s . This is trial version Dương Thành Ph t Trang 1 www.adultpdf.com
Bài t p MicroSoft Visual Basic .NET 2005 Bài t p 03: T o project ñ t tên GiaiPTBac1, th c hi n gi i và biên lu n phương trình b c 1. Yêu c u ch c năng: Nút Gi i: Th c hi n gi i và bi n lu n phương trình b c 1, ô k t qu (txtketqua) cho bi t phương trình có nghi m, vô nghi m hay vô s nghi m. Trong trư ng h p có nghi m thì ô txtnghiem s hi n k t qu Nút Ti p: Xoá d li u có s n trong các ô TextBox. ð t con tr ô txtHesoA Nút thoát: ðóng màn hình (Thoát ng d ng) Các ñ i tư ng n hi n ñúng ng c nh c a chương trình ñ ngư i s d ng không th c hi n nh m thao tác, tr t t di chuy n (tabIndex) phù h p. G n phím t t Enter cho nút Gi i và ESC cho nút Thóat Bài t p 04: T o project ñ t tên GiaiPTBac2, th c hi n gi i và biên lu n phương trình b c 2. Yêu c u ch c năng: Nút Gi i: Th c hi n gi i và bi n lu n phương trình b c 2, ô k t qu (txtketqua) cho bi t phương trình có nghi m kép, có 2 nghi m, vô nghi m hay vô s nghi m. Trong trư ng h p có nghi m thì ô txtnghiem1 và txtNghiem2 s hi n k t qu Nút Ti p: Xoá d li u có s n trong các ô TextBox. ð t con tr ôH s A Nút thoát: ðóng màn hình (Thoát ng d ng) Các ñ i tư ng n hi n ñúng ng c nh c a chương trình ñ ngư i s d ng không th c hi n nh m thao tác, tr t t di chuy n (tabIndex) phù h p. G n phím t t Enter cho nút Gi i và ESC cho nút Thóat Bài t p 05: T o Project Tinhtoan th c hi n tính các bài tóan sau: frmTongDaySo Th c hi n tính t ng dãy s liên ti p t n ñ n m This is trial version Dương Thành Ph t Trang 2 www.adultpdf.com
Bài t p MicroSoft Visual Basic .NET 2005 frmGiaiThua Th c hi n tính giai th a c a 1 s nguyên n. frmTongChanLe Th c hi n tính t ng ch n và t ng l dãy s n. frmTimSoDao Th c hi n tìm s ñ o c a s nguyên n. frmMain, th c hi n m 4 form tương ng trên t 4 nút l nh Bài t p 06: T o Project Songuyento, th c hi n li t kê t t c các s nguyên t có giá tr nh hơn N(s nguyên dương) và tính t ng c ng các s nguyên t ñã tìm ñư c dư i ñây: Yêu c u: - Nút Li t kê: Li t kê t t c các s nguyên t có giá tr nh hơn N và tính t ng c ng các s nguyên t ñã tìm ñư c. - Nút b qua : ð xóa r ng 3 textbox. - Nút thoát : ðóng form. This is trial version Dương Thành Ph t Trang 3 www.adultpdf.com
Bài t p MicroSoft Visual Basic .NET 2005 Bài t p 07: T o project Wellcome, th c hi n hi n th và ñi u ch nh n i dung t TextBox vào Lable, n / hi n các control tùy theo ng c nh dùng th t c ñ th c hi n. Hư ng d n: Phân tích tr ng thái n, hi n các Control theo t ng ng c nh như sau: Form_Load cmdSua_Click cmdDongy_Click cmdKhong_Click txtNoidung O X O O cmdSua X O X X cmdThoat X O X X cmdDongy O X O O cmdKhong O X O O Private Sub frmHello_Load(. . .) Handles MyBase.Load PhucHoi() End Sub Private Sub XacLap() cmdSua.Visible = False cmdThoat.Visible = False txtNoidung.Visible = True cmdDongy.Visible = True cmdKhong.Visible = True End Sub Private Sub PhucHoi() cmdSua.Visible = True cmdThoat.Visible = True cmdDongy.Visible = False cmdKhong.Visible = False txtNoidung.Visible = False End Sub Private Sub cmdSua_Click( . . .) Handles cmdSua.Click XacLap() txtnoidung.Text = lbchao.Text txtnoidung.Focus() txtnoidung.SelectionStart = 0 txtnoidung.SelectionLength() = Len(txtnoidung.Text) End Sub Private Sub cmdDongy_Click(. . . ) Handles cmdDongy.Click lbchao.Text = txtnoidung.Text PhucHoi() End Sub Private Sub cmdThoat_Click(. . . ) Handles cmdThoat.Click Me.Close() End Sub Private Sub cmdKhong_Click(. . . ) Handles cmdKhong.Click PhucHoi() This is trial version End Sub Dương Thành Ph t Trang 4 www.adultpdf.com
Bài t p MicroSoft Visual Basic .NET 2005 Bài t p 08: T o Project PrjTinhtong, th c hi n tính “T ng dãy s ” và “T ng giai th a dãy s ” Yêu c u: Các yêu c u tính toán ph i th c hi n dư i d n hàm con Khi Set Visible các button ph i dư i d ng th t c. Nút thoát có xu t hi n thông báo Hư ng d n: Function tongdayso(ByVal a As Integer, ByVal b As Integer) Dim i As Integer, s As Long= 0 For i = a To b s=s+i Next tongdayso = s End Function Private Sub cmdTonggiaithuadayso_Click( . . . ) Handles cmdTonggiaithuadayso.Click Dim n As Integer, m As Integer n = Val(txtson.Text) m = Val(txtsom.Text) txtketqua.Text = tonggiaithuadayso(n, m) End Sub Function giaithua(ByVal k As Integer) Dim i As Integer, s As Long = 1 For i = 1 To k s=s*i Next giaithua = s End Function Function tonggiaithuadayso(ByVal x As Integer, ByVal y As Integer) Dim i As Integer, s As Long = 0 For i = x To y s = s + giaithua(i) Next tonggiaithuadayso = s This is trial version End Function Dương Thành Ph t Trang 5 www.adultpdf.com
Bài t p MicroSoft Visual Basic .NET 2005 Bài t p 09: T o Project PrjUocboisochung, th c hi n tìm “Ư c s chung l n nh t ” và “B i s chung nh nh t” c a 2 s nguyên A và B: Yêu c u: - Vi t hàm (Nút Tìm) tìm USCLN và BSCNN c a 2 s a và b. N u ta ch n Option USCLN thì xu t ra k t qu ư c s chung l n nh t hay ngư c l i là b i s chung nh nh t. - Nút b qua dùng ñ xóa r ng các Textbox. - Nút Thoát có xu t hi n thông báo Bài t p 10: T o m t ng d ng (PrjCalculator) Th c hiên ch c năng như 1 máy tính b túi v i các phép toán cơ b n +,-,x,/ G m : 1 textbox ñ nh p phép toán & hi n th k t qu , 10 nút l nh tươnmg ng 10 ký s 0 9, 4 nút l nh cho 4 phép toán +, - , x, / , 1 nút = ñ k t thúc phép toán và hi n th k t qu , 1 nút AC dùng ñ xóa n i dung trên textbox, 1 nút thoát ñ ñóng form. HD: S d ng c u trúc l nh trình r nhánh If . . Else . . End if và Select . . . Case . . . This is trial version Dương Thành Ph t Trang 6 www.adultpdf.com