Ngày nay, với phát triển xã hội tất phương diện, nhu cầu người không ngừng nâng cao Trong thòi đại phát triển vũ bão, khoa học máy tính trở nên thực dụng, quan trọng cần thiết Nó sử dụng rộng rãi công cụ giúp người chế ngự phát triển giới Chính nhờ chức lưu trữ xử lý lượng thông tin khổng lồ mà máy tính tạo thành tựu to lớn Một số chúng giúp người quản lý lượng thông tin cá nhân lớn công ty, xí nghiệp hay trường học v.v Xuất phát từ yêu cầu thực tế người ta tạo nhiều hệ sở liệu để sử dụng việc quản lý Chẳng hạn chương trình thông dụng sử dụng rộng rãi visual fox visual basic v.v Thực tế cho thấy ngày thành tựu máy tính đem lại áp dụng vào tất lónh vực đời sống Chẳng hạn trường học Trước máy tính chưa phát triển việc tuyển sinh việc khó khăn phức tạp đòi hỏi nhiều thời gian công sức phải làm thứ theo cách thủ công Mỗi năm, việc làm lặp lặp lại theo motúyp quen thuộc Làøm việc theo cách thủ công có số hạn chế đònh dễ mắc lỗi viết, sai sót xét tuyển khó phát sửa chữa Nhưng ngày việc xét tuyển đơn giản hóa cách sử dụng chương trình viết sẵn dùng riêng cho mục đích tuyển sinh Việc làm khắc phục hạn chế trước mà đem lại hiệu thiết thực Phù hợp với xu hướng phát triển thời đại Với đề tài viết chương trình để thực việc tuyển sinh trường trung học sở hệ quản trò sở liệu visual foxpro tập lớn giúp có chương trình hoàn chỉnh giúp cho mục đích tuyển sinh Chương trình viết nhằm mục đích tuyển sinh với chức trình bày sau : - Đánh số báo danh cho thí sinh dự thi Nhập số thí sinh dự thi Sắp xếp thí sinh vào phòng thi Nhập điểm thi thí sinh Nhập điểm chuẩn trường tổ chức xét tuyển In loại danh sách như: danh sách thí sinh dự thi, danh sách phòng thi, danh sách thí sinh đậu - In giấy báo dự thi giấy báo nhập học cho thí sinh Các file liệu: gồm có hai table: - Danh sách gồm: + Số báo danh + họ lót + Tên + Ngày sinh + Phái + Mã trường + Phòng thi + Toán + Văn + Tổng điểm + Kết - Danh sách trường: + Mã trường + Tên trường + Đòa Chương trình tuyển sinh trường trung học sở Nguyễn Thượng Hiềnù có cấu trúc sau: đánh số báo danh xu lí trước thi nhập danh sách thí sinh dự thi xếp phòng thi cho thí sinh nhập điểm thi xử lí sau thi nhập điểm chuẩn xét tuyển danh sách dự thi Trường THCS Nguyễn Thượng Hiền in danh sách kết danh sách phòng thi danh sách thí sinh đậu giấy báo dự thi loại giấy báo giấy báo nhập học thoát CÁC FORM CHỨC NĂNG: I CHƯƠNG TRÌNH ĐÁNH SỐ BÁO DANH CHO THÍ SINH DỰ THI Chức năng: chức form đánh số báo danh cho thí sinh dự kìï thi xét tuyển vào trường THCS Cách sử dụng: + Khi nhấp vào nút lệnh đánh số báo danh ô thông báo xuất dòng chữ: “đã đánh số báo đánh xong ” + Khi nhấp vào nút lệnh thoát thoát khỏi form Code nút lệnh: + Đánh số báo danh: CLOSE TABLES USE danhsach INDEX iten so=1 DO WHILE !EOF() replace sbd WITH so SKIP so=so+1 ENDDO thisform.text1.value="Đã báo danh xong" thisform.Refresh USE đánh số + Thoát : thisform.release II CHƯƠNG TRÌNH NHẬP DANH SÁCH THÍ SINH DỰ THI Chức năng: chức form giúp cho người quản lí dễ dàng nhập liệu thông tin cá nhân thí sinh dự thi Cách sử dụng: + Trong ô họ lót nhập họ lót thí sinh dự thi + Trong ô tên nhập tên thí sinh + Trong ô ngày sinh ta nhập ngày tháng năm sinh thí sinh dự thi + Trong ô mã trường ta nhập mã trường tiểu học mà học sinh tốt nghiệp + Trong ô phái: Nếu nam đánh dấu check nữ bỏ trống + Khi nhấp vào nút lệnh nhập tên thí sinh ô thông báo xuất dòng chữ: “đã nhập xong” + Khi nhấp vào nút lệnh thoát thoát khỏi form Code nút lệnh: +Nhập thí sinh: CLOSE TABLES USE danhsach INDEX iten APPEND BLANK SET DATE FRENCH replace holot WITH PROPER(thisform.text1.text) replace ten WITH PROPER(thisform.text2.text) replace ngaysinh WITH CTOD(thisform.text3.text) replace phai WITH IIF(thisform.check1.Value=1,.T.,.F.) replace matruong WITH UPPER(thisform.text4.text) thisform.text1.value="" thisform.text2.value="" thisform.text3.value="" thisform.check1.Value=VAL("") thisform.text4.value="" thisform.text5.value="đã nhập xong" thisform.Refresh USE + Thoát: thisform.Release III CHƯƠNG TRÌNH SẮP XẾP PHÒNG THI CHO THÍ SINH DỰ THI Chức năng: Form có chức giúp cho người sử dụng xem tổng số thí sinh dự thi Qui đònh số thí sinh tối đa phòng thi đánh số phòng thi cho thí sinh Cách sử dụng: + Khi nhấp vào nút lệnh xem tổng số thí sinh dự thi xuất tổng số thí sinh dự thi có danh sách dự thi + Trong ô tổng số thí sinh phòng, ta qui đònh số thí sinh tối đa có phòng thi + Khi nhấp vào nút lệnh đánh số phòng thi chương trình tư động thực đánh số phòng thi cho thí sinh xuất câu thông báo “ đánh phòng thi xong” + Khi nhấp vào nút lệnh xem danh sách học sinh lên bảng tin hiển thò đầy đủ thông tin tất thí sinh dự thi + Khi nhấp vào nút lệnh thoát thoát khỏi form Code nút lệnh: + Xem tổng số thí sinh dự thi: SET confirm OFF CLOSE TABLES USE danhsach INDEX iten i=0 DO WHILE ! EOF() SKIP i=i+1 ENDDO thisform.text1.value=i USE + Đánh số phòng thi: CLOSE TABLES USE danhsach INDEX iten sts=VAL(thisform.text2.text) p=1 i=1 DO WHILE ! EOF() replace phongthi WITH p SKIP i=i+1 IF i > sts*p p=p+1 ENDIF ENDDO thisform.text3.value=" da sap xep phong thi xong " use + Thoát: thisform.release IV CHƯƠNG TRÌNH NHẬP ĐIỂM THI CHO CÁC THÍ SINH DỰ THI Chức năng: chức form bạn muốn nhập điểm cho phòng thi số bạn cần đánh số phòng thi vào dòng nhập điểm cho phòng thi lúc máy tính sẻ bảng cho bạn nhập điểm Cách sử dụng: + Trong ô nhập điểm cho phòng số: Ta nhập số phòng thi mà ta muốn nhập điểm + Khi nhấp vào nút lệnh nhập điểm lên table cho bạn nhập điểm + Khi nhấp vào nút tính tổng điểm chương trình tính tổng điểm hai môn văn toán + Khi nhấp vào nút xem bảng cho bạn xem thông tin thí sinh tổng điểm + Khi nhấp vào nút lệnh thoát thoát khỏi form Code nút lệnh + Nhập điểm:     CLOSE TABLES USE danhsach INDEX iten phong=VAL(thisform.text1.Text) BROWSE FOR phongthi=phong + Tính tổng điểm: replace ALL tongdiem with van+toan + Xem:  USE danhsach INDEX iten  phong=VAL(thisform.text1.Text)  BROWSE FOR phongthi=phong + Thoát: thisform.Release V CHƯƠNG TRÌNH NHẬP ĐIỂM CHUẨN XÉT TUYỂN Chức năng: 10 chức form thực xét kết đậu rớt thí sinh nhập điểm chuẩn Cách sử dụng: + Trong ô điểm chuẩn thực nhập số điểm chuẩn vào trường qui đònh + Nhấp vào nút lệnh kết Chương trình tự động thực xét thí sinh đủ điểm chuẩn theo qui đònh, thí sinh l5c riêng danh sách trúng tuyển + Khi nhấp vào nút lệnh xem table chứa thông tin thí sinh đậu + Khi nhấp vào nút lệnh thoát thoát khỏi form Code nút lệnh: + kết quả: CLOSE TABLES USE danhsach INDEX iten diemchuan = VAL(thisform.text1.Value) replace ALL ketqua WITH IIF( van + toan >= diemchuan, 'dau' ,'rot') thisform.text2.Value='Đã nhập xong' USE + xem: USE danhsach INDEX iten BROWSE FOR ketqua ="dau" + thoát: thisform.release 11 CÁC BẢNG DANH SÁCH I BẢNG DANH SÁCH CÁC THÍ SINH DỰ THI II BẢNG DANH SÁCH CÁC THÍ SINH Ở PHÒNG 12 III DANH SÁCH CÁC THÍ SINH TRÚNG TUYỂN VÀO TRƯỜNG 13 CÁC LOẠI GIẤY BÁO I GIẤY BÁO DỰ THI: II GIẤY BÁO NHẬP HỌC; 14 PHẦN KẾT LUẬN VÀ HƯỚNG PHÁT TRIỂN Những hạn chế chương trình Nếu nhập sai thông tin thí sinh bạn muốn xóa thí sinh chương trình chưa giải vấn đề Chưa tạo form chèn thêm thí sinh vào xếp phòng thi xong mà không làm thay đổi danh sách thí sinh phòng thi trước Hướng phát triển chương trình Có thể mở rộng thành chương trình tuyển sinh vào trường chuyên hay trường đại học với điểm trúng tuyển tùy thuộc vào khối thi 15 ... sinh ta nhập ngày tháng năm sinh thí sinh dự thi + Trong ô mã trường ta nhập mã trường tiểu học mà học sinh tốt nghiệp + Trong ô phái: Nếu nam đánh dấu check nữ bỏ trống + Khi nhấp vào nút lệnh... điểm + Kết - Danh sách trường: + Mã trường + Tên trường + Đòa Chương trình tuyển sinh trường trung học sở Nguyễn Thượng Hiềnù có cấu trúc sau: đánh số báo danh xu lí trước thi nhập danh sách thí... sách kết danh sách phòng thi danh sách thí sinh đậu giấy báo dự thi loại giấy báo giấy báo nhập học thoát CÁC FORM CHỨC NĂNG: I CHƯƠNG TRÌNH ĐÁNH SỐ BÁO DANH CHO THÍ SINH DỰ THI Chức năng: chức