Nguyễn Bá Vương

ĐH Nông Lâm | Trang chính | Sơ đồ trang | English |
Thống kê
Số lần xem
Đang xem 2
Toàn hệ thống 3560
Trong vòng 1 giờ qua
Trang liên kết

 

INASP

Tạp chí Khoa học

và Công Nghệ

MIT

 

Thành viên

Email:
Password

Nội dung

  ThS. Nguyễn Bá Vương

Bài này tôi hướng dẫn các bạn tạo một bảng biểu trong VB6, để hiển thị kết quả đo dạng table.

1. Khởi động phần mềm lập trình VB6

2. Chọn trong danh sách Project chọn Standard EXE

3. Trèn MSFlexGrid control vào Proj:

              3.1 Vào thực đơn  Project , Chọn Components.

              3.2 Kéo danh sách xuống và chọn "Microsoft FlexGrid Control 6.0 (sp3)". Sau đó chọn OK để trèn vào project, như hình dưới.

 

4. Trèn FlexGrid vào From giao diện thiết kế bằng cách nhấn chuột vào biểu tượng  trên ToolBox và vẽ vào From, như hình dưới.

5. Trên hộp hội thoại tính chất chủa FlexGrid chọn thuộc tính name là Table, thuộc tính FixedCols là 0.

6. Nhấn kép vào From1 để lập trình cho table, đầu tiên chọn số hàng số cột, bằng lệnh sau:

                                table.Cols = 5             'Chọn số cột là 5
                                table.Rows = 10        'Chọn số hàng là 10

                   Tổng số hàng số cột này phụ thuộc vào người lập trình lựa chọn, và chúng ta có thể thay đổi được.

7. Điền tiêu đề vào cho Table.

                           table.col = 0                                'Vị trí cột là 0
                           table.row = 0                              'Vị trí hàng là 0
                           table.Text = "Du lieu 01"            ' Cột 0 hàng 0 có giá trị Text là "Du lieu 01"
                           table.Col = table.Col + 1           ' Vị trí cột tăng lên 1 đơn vị
                           table.Text = "Du lieu 02"            ' Cột 1 hàng 0 có giá trị Text là "Du lieu 02"
                           table.Col = table.Col + 1           ' Vị trí cột tăng lên 1 đơn vị
                           table.Text = "Du lieu 03"            ' Cột 2 hàng 0 có giá trị Text là "Du lieu 03"
                           table.Col = table.Col + 1           ' Vị trí cột tăng lên 1 đơn vị
                           table.Text = "Du lieu 04"            ' Cột 3 hàng 0 có giá trị Text là "Du lieu 04"
                           table.Col = table.Col + 1           ' Vị trí cột tăng lên 1 đơn vị
                           table.Text = "Du lieu 05"            ' Cột 4 hàng 0 có giá trị Text là "Du lieu 05"

8. Nhập dữ liệu vào bảng

Ví dụ chúng ta cần nhập dữ liệu vào bảng có giá trị như sau:

 

0           1              2              3              4

0           1              2              3              4

0           1              2              3              4

0           1              2              3              4

0           1              2              3              4

0           1              2              3              4

0           1              2              3              4

0           1              2              3              4

0           1              2              3              4

 

Kết quả lập trình như hình dưới

Mã lập trình như hình dưới đây.

 

Download ví dụ tạo table trong VB6

 

Số lần xem trang : 14885
Nhập ngày : 15-09-2008
Điều chỉnh lần cuối : 05-05-2009

Ý kiến của bạn về bài viết này


In trang này

Lên đầu trang

Gởi ý kiến

  Lập trình giao tiếp máy tính

  Vẽ đồ thị trong giao diện Visual Basic(17-09-2008)

  Card giao tiếp PCI-1711(15-09-2008)

  Cách sử dụng Card ACl-8112HG(15-09-2008)

  Điều khiển quá trình xuất dữ liệu qua Excel bằng VB6(15-09-2008)

Họ tên:Nguyễn Bá Vương

Đc:Bộ môn ĐKTĐ, Khoa Cơ khí - Công nghệ,

Trường ĐH Nông Lâm, P.Linh Trung, Q.Thủ Đức, Tp.HCM

E-mail 1:nguyenbavuong@hcmuaf.edu.vn / E-mail 2:congminhvuongz@yahoo.com

Thiết kế: Quản trị mạng- ĐHNL 2007