a. Cấu trúc chọn
So sánh mặc định trong VB là so sánh phân biệt cỡ chữ, nếu muốn tắt chế độ này, ta thêm dòng khai báo sau vào chương trình:
Option Compare Text
Nếu muốn trả về trạng thái ban đầu, có 2 cách: - Đưa vào dòng khai báo:
Option Compare Binary
Các biểu thức so sánh: Ký hiệu Ý nghĩa = Bằng <> Khác > Lớn hơn < Nhỏ hơn >= Lớn hơn hay bằng <= Nhỏ hơn hay bằng b. If…Then + Một dòng lệnh:
If <điều kiện> Then<dòng lệnh> + Nhiều dòng lệnh:
If<điều kiện> Then <các dòng lệnh> End If
Điều kiện là một so sánh hay một biểu thức mang giá trị số. VB thông dịch giá trị này thành True/ Fasle (0 là Fasle, giá trị khác 0 là True). Nếu điều kiện là True, VB thi hành tất cả các dòng lệnh sau từ khóa Then.
Ví dụ:
If anyDate < Now Then anyDate =now If anyDate < Now Then
anyDate =now End If
Lưu ý: Trường hợp một dòng lệnh không có End If
c. If…Then…Else
If <điều kiện 1> Then [khối lệnh- 1] [Elself <điều kiện 2> Then
[khối lệnh- 2]… [Else
[khối lệnh- n] End If
VB kiểm tra điều kiện thứ nhất. Nếu nó sai, VB kiểm tra điều kiện thứ hai, …cho đến khi điều kiện đúng. VB thi hành khối lệnh tương ứng và sau đó thi hành dòng chương trình ngay sau End If.
d. Select Cases
Select Case<biểu thức kiểm tra> [Case <Danh sách biểu thức -1>
[khối lệnh -1]]
[Case <Danh sách biểu thức -2> [khối lệnh -2]]
....
[Case Else [khối lệnh –n]] End Select
Mỗi danh sách biểu thức chứa một hoặc nhiều giá trị, các giá trị cách nhau dấu phẩy. Mỗi khối lệnh có thể chứa từ 0 đến nhiều dòng lệnh.
e. Do…Loop
Thi hành một khối lệnh với số lần lặp không định trước, trong đó một biểu thức điều kiện dùng so sánh để quyết định vòng lặp có tiếp tục hay không. Điều kiện phải quy về False (0) hoặc True (khác 0).
Kiểu 1: Lặp trong khi điều kiện là True Do While <điều kiện>
<khối lệnh> Loop
Kiểu 2: Vòng lặp luôn có ít nhất một lần thi hành khối lệnh: Do <khối lệnh>
Loop While <điều kiện>
Kiểu 3: Lặp trong khi điều kiện là False: Do Until <điều kiện>
<khối lệnh> Loop
Kiểu 4: Lặp trong khi điều kiện là False và có ít nhất một lần thi hành khối lệnh:
Do <khối lệnh> Loop Until <điều kiện>
f. For…Next
For <biến đếm> = <điểm đầu> To <điềm cuối>[Step <bước nhảy>] <khối lệnh>
Next[<biến đếm>]
Biến đếm, điểm đầu, điểm cuối và bước nhảy là những giá trị số. Bước nhảy có thể là dương hoặc âm, nếu bước nhảy là số dương, điểm đầu phải nhỏ hơn hoặc bằng điểm cuối. Nếu không khối lệnh sẽ thi hành. Nếu bước nhảy là số âm, điểm đầu phải lớn hơn hoặc bằng điểm cuối. Nếu Step không được chỉ ra, mặc định bước nhảy là 1.
g. For Each…Next
Tương tự vòng lặp For…Next, nhưng nó lặp theo số phần tử của một tập các đối tượng hay một mảng thay vì theo số lần lặp xác định. Vòng lặp này tiện lợi khi ta không biết chính xác bao nhiêu phần tử trong tập hợp.
For Each <phần tử> In <nhóm> <khối lệnh>
Next <phần tử>
Để dùng For Each…Next thì phần tử trong tập hợp chỉ có thể là biến Variant, biến Object, hoặc một đối tượng trong Object Browser; phần tử trong mảng chỉ có thể là biến Variant; không dùng For Each…Next với mảng chứa kiểu tự định nghĩa vì Variant không chứa kiểu tự định nghĩa.
h. Vòng lặp While…Wend
Tương tự vòng lặp Do…While, nhưng ta không thể thoát vòng lặp bằng lệnh Exit. Vì vậy, vòng lặp kiểu này chỉ thoát khi biểu thức điều kiện sai.
While sPassword <> “ Enter password” sPassword = InputBoxs(“Enter password”) Wend
i. Câu lệnh Go To
3.2. Cơ sở dữ liệu trên ACCESS
Bảng Nhân viên: Lưu trữ tất cả thông tin về lý lịch của nhân viên như họ tên, ngày sinh, giới tính, địa chỉ, trình độ chuyên môn.... Khóa chính là MaxNV, mỗi một nhân viên chi được xác định bởi 1 MaxNV này nên trách được sự lặp lại hai hay nhiều nhân viên trùng nhau do nhầm lẫn trong khi cập nhật thông tin.
Bảng Chức vụ: Gồm có Mã chức vụ, Tên chức vụ và Mã Đối tượng. Khóa chính là MaxCV, Tên chức vụ cho biết tên của các chức vụ hiện có tong cơ quan như: Giám đốc, phó Giám đốc, Tưởng phòng, Phó phòng hay Nhân viên. Trường MaxDT cho biết Chức vụ đó thuộc nhóm đối tượng nào, là Lao động gián tiếp hay trực tiếp, lao động hợp đồng, thử việc hay Cộng tác viên. Các thông tin về đối tượng đó được lưu trữ trong bảng Đối Tượng LĐ.
Bảng Đối tượng: Khóa chính là MaxDT xác định duy nhất một nhóm đối trượng. Tên đối tượng gồm có: LĐ gián tiếp(Ban Giám đốc), LĐ trực tiếp, LĐ dài hạn, LĐ ngắn hạn, Thử việc và Cộng tác viên
Bảng Khen thưởng - Kỷ luật: Lưu trữ thông tin về quá trình khen thưởng cũng như kỷ luật của nhân viên như Ngày tháng được khen thương hay kỷ luật, hình thức và mức độ khen thưởng hay kỷ luật. Khóa chính là MãNV.
Bảng Phòng ban: Gồm Mã phòng ban, Tên phòng ban và Mã khối. khóa
chính là MaxPB xác định duy nhất một tên phòng ban trong cơ quan. Hiện Ngân hàng CSXH Thanh Hóa có 15 phòng ban như sau: QHKH cá nhân, QHKH doanh nghiệp, QH định chế tài chính, Kế hoạch, Tín dụng - Đầu tư, Kế toán tài chính, Quản lý rủi do, DVKH cá nhân, DVKH tô chức, Xử lý bộ chứng từ, Ngân quỹ, Hành chính, Nhân sự, Pháp chế và Công nghệ thông tin. Mã khối xác định phòng ban đó thuộc khối hoạt động nào. Có 4 khối hoạt động được lưu trong bảng Khối như sau: Khối QHKH, Khối tông hợp, Khối tác nghiệp và khối hỗ trợ kỹ thuật.
Bảng Khối: Gồm có Mã khối và tên khối. bang này lưu trữ thông tin về các khối hoạt động trong Ngân hàng như Khối QHKH, Khối tông hợp, Khối tác nghiệp và khối hỗ trợ kỹ thuật. khóa chính là Mã khối.
Bảng Lương: lưu thông tin về Lương hàng tháng của nhân viên vì vậy khóa chính gồm MaxNV và Tháng. Gồm có các trường lưu thông tin dùng để tính lương như Lương cơ bản, HS lương, HS bao hiêm, Thưởng, Tạm ứng, Hỗ trợ và Khấu trừ. Khoản khấu trừ là tổng của các khoản Thuế hay bảo hiểm nhân viên phải đóng( thuế TNCN, bao hiểm XH, bảo hiểm y tế, bảo hiểm thất nghiệp).
Lương thực lĩnh = LươngCB*HS lương*HS Bảo hiểm + Thưởng - Khấu trừ.
Bảng Chấm công: Lưu thông tin về các ngày công trong 1 tháng gồm có Ngày bình thường, Ngày chủ nhật, Ngày lễ, Nghỉ phép. 2 Khóa chính là MaxNV và Tháng chấm công.
Ngày công đi làm= ngày bình thường + 1.5*(Chủ nhật + Ngày lễ)
Bảng Trình độ văn hóa: Lưu thông tin về trình độ văn hóa của từng nhân viên. Gồm Mã tình độ và Tên trình độ, khóa chính là Mã tình độ. Tên trình độ văn hóa gốm có: Đại học, Trên đại học, Cao đẳng, Trung cấp, Phổ thông.
Bảng Liên Kết Thực Thể : Mối quan hệ gữa các bảng được thể hiện trong bảng này.
3.3. Thiết kế các FORM chương trình3.3.1. Các chức năng của hệ thống: 3.3.1. Các chức năng của hệ thống: Hệ thống : + Đăng nhập
+ Đổi mật khẩu
+ Thông tin người dùng + Trợ giúp
+ Thoát
Cập nhật: + Cập nhật hồ sơ nhân viên
+ Cập nhật phòng ban + Cập nhật khối điều hành + Cập nhật chức vụ
+ Cập nhật đối tượng lao động + Cập nhật trình độ văn hóa + Cập nhật bảng chấm công + Cập nhật quá trình lương
+ Cập nhật khen thưởng, kỷ luật
Tìm kiếm : + Theo họ tên
+ Theo phòng ban + Theo chức vụ
+ Theo trình độ văn hóa + Theo đối tượng lao động
Thống kê, báo cáo : + Danh sách lao động: Theo chức vụ
Theo phòng ban Theo trình độ văn hóa Theo hệ số lương + Phòng ban
+ Khen thưởng, kỷ luật: Khen thưởng Kỷ luật + Khối điều hành
+ Lương nhân viên: Bảng chấm công Lương thực lĩnh Khoản hỗ trợ Khoản tạm ứng
Ngoài ra còn có chức năng KHÓA HỆ THỐNG dùng để đăng xuất khỏi hệ thống khi không làm việc.
3.3.2. Các vấn đề đã thực hiện được của chương trình: Cập nhật:
- Chương trình cho phép nhập thêm các thông tin mới như Hồ sơ nhân viên, thông tin phòng ban, chức vụ, khen thưởng kỷ luật, bảng chấm công hay quá trình lương của nhân . Với điều kiện là không được trùng khóa chính (chương trình sẽ tự động kiểm tra mỗi khi người sử dụng nhập vào một bản ghi mới để tránh việc nhập sai chương trình sẽ báo lỗi khi nhập trùng khóa hay nhập không hợp lệ và bắt phải nhập lại cho đến khi hợp lệ).
Chỉnh sửa, xóa:
Khi những thụng tin về nhân viên vì một lý do nào đó trong quá trình làm việc có thể bị thay đổi như quê quán, địa chỉ, ngày vào Đảng v.v… người dùng sẽ sử dụng chức năng này để cập nhật những thông tin mới nhất về họ. Thông tin hiện lên bao gồm toàn bộ các mục như trong hồ sơ sinh viên, những thông tin này cho phép thay đổi, cập nhật mới.
Những thông tin mới sẽ được ghi lại và tra cứu về sau.
Chức năng chỉnh sửa được thiết kế ở các form nhập, để tiện cho việc sửa những thông tin mà người sử dụng cần thay đổi.
Người sử dụng có thể dùng chức năng xóa để xóa các thông tin nếu muốn, chương trình sẽ tự động loại những thông tin bị xóa ra khỏi cơ sở dữ liệu.
Tra cứu:
Chương trình cho phép tra cứu nhân viên theo tên, theo họ đệm theo hồ sơ nhân viên, tên phòng ban, tên chức vụ . Ngoài ra cũng cho phép người sử dụng tìm kiếm theo đối tượng lao động hay trình độ văn .
Chức năng này tương tự chức năng cập nhật chỉ khác là không cho phép thay đổi cập nhật mà chỉ cho phép xem thông tin của kết quả tìm kiếm.
Thống kê:
Chương trình cho phép in ra các báo cáo về hồ sơ nhân viên được phân chia theo chức vụ , theo phòng ban, theo trình độ văn hóa và theo hệ số lương. In ra được các báo cáo chấm công, bảng lương, các khoản hỗ trợ, các khoản tạm ứng theo từng tháng do người dùng lựa chọn.
3.3.3. Giới thiệu một số Form chính của chương trình:
Form MAIN: Form chính khi khởi động chương trình, gồm một MEMU
cho phép người dùng lựa chọn các chức năng trong đó. Lưu ý là trước khi sử dụng được các chức năng người sử dụng cần Đăng nhập trước
Form đăng nhập: Đây là phần mang tính chất bảo mật của hệ thống để
tránh được sự truy cập bất hợp pháp hay truy cập với các mục đích xấu. Để sử dụng được các chức năng của hệ thống người dùng cần phải đăng nhập đúng Tài khoản và mật khẩu của minh. Đối với nhân viên thì được cung cấp tài khoản truy cập hệ thống để thực hiện một số hoạt động cho phép như Thêm một thông tin , chỉnh sửa thông tin của mình hay thêm quá trình khen thưởng kỷ luật của một nhân viên... Còn đối với người quan lý cấp cao hơn thì tài khoản sẽ có toàn quyền xử lý như Thêm, Sửa, Xóa thông tin. Khi người dùng quên mật khẩu có thế nhấn vào dòng chữ Quên mật khâu để có thể lấy lại mật khẩu nhanh chóng, tuy nhiên khi sử dụng trong thực tế cầ cung cấp một số thông tin cá nhân mới có thể lấy lại mật khẩu. Nút Đăng ký cho phép tạo một tài khoản mới để đăng nhập và sử dụng chương trình. Khi đưa vào sử dụng thực tế thì những tài khoản đăng ký bởi người dùng thì chỉ được phép Đăng nhập để xem ngoài ra không được thực hiện bất cứ quyền nào khác.
Form cập nhật hồ sơ nhân viên: Các chức năng Thêm, Sưa , Xóa hồ sơ
nhân viên. Trong trường hợp có một nhân viên mới người quản trị sẽ phải Thêm mới thông tin của nhân viên này và cập nhật vào Cơ sở dữ liệu. hoặc khi thông tin của nhân viên bị sai lệch thì có thể chinh sửa hay xóa thông tin
Form cập nhật phòng ban: Form này giúp người quản trị có thể Thêm,
Mã phòng ban là khóa chính trong Cơ sở dữ liệu nên không được để trống hay trùng với mã đã có, nếu nhập trùng hay bỏ trống hệ thống sẽ thông báo và bắt nhập lại.
Cập nhật chức vụ: Tương tự như cập nhật phòng ban, Form này cho phép
cập nhật thông tin của các chức vụ trong cơ quan. Mã chức vụ không được phép bỏ trống hay nhập trùng mã.
viên và chọn tháng cần cập nhật. Nếu trong tháng đó nhân viên đã được cập nhật rồi thì hệ thống sẽ thông báo và yêu cầu cập nhật tháng khác. Khi người dùng nhấn vào Xem hết thì kết quả hiện ra là tất cả các nhân viên đã được chấm công theo tháng, nhìn vào thông tin này người dùng biết được tháng nào nhân viên nào chưa được chấm công và có thê cập nhật lại.
Form cập nhật quá trình lương: Các chức năng gồm có Thêm, Sửa, Xóa.
Khóa để xác định một bản ghi trong cơ sở dữ liệu là Mã nhân viên và Tháng vì vậy khi cập nhật quá trình lương nếu nhập cho Nhân viên đã có bảng lương tháng rồi thì chương trình sẽ thông báo nhập sai và bắt nhập lại cho tháng khác hoặc hủy bo việc nhập. một lưu ý quan trọng nữa là các trường như Lương, Thưởng, HS lương, HS bao hiểm, Khấu trừ, Tạm ứng, Hỗ trợ thì dữ liệu nhập vào bắt buộc phải là số nguyên, với các trường Hệ số thì có thể là số thực, nếu nhập sai hệ thống sẽ thông báo lỗi cho tới khi nhập đúng mới thôi.
Form cập nhật khen thương - kỷ luật:
Khi có nhân viên được khen thưởng hay bị kỷ luật thì người dùng phải cập nhật vào cơ sở dữ liệu bằng cách Thêm mới một bản ghi tong Form này. Với một nhân viên thì trong 1 ngày chỉ có thể có 1 hình thức là khen thưởng hay kỷ luật và không thể có 2 lần khen thương hay kỷ luật trong cùng 1 ngày được. Khi muốn
điều chỉnh thông tin khen thương ky luật thì người dùng có thể Sửa và lưu ý là chỉ được sửa hai trường đó là Hình thức và Mức độ. Khi nhân viên hết thời hạn ky luật người quan trị nhân vào nút Xóa để hủy bỏ kỷ luật với nhân viên đó.
Form tìm kiếm theo họ tên nhân viên: Form này giúp tra cứu các thông
tin của một hay nhiều nhân viên do người dùng muốn, chỉ cần nhập họ tên chính xác vào ô nhập và nhấn nút tìm kiếm sẽ hiện kết quả như mong muốn. hoặc có thể tìm kiếm tương đối nếu như người dùng chỉ nhập tên hoặc tên dệm hoặc họ của nhân viên. Ví dụ muốn tra cứu thông tin của tất cả các nhân viên họ Nguyễn thì người dùng chỉ cần nhập " Nguyen" vào ô nhập tên và nhấn nút Tìm kiếm, kết quả hiện ra là thông tin của tất cả các nhân viên có họ Nguyễn trong cơ quan
Form tìm kiếm theo tên phòng ban: Tương tự như tìm kiếm theo tên
nhân viên khi muốn tìm kiếm các nhân viên thuộc một phòng ban nào đó thì sử dụng chọn Form này
Form tìm kiếm theo tên chức vụ: Giúp người sử dụng tra cứu thông tin
Form tìm kiếm theo trình độ văn hóa: Cũng tương tự Form này cho
phép tìm kiếm thông tin của các nhân viên có cùng trình độ văn hóa
Form tìm kiếm theo đối tượng lao động: Tương tự Form này để tra cứu
Form Báo cáo Danh sách lao động được khen thưởng: Khi người dùng
muốn in ra danh sách các nhân viên được khen thưởng có thể chọn vào Menu THỐNG KÊ BÁO CÁO->Khen thưởng kỷ luật ->Khen thưởng
Form Báo cáo Danh sách lao động bị kỷ luật:Tương tự khi người dùng
Form Báo cáo Danh sách lao động theo khối: In ra danh sách các nhân