Bài viết này sẽ hướng dẫn các bạn tạo một hệ thống thu ngân đơn giản bằng ngôn ngữ VB.Net. Với hệ thống này bạn có thể chọn sản phẩm, tiến hành thanh toán và in hoá đơn.
Bước 1:
MởMicrosoft Visual Studio 2015 và tạo một Windows form application mới. Sau đó bạn tiến hành thiết kế form như hình bên dưới
Bước 2:
Nhấp đúp chuột vào form vừa tạo và tiến hành thêm mã sau để thêm dữ liệu cho datagridview.
1 2 3 4 | DataGridView1.Rows.Add("Chicken Wings", "100") DataGridView1.Rows.Add("Beff Tapa", "200") DataGridView1.Rows.Add("Chicken Adobo", "150") DataGridView1.Rows.Add("Pork Adobo", "170") |
Bước 3:
Trở lại chế độ thiết kế và click vào datagridview. Sau đó bạn đi đến properties bằng cách nhấp chọn vào biểu tượng tia sét và click vào mục bắt sự kiện Click và chọn giá trị DataGridView.
Bước 4:
Sử dụng đoạn mã dưới đây để đưa dữ liệu từ datagridview vào textbox.
1 2 | TextBox1.Text = DataGridView1.CurrentRow.Cells(0).Value TextBox2.Text = DataGridView1.CurrentRow.Cells(1).Value |
Bước 5:
Nhấp đúp chuột vào textbox Amount Paid và sử dụng đoạn mã sau để tính tiền.
1 | TextBox4.Text = Val(TextBox3.Text) - Val(TextBox2.Text) |
Bước 6:
Tạo thêm một form khác để làm hoá đơn.
Bước 7:
Trở lại form chính và nhấp đúp chuột vào nút Print và tiến hành viết code cho sự kiện click.
1 2 3 4 5 | Form2.Label2.Text = TextBox1.Text Form2.Label3.Text = TextBox2.Text Form2.Label5.Text = TextBox3.Text Form2.Label7.Text = TextBox4.Text Form2.Show() |
Bước 8:
Sử dụng đoạn code dưới đây cho nút lệnh Clear để xoá dữ liệu.
1 2 3 4 5 6 | Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click TextBox1.Clear() TextBox2.Clear() TextBox3.Clear() TextBox4.Clear() End Sub |
Và đây là sản phẩm.
Huỳnh Mai Anh Kiệt (lượt dịch)
