I. Chơng trình con (thủ tục và hàm)
1. Bảng chọn tự do
Đây là loại bảng chọn gồm nhiều mục và đợc sắp xếp tự do, thoải mái trên màn hình.
Ví dụ:
Cú pháp:
Nội dung công việc
1.Nhập dữ liệu 2.Sửa dữ liệu 3.Tìm kiếm 4.In, báo cáo 5.Kết thúc
@<h1,c1> PROMPT <Lời nhắc 1 > [MESSAGE <Thông báo 1>] @<h2,c2> PROMPT <Lời nhắc 2 > [MESSAGE <Thông báo 2>] . . . . . .
@<hn,cn> PROMPT <Lời nhắc n > [MESSAGE <Thông báo n>] SET MESSAGE TO [<Bt số> [LEFT | CENTER | RIGHT ]]
MENU TO <biến nhớ>
Bài luyện tập:
Tạo bảng chọn tự do với hệ thống bảng chọn sau:
Nội dung chơng trình:
set talk off DO WHILE .T. clear
@4,20 say " Nội dung công việc " @6,22 to 14,58 chr(177)
@8,26 prompt " 1. Nhập d liệu " ; mess "Chơng trình nhập dữ liệu phát sinh" @9,26 prompt " 2. Sửa dữ liệu " ; mess "Chơng trình sửa dữ liệu nhập sai " @10,26 prompt " 3. Tìm kiếm " ;
mess " Chơng trình tìm kiếm dữ liệu theo yêu cầu " @11,26 prompt " 4. In báo cáo " ;
mess "Chơng trình in báo cáo thống kê" @12,26 prompt " 5. Kết thúc chơng trình " ; mess "Kết thúc chơng trình, về cửa sổ lệnh" SET MESSAGE TO 23 CENTER
MENU TO chon DO CASE CASE chon=1 do nhapdl CASE chon=2 do suadl CASE chon=3 do Timkiem CASE chon=4 do baocao
Nội dung công việc
1. Nhập dữ liệu 2. Sửa dữ liệu 3. Tìm kiếm 4. In báo cáo
CASE chon=5 EXIT ENDCASE ENDDO Set talk on RETURN 2. Bảng chọn dọc (DEFINE POPUP)
Trong bảng chọn loại này, các mục chọn nằm theo dòng tạo thành hình hộp chữ nhật, để chọn một mục, ta di hộp sáng đến mục cần chọn và ấn ENTER hoặc ấn kí tự phím nóng đợc định nghĩa đại diện cho mục đó. Để tạo bảng chọn dọc ta thực hiện các bớc nh sau:
• Định nghĩa bảng chọn dọc • Định nghĩa các mục chọn dọc
• Khai báo lệnh thực hiện khi một mục đợc chọn • Kích hoạt và thôi kích hoạt bảng chọn dọc