Bài Tập
Lưu ý: Mỗi bài tập nên tạo trên dĩa một folder để lưu những tập tin project, Form của bài tập đó.
1.Hãy thiết kế một Form như sau:
Đặt tên cho 3 textbox lần lượt là : txthoten, txtho, txtten
Đặt tên cho 3 nút lệnh lần lượt là btnHoLot, btnTen, btnHovaten
Hãy viết lệnh cho các đối tượng để Form có thể hoạt động như sau:
Người sử dụng sẽ gỏ họ và chữ lót vào txtholot, và tên vào txtten
Nếu nút lệnh cmd_holot được click thì nội dung của txthoten =txtholot.text
Nếu nút lệnh cmd_ten được click thì nội dung của txthoten=txt_ten.text
Nếu nút lệnh cmd_hoten được click thì nội dung của txthoten =txt_holot.text & “ “ & txtten.text
Nếu double click (sự kiện dlbclick) trên txthoten thì nội dung của txthoten bị xóa.
2.Thêm vào bài tập trên với yêu cầu sau:
Nội dung của txtholot và txtten được thể hiện ngay trên txtHoTen khi người sử dụng nhập dữ liệu vào txt_holot hay txtten (gợi ý: viết lệnh cho sự kiện change của txtholot và txtten
3.Hãy thiết kế một Form như sau:
Đặt tên đối tượng như hình mô tả.
Hãy viết lệnh cho các đối tượng để Form có thể hoạt động như sau:
Người sử dụng sẽ nhập các giá trị vào txt1, txt2 (là những giá trị số)
Nếu nút lệnh cmd1 được click thì nội dung của Lbl_mess=val(txt1.text)+ val(txt2.text)
Nếu nút lệnh cmd2 được click thì nội dung của Lbl_mess=val(txt1.text) - val(txt2.text)
Nếu nút lệnh cmd3 được click thì nội dung của lbl_mess=val(txt1.text) * val(txt2.text)
Nếu nút lệnh cmd4 được click thì nội dung của lbl_mess=val(txt1.text) * val(txt1.text)
Nếu nút lệnh cmd5 được click thì nội dung của lbl_mess=val(txt1.text)* val(txt1.text)* val(txt1.text)
Nếu nút lệnh cmd5 được click thì nội dung của lbl_mess=sqr(val(txt1.text))
Nếu nút lệnh cmd_exit được click thì kết thúc chương trình
Nếu double click (sự kiện dblclick) trên lbl_mess, hoặc txt1 hoặc txt2 thì xóa nội dung đang có của hai textbox txt1, txt2 và label lbl_mess.
4. Hãy tạo một Form như sau:
Khung màu trắng là một picture box với appearrance = flat
Hình tròn là một shape được vẽ bên trong Picture box
Khi chương trình chạy mỗi lần người sử dụng click vào các nút mũi tên thì hình tròn sẽ dịch chuyển một khoảng (tùy ý) theo hướng mũi tên đã click (sử dụng thuộc tính left, top của shape)
5. Viết chương trình chọn hình dạng và màu của một shape như sau:
Đặt tên Shape là Shp, thiết lập thuộc tính fillStyle của Shp là 0-Solid
Viết code để chọn hình dạng (Shape) và màu tô (FillColor) như sau:
Sub CmdVuong_Click()
Shp.Shape=1
End sub
Sub CmdMauDo_Click()
Shp.FillColor=VBRed
End sub
Cho biết tập các hằng số màu cơ bản của VB như hình.
Chia sẻ với bạn bè của bạn: |