Bài tập công nghệ thông tin: nút tính chức năng số lượng và đơn giá docx

3131
5.4 Ví dụ minh hoạ
Written by: Dương Thành Phết
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ó sẳn trong các ô TextBox.
ðặt con trỏ ở ô số lượng
Nút thoát: ðóng màn hình
This is trial version
www.adultpdf.com
3232
Written by: Dương Thành Phết
Project
Name: MayTinh
Form
Name: frmMayTinh
Caption: May Tinh Tien Hang
StartUpPosition : CenterScreen
TextBox
Name: txtSoLuong Tab Index: 1 Text: “”
Name: txtDonGia Tab index: 2 Text: “”
Name: txtThanhTien Text:””
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
This is trial version
www.adultpdf.com
3333

Written by: Dương Thành Phết
Viết lệnh cho các nút lệnh:
Private Sub cmdThoat_Click( . . . ) Handles cmdThoat.Click
Me.Close()
End Sub
Private Sub cmdTiep_Click(. . . . ) Handles cmdTiep.Click
TxtSoluong.Text = ""
TxtDongia.Text = ""
TxtThanhtien.Text = ""
TxtSoluong.Focus()
End Sub
Private Sub cmdTinh_Click( . . . . ) Handles cmdTinh.Click
TxtThanhtien.Text = Val(TxtSoluong.Text) * Val(TxtDongia.Text)
End Sub
This is trial version
www.adultpdf.com