Bài tập MicroSoft Visual Basic .NET 2005 - pdf 17

Download miễn phí 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ảivà ESC cho nút Thóat



Để tải bản Đầy Đủ của tài liệu, xin Trả lời bài viết này, Mods sẽ gửi Link download cho bạn sớm nhất qua hòm tin nhắn.
Ai cần download tài liệu gì mà không tìm thấy ở đây, thì đăng yêu cầu down tại đây nhé:
Nhận download tài liệu miễn phí

Tóm tắt nội dung tài liệu:

Bài tập MicroSoft Visual Basic .NET 2005
Dương Thành Phết Trang 1
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
www.adultpdf.com
A-PDF Watermark DEMO: Purchase from www.A-PDF.com to remove the watermark
Bài tập MicroSoft Visual Basic .NET 2005
Dương Thành Phết Trang 2
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
www.adultpdf.com
Bài tập MicroSoft Visual Basic .NET 2005
Dương Thành Phết Trang 3
 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
www.adultpdf.com
Bài tập MicroSoft Visual Basic .NET 2005
Dương Thành Phết Trang 4
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()
End Sub This is trial version
www.adultpdf.com
Bài tập MicroSoft Visual Basic .NET 2005
Dương Thành Phết Trang 5
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
End Function This is trial version
www.adultpdf.com
Bài tập MicroSoft Visual Basic .NET 2005
Dương Thành Phết Trang 6
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
www.adultpdf.com
...
Music ♫

Copyright: Tài liệu đại học © DMCA.com Protection Status