Baøi taäp MicroSoft Visual Basic .NET
Bieân Soaïn : Döông Thaønh Pheát Trang 1
Bài tập 11. Tạo Project minh họa hàm con sử dụng tham số là tham trị và tham số là
tham biến
Yêu cầu khi thực hiện cả 2 hàm con
Xuất giá trị a,b trước khi gọi hàm
Xuất giá trị a, b trong tham hàm sau khi ñã thực hiện hoán vị 2 số
Xuất giá trị a, b sau loi gọi hàm
Bài tập 12. Viết chương trình cho phép xử lý chuỗi.
Yêu cầu: Chuỗi ngày tháng nhập vào dùng dấu ngăn cách (-) và chuyển thành chuổi
kết quả có dấu ngăn cách (/)
Hướng dẫn: Sử dụng hàm Split(), hàm Join()
Bài tập 13. Tạo project minh họa các thao tác xử lý trên mảng viết dưới dạng hàm và
thủ tục.
Yêu cầu:
Tất cả các Textbox ñều Readonly
This is trial version
www.adultpdf.com
Baøi taäp MicroSoft Visual Basic .NET
Bieân Soaïn : Döông Thaønh Pheát Trang 2
Viết thủ tục Nhapmang() thực hiện lưu 5 số nguyên ngẫu nhiên từ 1 ñến 100
Thủ tục xuấtmang() gán 5 giá trị từ mảng vào 5 Textbox
Sự kiện Click() của nút Nhập gọi 2 thủ tục trên
Thủ tục Timmax() ñể Tìm giá trị lơn nhất và vị trí
Viết hàm Tong() ñể tính tổng các phần tử trong mảng
Sự kiện Click() của nút thực hiện Gọi thủ tục Timmax() và hàm Tong()
Bài tập 14. Xây dựng chương trình thao tác với mảng
Sắp xếp tăng
Xuất nguyên tố
Yêu cầu:
- Việc nhập số phần tử của mảng và giá trị cho các phần tử bằng hàm InputBox
- 2 textbox ñể hiển thị mảng ñã nhập và kết quả xử lý
- Chức năng Sắp xếp thực hiện sắp xếp tăng
- Chức năng Xuất nguyên tố xuất các phần tử là số nguyên tố
This is trial version
www.adultpdf.com
Baøi taäp MicroSoft Visual Basic .NET
Bieân Soaïn : Döông Thaønh Pheát Trang 3
Bài tập 15. Xây dựng chương trình xử lý chuỗi sau:
Yêu cầu:
- Khi vừa mở form chỉ nút Thoát sử dụng ñược, textbox nhập dữ liệu nhận
focus
- Khi textbox nhập dữ liệu vừa ñược nhập thì các nút sáng lên, ñồng thời nếu a
hết dữ liệu trong textbox nhập thì các nút cũng mờ ñi ngoại trừ nút Thoát=>
viết trong sự kiện change của textbox
- Khi các nút chức năng ñược nhấn thì kết quả sẽ hiển thị bên textbox Kết quả
Hướng dẫn:
Tìm kiếm : Instr(vị trí bắt ñầu tìm, chuỗi chứa, chuỗi cần tìm, phân biệt hoa thường hay ko)
Thay thế : Replace(chuỗi chứa, chuỗi tìm, chuỗi thay thế, vị tbắt ñầu, số lần m thay
thế, phân biệt hoa thường) Trả về chuỗi mới ñã ñược thay thế
This is trial version
www.adultpdf.com
Baøi taäp MicroSoft Visual Basic .NET
Bieân Soaïn : Döông Thaønh Pheát Trang 4
Bài tập 16: Viết chương trình tiếp nhận hiện thị thông tin, ứng dụng các Control
TextBox, Option Button, CheckBox, Command Button.
Kết quả ñược hiện thị qua MessageBox
Bài tập 17: Viết chương trình cho phép chọn ñịa danh và ñăng ký các ñiểm tham quan, ứng
dụng các Control Combo Box, ListBox, Command Button.
Trong ComboBox chứa danh sách các ñịa danh du lịch
Listbox1 bên trái hiển thị danh sách các ñiểm tham quan
Viết lệnh xử lý sự kiện tương ứng cho 4 nút lệnh ñể thực hiện chọn và chuyển các
ñịa danh qua lại 2 listbox.
Hướng dẫn:
Private Sub cmd1_Click()
Dim Noidung As String
Dim i As Integer, n As Integer
For i = 0 To ListBox1.SelectedItems.Count - 1
Noidung = ListBox1.SelectedItems.Item(i)
ListBox2.Items.Add(Noidung)
Next
For i = ListBox1.SelectedItems.Count - 1 To 0 Step -1
ListBox1.Items.Remove((ListBox1.SelectedItems.Item(i)))
Next
End Sub
This is trial version
www.adultpdf.com
Baøi taäp MicroSoft Visual Basic .NET
Bieân Soaïn : Döông Thaønh Pheát Trang 5
Private Sub cmd2_Click()
Dim Noidung As String
Dim i As Integer
For i = 0 To ListBox1.Items.Count - 1
Noidung = ListBox1.Items.Item(i)
ListBox2.Items.Add(Noidung)
Next
ListBox1.Items.Clear()
End Sub
Bài tập 18: Xây dựng chương trình thao tác với Listbox như sau :
Yêu cầu:
Chỉ cho nhập số vào textbox Nhập số
Khi nhập dữ liệu vào textbox Nhập svà nhấn Enter(hoặc click vào Cập Nhật) thì
số mới nhập này ñược thêm vào Listbox ñồng thời dữ liệu trong textbox bị xóa và
focus ñược chuyển về textbox
Khi nhấn vào các phím chức năng, yêu cầu sẽ ñược thực hiện trên listbox
Bài tập 19: Xây dựng chương trình nhập danh sách sinh viên theo yêu cầu:
Yêu cầu:
Nút > dùng ñể di chuyển các mục ñược chọn từ listbox trái qua listbox phải và ngược
lại cho <
Nút >> dùng ñể di chuyển tất cả các mục(kể cả không ñược chọn) từ listbox trái qua
listbox phải và ngược lại cho <<
Nút Xóa dùng ñể xóa nhưng item ñược chọn trên textbox trái
This is trial version
www.adultpdf.com