thuyet minh

Tuy nhiªn, trong thêi gian thùc tËp vµ nghiªn cøu vÒ hÖ qu¶n trÞ c¬ së d÷ liÖu Microsoft Acceess, Visual Basic võa nghiªn cøu vÒ nghiÖp vô chuyªn nghµnh vÒ c«ng t¸c qu¶n lý ®iÓm trung hä[r]

Lời nói đầu

Hin tin học ngành có phát triển mạnh mẽ Để đáp ứng nhu cầu ngày đa dạng ngời sử dụng nhiều lĩnh vực nh quản lý, kĩ thuật khoa học,cũng nh nhiều ngành khoa học khác…, có nhiều trờng đại học ,cao đẳng ,nhiều trung tâm tin học đợc hình thành với đội ngũ giảng dạy lập trình cho nhiều phần mềm giúp cho ngời sử dụng dễ học tập, thực hành quản lý

Các sở ban ngành,trung tâm trình làm việc cần phải quản lý q trình làm việc Bài tốn quản lý ln tốn tơng đối phức tạp địi hỏi nhiều thời gian, cơng sức độ xác cao Vì cần phải có chơng trình có áp dụng cơng nghệ thơng tin để xây dựng toán quản lý cho phù hợp ngành cụ thể Bài toán Quản Lý Điểm Trung Học toán nh Việc xây dựng Quản Lý Điểm Trung Học nhằm giải cơng việc cách nhanh chóng dề dàng,chính xãc trờng trung học,cao đẳng chuyên nghiệp Điều giúp cho ngời quản lý tiết kiệm đợc thời gian, công sức nh nâng cao đợc hiệu công việc Là sinh viên đợc trờng trang bị kiến thức tin học với phần kiến thức ngành thông tin quản lý Đợc phân công khoa thầy cô giáo, em thực chơng trình Quản Lý Điểm Trung Học

Thái Nguyên , tháng 12 năm 2006

Chơng trình quản lý điểm trung học I Cơ sở liệu:

1.1 Xây dựng thực thể:

Trong quỏ trình tìm hiểu thực tế cơng việc quản lý điểm trung học, em thấy để đáp ứng u cầu mà tốn đề tối thiểu phải có thuộc tính sau:

-MÃ khoa -Tên khoa

1.1.2 Thông tin ngành: - MÃ ngành

- Tên ngành - MÃ khoa

1.1.3 Thông tin lớp : - Tên líp

- Häc kú - M· ngµnh

- Giáo viên chủ nhiệm 1.1.4 Thông tin häc sinh :

- M· häc sinh - Hä tên -Tên lớp - Ngày sinh - Giới tính

1.1.5.Thông tin môn: -MÃ học sinh

-MÃ ngành - Học kỳ - MÃ môn - Tên môn - Số học trình

1.1.6 Thông tin điểm 1: - M· häc sinh

- M· m«n - §iĨm hƯ sè - Häc kú

1.1.7 Thông tin điểm 2: - MÃ học sinh

- Häc kú - §iĨm hƯ sè - M· m«n

1.1.8.Th«ng tin vỊ tỉng kÕt -M· học sinh

-Học kỳ

1.1.9.Thông tin hạnh kiĨm -M· häc sinh

-§I mn

-NghØ häc cã phÐp -NghØ häc kh«ng phÐp -NghØ tiÕt

-NhËp ®iĨm -Häc kú

1.2 Néi dung thực thể: 1.2.1 Bảng khoa(khoa):

STT Tên trờng KiĨu §é réng Ghi chó

1 #Makhoa Text M· khoa

2 Tenkhoa Text 30 Tªn khoa

1.2.2 Bảng nganh (Ngành):

STT Tên trờng Kiểu Độ réng Ghi chó

1 #manganh Text M· ngµnh

2 Tennganh Text 30 Tên ngành

3 Makhoa Text M· khoa

STT Tªn trêng KiĨu §é réng Ghi chó

1 Manganh Text MÃ ngành

2 #Tenlop Text 30 Tên líp

3 #hocky Text Häc kú

4 Gvcn Text 30 Giáo viên chủ

nhiệm 1.2.4 Bảng hocsinh (học sinh):

STT Tên trờng Kiểu Độ rộng Ghi chó

1 #Mahs Text M· häc sinh

2 Tenlop Text 30 Tªn líp

3 Hoten Text 30 Họ tên

4 Ngaysinh Date/time Ngày sinh

5 Gioitinh Text Nam,nữ

1.2.5 Bảng (môn):

STT Tên trờng Kiểu Độ rộng Ghi

1 #Mahs Text M· häc sinh

2 #Manganh Text M· ngµnh

3 #Hocky Text Häc kú

4 #Mamon Text M· m«n

5 Tenmon Text 30 Tên môn

6 Sht Text Số học trình

1.2.6 Bảng diem 1(điểm hệ số 1):

STT Tên trờng Kiểu Độ rộng Ghi

1 #mahs Text M· häc sinh

2 #mamon Text M· m«n

4 Dhs2 Number Integer §iĨm hƯ sè Dtl1 Number Integer Điểm thi lần Dtl2 Number Integer Điểm thi lần Dtl3 Number Integer Điểm thi lần

8 Soht Number Integer Sè häc tr×nh

9 Hocky Text Học kỳ

1.2.7.Bảng diem2(Điểm hệ số 2)

STT Tên trờng Kiểu Độ rộng Ghi chó

1 Mahs text M· häc sinh

2 Hocky text Häc kú

3 Dhs2 Number Integer ®iĨm hƯ sè

4 Mammon Text MÃ môn

1.2.8 Bảng tket (tổng kết):

STT Tên trờng Kiểu Độ rộng Ghi

1 Mahs Text M· häc sinh

2 Hocky Text Học kỳ

1.2.9.Bảng hanhkiem(hạnh kiểm)

STT Tên trờng KiĨu §é réng Ghi chó

1 #mahs Text M· häc sinh

2 Nhcp Number Integer nghØ häc cã phÐp Nhkp Number Integet nghØ häc kh«ng

phÐp

4 Nghitiet Number Integer nghØ tiÕt

5 Nhapdiem Number Integer NhËp ®iĨm

6 Dm Number Integer ®i muén

7 Hocky Text Häc kú

Quản Ly Điểm Trung Học Nhập

dữ liệu kiếmTìm In danh s¸ch thèngHƯ

NhËp khoa NhËp

ngành Tìm theo

IV.S đồ liên kết thực thể :

5.1 chơng trình nhập khoa : Option Compare Database Option Explicit

Private Sub nhap_Click()

On Error GoTo Err_nhap_Click

makhoa.SetFocus

DoCmd.GoToRecord , , acNewRec

Exit_nhap_Click: Exit Sub

Err_nhap_Click:

MsgBox Err.Description Resume Exit_nhap_Click

End Sub

Private Sub tien_Click()

On Error GoTo Err_tien_Click

DoCmd.GoToRecord , , acNext

Exit_tien_Click: Exit Sub

Err_tien_Click:

MsgBox "Đây ghi cuối cùng", vbOKOnly, "Thông b¸o"

Resume Exit_tien_Click

End Sub

Private Sub lïi_Click()

On Error GoTo Err_lïi_Click

Exit_lïi_Click: Exit Sub

Err_lïi_Click:

MsgBox "Đây ghi đầu tiên", vbOKOnly, "Thông báo" Resume Exit_lïi_Click

End Sub

Private Sub dau_Click()

On Error GoTo Err_dau_Click

DoCmd.GoToRecord , , acFirst

MsgBox "Đây ghi đầu tiên", vbInformation, "Thông báo"

Exit_dau_Click: Exit Sub

Err_dau_Click:

MsgBox Err.Description Resume Exit_dau_Click

End Sub

Private Sub cuoi_Click()

On Error GoTo Err_cuoi_Click

DoCmd.GoToRecord , , acLast

MsgBox "Đây ghi cuối cung", vbInformation, "Thông báo"

Exit_cuoi_Click: Exit Sub

Err_cuoi_Click:

MsgBox Err.Description Resume Exit_cuoi_Click

Private Sub xoa_Click()

On Error GoTo Err_xoa_Click

If (MsgBox("B¹n cã muốn xoá không", vbYesNo, "Thông báo") = vbYes) Then

End If

DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_xoa_Click: Exit Sub

Err_xoa_Click:

MsgBox Err.Description Resume Exit_xoa_Click

End Sub

Private Sub thoat_Click()

On Error GoTo Err_thoat_Click

If (MsgBox("B¹n cã muèn thoát không ?", vbOKCancel + vbQuestion, "Thông báo") = vbOK) Then

DoCmd.Close End If

Exit_thoat_Click: Exit Sub

Err_thoat_Click:

MsgBox Err.Description Resume Exit_thoat_Click

5.2.chơng trình tìm kiếm theo khoa Option Compare Database

On Error GoTo Err_Command5_Click

If (MsgBox("Bạn có muốn thoát không ?", vbOKCancel + vbQuestion, "Thông báo") = vbOK) Then

DoCmd.Close End If

Exit_Command5_Click: Exit Sub

Err_Command5_Click: MsgBox Err.Description

Resume Exit_Command5_Click

5.3 chơng trình in học sinh theo khoa

:

Đánh giá kết luận

H thng Quản lý Điểm Trung Học đợc thiết kế phần mềm Microsoft Access đợc chạy môi trờng Window có u điểm nh sau:

 Giao diƯn víi ngêi dïng kh¸ thn tiƯn dƠ sử dụng Các thao tác in ấn thuận tiên nhanh chãng

 Các báo biểu có khả trình bầy đẹp

 Cập nhập sửa đổi thơng tin cách nhanh chóng thuận tiện xỏc

Hớng dẫn sử dụng chơng trình chặt chÏ

Em kính mong đợc giúp đỡ bảo thầy để thời gian khơng xa chơng trình đợc: Chỉnh sửa nâng cấp hoàn thiện nhằm phục vụ tốt công tác Quản lý Điểm Trung Học

Em xin chân thành cảm ơn giáo Đồn Thị Bích Ngọc, thầy giáo toàn thể bạn giúp đỡ em hoàn thnh ti ny

Thái Nguyên, Tháng 12 năm 2006 SVTH: Ngô Văn Quyết

Tài liệu tham khảo

2

Phân tích thiết kế hệ thống thông tin Tự học Visual Basic 21 ngµy (TËp1, 2)

Microsoft Visual Basic & lập trình sở liệu 6.0 Giáo trình lập trình sở liệu với Visual Basic Nhập môn Cơ sở liệu quan hệ