Est.

1972
 DECLARATION
I hereby declare that this project Report titled
“Billing System Software” in partial fulfillment
of the requirements for the award of the degree of
Master Of Computer Application in School of
Engineering and Technology in an authentic
record of my own work carried under the
supervision of Assistance professor Bibha
Kumari CSE department.I have not submitted
the matter embodied this record for award of
any other degree.

…………………………….
SHOAIB AKHTER 23011900005
SAURAV BHARTI 23011900004
VICKY KUMAR 23011900037

Session :- 2023-25

Page 2
 CERTIFICATE
This is to certify that the project Report
entitled “Billing System Software”to
submitted by me. To the award of Master Of
Computer Application Degree of School of
Engineering & Technology . Session of 2023-
25 from the K.K. UNIVERSITY Is authentic
work carried out by him under by supervision
and guidance .And other Institute or
University for the award of any Degree or
Diploma.
Submitted by :
Shoaib Akhter 23011900005
Saurav Bharti 23011900004
Vicky Kumar 23011900037
Assistance professor,CSE
(Bibha Kumari)
Head Of Department (Md Saqib Anwar)

Page 3
 ACKNOWLADGEMENT
I have great pleasure to express my deep
sense of gratitude and grateful thanks to
all those gentle hearts to help me to
formula this work.
I am very grateful to Er.Ravi Chaudhary
founder and chancellor of K.K UNIVERSITY
for providing use the necessary state of
art infrastructure to do project.
I am highly obliged to Md. Saqib Anwar ,
Head of the Department, MCA for
providing me with all necessary facilities in
carrying out my work and directing me to
move in the right path of project.
We deeply express our sincere gratitude
to our project guide Mrs Bibha Kumari
To Assistant Professor , department of CSE,
KKU, NALANDA .

Page 4
I am greatly indebted to him for the scientific
freedom, effective criticisms and unfailing
guidance throughout my study period.
I express my sincere thanks to all my teachers
and friends in the department of computer
science and engineering, for their generous
help , moral support and involvement in my
betterment .
Last , but not the least ,we would be like to
thank my peers AND friends who provided me
with valuable suggestions to improve my
project.

Shoaib Akhter 23011900005

Saurav Bharti 23011900004
Vicky Kumar 23011900037

Page 5
 CONTENTS

1. Basic and Introduction to Project…………11

1.1. Purpose
1.2. Project Overview
2. Project Category Tools & Environment…. 14
2.1. Goals of Proposed System
2.2. Project Category
2.3. Front End & Back End Tools
2.4. Microsoft Access
2.5. Definition of Problems
2.6. Alternative Solutions
3. Integrated Development Environment …..21
4. Scope of The System……………………….23
4.1. Benefits
4.2. Advantages

Page 6
5. Objective Of The Project………………......25
6. Need For The Proposed System…………....27
7. Feasibility Study………….……………… 28
7.1. Feasibility Considerations
7.2. Economic Feasibility
7.3 Technical Feasibility
7.4. Behavioral Feasibility
7.5. Operational Feasibility
7.6. Schedule Feasibility
7.7. Analysis
7.8. Design
7.9. Implementation
7.10. Post:Implementation and
Maintenance
8. System Specification……..………………. 40
8.1. Hardware Configuration
8.2. Software Configuration
8.3. Technology Used
8.4. Front End & Back End
9. Software Requirement Specification(SRS). 43
Page 7
 9.1. Information Description
9.2. Fundamental Description
9.3. Behavioral Description
9.4. validation Criteria
9.5. Bibliography & Reference
10.Analysis…...…………………………… 45
10.1. Techniques Used For Analysis
 Interviews
 Guidelines For Interviews
 Questionnaires
11. Data Flow Diagram(DFD)……………48
12. Entity Relationship Diagram….……..49
12.1. ER – Diagram
12.2. CMS Flow Diagram
13. System Design…………………………53
13.1. Design Phase
13.2. Database Design
13.3. Field
13.4. Table

Page 8
 13.5. Record
13.6. Module
 Result Module Maintenance
 Quick Search Module

14. System Implementation……………. 57

14.1. About Language
 The Control Properties
14.2. Handling Some of the Common
Controls
 The Text Box
 The Label
 The command Button
 The Picture Box
 The Image Box
 The List Box
 The Combo Box
 The Check Box
 The Option Box
 The Message Box
 Line Tool
 Shape Tool
Page 9
  Common Dialog Box
14.3. MS Access 2002-2003
 Database File
 Table
 Filed
 Data Types
15. Screen Layout (Snap Shot)…………… 69
 Home Page (1st Form)
 Login Page (Login Form)
 Menu Page(2nd Form)
 Staff’s Corner Page(3rd Form)
 Staff Profile Page(4th Form)
 Student Corner Page(5th Form)
 Student’s Info. Page(6th Form)
 Staff`s Salary Information(7th
Form)
 Student`s Fee Information (8th
Form)
 About Page (9th Form)
 Photo Gallery Page (10th Form)
16.Testing……………......…………………. 116
 Testing Object
Page 10
  Components

17. Conclusion……………………………... 120

 Advantage of the Project
 Deficiencies
 Limitations
 Future Application of the Project
 Bibliography

1.Basic and introduction to project

Page 11
 Billing System is large database system which
can be used for managing college record like
student record, Lecturer/Staff record etc. In this
project we try to remove all the difficulties which
occur to catch out every problem which occurs during
handling data of the college.

This project is the output of two programming languages –

Visual basic and MS ACCESS, which has strong database
capability to store user`s data. It provide very attractive look
due to which user can use it very smoothly and easily.

In this project we have provide several facilities to user,

which is discussed below:-
 If it is required to find out any information regarding
college. One can catch out easily.
 With the help of this project we can easily insert &
update the students, Lecturer/Staff record.
 The extra facility of this project for the user if he/she
need to search any information regarding any student
or Lecturer/Staff, he can easily find the record in less
time by search/find method.

This project Contain mainly following Section:-

 Home Page
 Login User Page
 Task Desk
 Add Staff Information
 View Staff Report(Add/Modify/Delete)
 Manage Staff Salary (Add/modify/Delete)
 Staff Salary Details

Page 12
  Add Student Information
 View Student Report(Add/Modify/Delete)
 Manage Student Fee (Add/Modify/Delete)
 View Student Fee Details
 About application
 Photo Gallery

The Software Visual Basic – 6.0 is used as Front End For

the designing and programming and to create user friendly
GUI forms.MS Access is used as Back End to create the data
tables required to store the information. At present there is no
Such system which helps in addition, ensure, alteration and
demonstration of information to the client. So this system
facilities us to perform all these functions rather straight
forwardly with no supplementary specialization required.
1.1. Purpose
 The Software is for the automation of College
Management.
 It maintains two levels of users:-
 Staff Level
 Student Level
 The Software includes:-
 Maintaining Staff & Student details.
 Providing Staff General Information & Staff
Salary.
 Providing Student General Information &
Student’s all Exam Result.
 Billing and Report generation.
1.2. Project Overview
The system College Management System can be used to
manage the data of all type of education institutes. It will

Page 13
support both stand alone networking environment. The system
uses VB6.0 Technology.
The main modules involved in this system are :-
 Login
 Form
 Reports
 Window
Module wise description
Login: Login module is used to check whether the user
is an authorized person to use the system or not. For this user
should give the correct user name and password. The login
form is only for
 Student
 Staff
Form: This module consists of the following sub
modules
 Add Staff Information
 Add Staff Salary
 View Staff Information
 View Staff Salary Report
 Add Student Information
 Manage Student Fee
 View Student Information
 View Student Fee Report
The Students add information form is designed for the
new student’s details and course details. The student fee form
is used to enter the student’s fee details.

2.Project Category Tools & Environment

Page 14
2.1. GOALS OF PROPOSED SYSTEM:-

1. Planned approach towards working: - The working in

the organization will be well planned and organized. The
data will be stored properly in data stores, which will
help in retrieval of information as well as its storage.

2. Accuracy: - The level of accuracy in the proposed

system will be higher. All operation would be done
correctly and it ensures that whatever information is
coming from the center is accurate.

3. Reliability: - The reliability of the proposed system will

be high due to the above stated reasons. The reason for
the increased reliability of the system is that now there
would be proper storage of information.
4. No Redundancy: - In the proposed system utmost care
would be that no information is repeated anywhere, in
storage or otherwise. This would assure economic use of
storage space and consistency in the data stored.

5. Immediate retrieval of information: - The main

objective of proposed system is to provide for a quick
and efficient retrieval of information. Any type of
information would be available whenever the user
requires.

6. Immediate storage of information: - In manual system

there are many problems to store the largest amount of
information.

7. Easy to Operate: - The system should be easy to

operate and should be such that it can be developed

Page 15
 within a short period of time and fit in the limited budget
of the user.

2.2 PROJECT CATEGORY:-

The programming language used for this project is Visual Basic

6.0 which is the third-generation event-driven programming language
and integrated Development Environment(IDE) from Microsoft
VB6.0 is considered a relatively easy to learn and use programming
language, because of its graphical development features.
Visual Basic enables the Rapid Application
Development(RAD) of Graphical User Interface(GUI) applications,
access to database using Data Access Objects , or ActiveX Data
Objects, and creation of ActiveX controls and objects.

 Event-Driven Programming: In computer programming,

event-driven programming or event- based programming is a
programming paradigm in outputs or user actions (Mouse click,
Key press) or message from other programs or threads. Event-
driven programming can also be defined as an application
architecture technique in which the application has a main loop
which is clearly divided down to two sections : the first is event
selection(or event detection), and the second is event handling.

2.3 FRONT END & BACK END TOOLS :-

The concept of front end and back end has been chosen to
develop this software as this suits the DBMS architecture to its full
potential. Visual Basic has been chosen at the front end Microsoft
access has been chosen at the back end.

2.4. MICROSOFT ACCESS :-

Page 16
 Microsoft Access is database management system or DBMS
helps you to manage data that’s stored in a computer database. It is a
Full-featured Programming language and others tools for setting up
sophisticated application for yourself and your customers. Microsoft
Access is designed from the ground up to provide full support for all
windows like features you’ll find in Access are:

 64-BIT APPLICATION:- MS Access 2000 is a 64- bit

application, which means that it runs in its own protected
computer memory area. Therefore Access won’t grind to a halt
if some other program on your computer decides to misbehave.
Access also takes advantage of the multithreading capabilities of
windows, the jet database engine, Microsoft Access and
modules written for Visual Basic all run in separate there`d.

 DATABASE EXPLORER:- The database window in Access

looks and acts a lot like windows Explorer, as well as windows
that appear.

 FRONT END & BACK END SELECTION :- An important

issue for the development of a project is the selection of suitable
front-end and back-end. When we decided to develop the project
we went through an extensive study to determine the most
suitable platform that suits the needs of the organization as well
as helps in development of the project.

The aspects of our study included the following factor :

Page 17
 Front-end selection:
1. It must have a graphical user interface that assists employees
that are not from IT background.
2. Scalability and extensibility.
3. Flexibility.
4. Robustness.
5. According to the organization requirement and the culture.
6. Must provide excellent reporting features with good printing
support.
7. Platform independent.
8. Easy to debug and maintain.
9. Event driven programming facility.
10. Front end must support some popular back end like Ms Access.
According to the above stated features we selected VB6.0 as the
front-end for developing our project.

Back-end Selection:
1. Multiple user support.
2. Efficient data handling.
3. Provide inherent features for security.
4. Efficient data retrieval and maintenance.
5. Stored procedures.
6. Popularity.
7. Operating System compatible.
8. Easy to install.

Page 18
 9. Various drivers must be available.
10. Easy to implant with the Front-end.

According to above stated features we selected Ms-Access

as the backend.

The technical feasibility is frequently the most difficult area

encountered at this stage. It is essential that the process of
analysis and definition be conducted in parallel with an
assessment to technical feasibility. It centers on the existing
computer system (hardware, software etc.) and to what extent
it can support the proposed system.

2.5. DEFINITIONS OF PROBLEMS :-

Problems with conventional system:-
1. Lack of immediate retrievals: -The information is very
difficult to retrieve and to find particular information like-
E.g. - To find out about the patient’s history, the user has to
go through various registers. This results in inconvenience
and wastage of time.
2. Lack of immediate information storage: - The
information generated by various transactions takes time and
efforts to be stored at right place.
3. Lack of prompt updating: - Various changes to
information like patient details or immunization details of
child are difficult to make as paper work is involved.

Page 19
4. Error prone manual calculation: - Manual calculations
are error prone and take a lot of time this may result in
incorrect information. For example calculation of patient’s bill
based on various treatments.
5. Preparation of accurate and prompt reports: - This
becomes a difficult task as information is difficult to collect
from various registers.

2.6. ALTERNATIVE SOLUATION :-

1. Improved Manual System:-
One of the alternative solutions is the improvement of
the manual system. Anything, which can be done by using
automated methods, can be done manually. But the question
arises how to perform thing manually in a sound manner.
Following are some suggestions, which can be useful in the
manual system.
A more sophisticate register maintenance for various
Patient Information, Doctor diary, Immunization Details and a
good system for writing bill amount employees and stock
availed for the customers can be maintained at central place.
Adequate staff may be maintained so that updatation are
made at the very moment at the same time. Proper person for
proper work should be made responsible so that a better
efficiency could be achieved. This needs a lot of work force.

Page 20
2.Batch System:- Another alternative solution can be used of
computer based batch system for maintaining the information
regarding purchase details, customers and employees. A batch
system refers to a system in which data is processed in a
periodical basis.
The batch system is able to achieve most of the goals and
sub goals. But a batch system data is processed in sequential
basis. Therefore batch system is not suggested.

3.Online System:- This system (HMS) provides online

storage/ updatations and retrieval facility. This system
promises very less or no paper work and also provides help to
Doctor and operational staff.
In this system everything is stored electronically so very
less amount of paper work is required and information can be
retrieved very easily without searching here and there into
registers. This system is been discussed here.

Page 21
 3. Integrated Development Environment (IDE)

An Integrated Development Environment (IDE) also known as

integrated design environment or integrated debugging environment is
a software application that provides comprehensive facilities to
computer programmers for software development.

Project Explorer

Tool Bar
Tool Box
Menu Bar
Form Designer Form Layout
Properties Window
Integrated Development Environment (IDE) is also
commonly known as the designer environment or
program. The Visual Basic IDE is made up of
components, they are menu bar, toolbar, toolbox,
project explorer, properties window, form layout
window, form designer and object browser.

Page 23
 4.SCOPE OF THE SYSTEM
his system provides the detail structure of the
college campus and its department. This
software synchronizes the working of all the
departments. It looks on all aspects of college, its
students, facilities, departments, marks and other co
curricular activates. This software enables the easiest
way to manage all functionalities of a college, which
facilities colleges to maintain the functionality
related to college staffs and their students.
Benefits: Following are the benefits for using
College Management System:-
 For Staffs:
 Easy to create any kind of certificate.
 Easy to query all related details of student
and staff.
 Easy to generate salary of individual staff.
 For College:
 Collective records of students of all the
branches.
 Collective records of staff of all departments.
 Easy approach to find the detail information
for any student/staff.
 Easy to handle all functionality of college.
 Easy to manage all actions (generating report,
fee, salary etc).
Page 24
  All information can be synchronized in one
place and distribute to a particular department
to manage properly.
 College Management System is beneficial for
both students/staffs only in the way that they
can get all previous or current information’s
when they need.
 It is helpful to maintain the students record
(admission, fees, marks etc).
 Lecturer/Staff does not maintain the file,
documentation, reports (class wise,department
wise).
 Advantages:
 By using this software, you can learn how you
prepare your records in standard manner.
 Also you can find the previous session papers
and current news related to any student or
staffs.
 By using software, administrator can manage
all records in standard manner.
 Also it can help to get all or a particular
student fee information in proper way.

Page 25
5. OBJECTIVE OF THE
PROJECT

ain aim in developing College

Management System is to provide
an easy way not only to automate
all functionalities of a college with
the finest of details about any aspect of
college. We are management system. We
understand that college management systemis
not a product to be sold; it is a bridge between
the college and students. So we can say the
Core purpose of designing College
Management System is to manage the task
related to the schol/staffs and to reduce time to
searching of approciate candidates in college
view.
 The project being developed in Visual
Basic provides as integrated development
and debugging enviroment for debugging
of the application.

Page 26
 To gives a better user interface by
providing the user with menus for the various
operations.
 To generates report in the required
format correctly and within few seconds by
receiving the command from user. It allows
multiple tasks to execute simultaneously.

Hence the project provides a better

solution to the problem domain by
providing not only faster operation but also
by better utilization of system resources.
Therefore, it provides data integrity and
consistency, better user interfaces, support
for multitasking.

Page 27
6. NEED FOR THE PROPOSED
SYSTEM

The main objective of the existing

system is to provide a user-friendly
interface. The system, which is proposed,
now computerizes all the details that are
maintained manually. Once the details are
fed into the computer there is no need for
various persons to deal with separate
sections. Only a single person is enough to
maintain all the reports. The security can
also be given as per requirement of the
user.

 Large volumes of the data can be

stored with case
 Maintenance of file is flexible.
 Records stored are updated now and
then.
 Stored data and procedures can be
easily edited.
Page 28
 Reports can be generated with case.
 Accurate calculations are made.
 Less manpower required.

7. FEASIBILITY STUDY
esibility study is a step
towardsidentification of the candidate
system as a feasiable product. First the
studies often pre-suppose that when the
feasibility document is being prepared, the
analyst is in a position to evaluate solutions.
Second, most studies tend to overlook the
confusion inhearnt in system development – the
constraints and the assumed attitudes.

If the fesibility study is to serve as a decision

document, it must answer three questions:
 Is there a new and better way to do a job
that will benefit the user?
 What are the costs and saving of the
alternatives?
 What is recommended?

Fesibility Considerations:

Page 29
There are three key considerations to the
feaibility study:
 Economic
 Technical
 Behavioral
 Operational
 Schedule

Economical feasibility:

Economic justification is generally the “Bottom

Line” consideration for most systems.
Economic justification includes a broad range
of concerns that includes cost benefit analysis.
In this we weight the cost and the benefits
associated with the candidate system and if it
suits the basic purpose of the organization i.e.
profit making, the project is making to the
analysis and design phase.

The financial and the economic questions

during the preliminary investigation are verified
to estimate the following:
 The cost to conduct a full system
investigation.
 The cost of hardware and software for the
class of application being considered.
 The benefits in the form of reduced cost.

Page 30
 The proposed system will give the minute
information, as a result the performance
is improved which in turn may be expected to
provide increased profits.
 This feasibility checks whether the system
can be developed with the available funds. The
Hospital Management System does not require
enormous amount of money to be developed.
This can be done economically if planned
judicially, so it is economically feasible. The
cost of project depends upon the number of
manhours required.
Technical feasibility :

A study of resource availability that may

affect the ability to achieve an acceptable
system. This evaluation determines whether
the technology needed for the proposed
system is available or not.

 Can the work for the project be done

with current equipment existing software
technology & available personal?
 Can the system be upgraded if
developed?
 If new technology is needed then what
can be developed? This is concerned with
specifying equipment and software that will
Page 31
successfully satisfy the user requirement. The
technical needs of the system may include:

Front-end and back-end selection

An important issue for the development of a

project is the selection of suitable front-end
and back-end. When we decided to develop
the project we went through an extensive
study to determine the most suitable platform
that suits the needs of the organization as well
as helps in development of the project.
The aspects of our study included the
following factors.

Front-end selection:

1. It must have a graphical user interface that

assists employees that are not from IT
background.
2. Scalability and extensibility.
3. Flexibility.
4. Robustness.

Page 32
 5. According to the organization requirement
and the culture.
6. Must provide excellent reporting features
with good printing support.
7. Platform independent.
8. Easy to debug and maintain.
9. Event driven programming facility.
10. Front end must support some popular
back end like Ms Access. According to the
above stated features we selected VB6.0 as
the front-end for developing our project.

Back-end Selection:

1. Multiple user support.

2. Efficient data handling.
3. Provide inherent features for security.
4. Efficient data retrieval and maintenance.
5. Stored procedures.
6. Popularity.
7. Operating System compatible.
8. Easy to install.
9. Various drivers must be available.

Page 33
10. Easy to implant with the Front-end.
According to above stated features we selected
Ms-Access as the backend.
The technical feasibility is frequently the most
difficult area encountered at this stage. It is
essential that the process of analysis and definition
be conducted in parallel with an assessment to
technical feasibility. It centers on the existing
computer system (hardware, software etc.) and to
what extent it can support the proposed system.

Behavioral Fesibility:

The proposed system is also behaviorally

feasible as it is very user friendly.Extensive
trainning of the users is not required. The
users can easily learn to use the system and
can adapt themselves according to the system.

Operational Feasibility :

Page 34
It is mainly related to human organizations
and political aspects. The points to be
considered are:
 What changes will be brought with the
system?
 What organization structures are disturbed?
 What new skills will be required? Do the
existing staff members have these skills? If not,
can they be trained in due course of time?

The system is operationally feasible as it very easy

for the End users to operate it. It only needs basic
information about Windows platform.

Schedule feasibility :

Time evaluation is the most important

consideration in the development of project. The
time schedule required for the developed of this
project is very important since more development
time effect machine time, cost and cause delay in
the development of other systems.
A reliable College Management System can be
developed in the considerable amount of time.

ANALYSIS:
Page 35
Analysis is a detailed study of the various
operations performed by a system and their
relationships within and outside of the system. A
key question is what must be done to solve the
problem? One aspects of analysis are defining the
boundaries of the system and determining whether
or not a candidates system should consider other
related system. During analysis, data are collected
on the available files, decision points, and
transactions handled by the present system. Some
logical system models and tools that are used is
analysis. DFD interviews, onsite observations and
questionnaires are examples. The interview is a
commonly used tool in analysis. It requires special
skills and sensitivity to the subjects being
interviewed. Bias in data collection and
interpretation can be a problem. Trainning,
experience, common sense is required for
collection of the information needed to do analysis.

Once analysis is completed, the analyst has firm

understanding of what is to be done. The next step
is to decide hoe the problem might be solved.
Thus, in system design, we move from the logical
to the physical aspect of the life cycle.
DESIGN:

Page 36
The most creative and challenging phase of the
system life cycle is system design. The term design
describes a final system and the process by which
it is developed. It refers to the technical
specifications ( analogous to the engineer’s
blueprints) that will be applied in implementing the
candidate system. It also includes the construction
of the programs and program testing. The key
question here is, how should the problem be
solved? The major steps in designing are:
The first step is to determine how to the output is
to be produced and I what format. Samples of the
output ( and input) are also presented. Second,
input data and master files ( database) have to be
designed to meet the requirments of the proposed
output. The operational (processing ) phases are
handled through program construction and testing,
including a list of the programs needed to meet the
system’s objectives and complete documentation.
Finally, details related to justification of the system
and an estimate of thr impact of the candidate
system on the user and the organization are
documented and evaluated by management as a
step towards implementation.
The final report perior to the implementation phase
includes procedural flowcharts, record layouts, and
workable plans for implementing the candidate
system. Information on personnel, money,
hardware, facilities and their estimated cost must
Page 37
also be available. At this point, projected costs
must be close to actual cost of implementation.
In some firms, separated groups of programmers
do the programming where as other firm’s employ
analyst-programmers that two separated persons
carry out analysis and programming.
There are certain functions, though, that the analyst
must perform while programs are being written.

IMPLEMENTATION:

The implementation phase is less creative than

system design. It is primarily concerned with user
trainning, site preparation, and file conversion.
When the candidate system is linked to terminals
to remote sites, the telecommunication network
and test of the network along with the system are
also included under implementation.
During the final testing user acceptance is tested
followed by user trainning. Depending on the
nature of the system , extensive user trainning may
to be required. Conversion usually takes place at
about the same time the user is being trained or
later.
In the extreme, the programmer is falsely viewed
as some who thought to be isolated from other
aspects of system development. Programming is
Page 38
itself design work, however. The intial parameters
of the candidate’s system should be modified as a
result of programming efforts. Programming
provides a ‘reality test’ for assumptions made by
the analyst it is therefore a mistake to exclude
programmers from the intial system design.
System testing checks the readiness and accuracy
of the system to access update and retrieve data
from new files. Once the program becomes
available test data are read into the computer and
processed against the file provide for testing in
most conversions a parallel run is conducted where
the new system runns simultaneously with the old
system this method though costly provides added
assurance errors in the candidate system.

POST – IMPLEMENTATION AND

MAINTENANCE:

After the installation phase is completed and the

user staff is adjusted to the changes created by the
candidate system evaluation and maintenance
begin. Like any system there is an again
processthat requires periodic maintenance to
hardware and software if the new information is
inconsistent with the design speciafication then
changes have to be made. Hardware also requires

Page 39
maintenance to keep in tune with design
speciafication.

8. SYSTEMSPECIFICATION

 HARDWARE CONFIGURATION

The hardware used for the development of

the project is:

 Processor: Intel Pentium @2.16GHz

 RAM: 4.00GB (3.89 usable)
 Moniter: HD Graphics
 Hard Disk: 1 TB
 CD-Drive: Standard

Page 40
 SOFTWARE CONFIGURATION

The software used for the development of

the project is:
 Operating System: Microsoft Windows10
Home
 Enviroment: Visual Studio 6.0 @1987
 VB6.0 Framework: Version 1.0
 Language: Visual basic 6.0
 Backend: Oracle10g

 TECHNOLOGY USED

 Visual Basic – 6.0

Page 41
 FRONT END & BACK END
 Front End: Visual Basic 6.0
 Back End: Oracle 10g

9.SOFTWAREREQUIREMENT SPECIFICATION(SRS)
INTRODUCTION:
The introduction of the software Requirement
Specification states the goals and objectives of
the software, describing it in context of the
computer based system.

INFORMATION DESCRIPTION:
It provides detailed description of the problem
that the software must solve. Information
content, flow and structure are documented.
Hardware, Software and human interfaces are
described for external system elements and
internal software functions.
FUNCTIONAL DESCRIPTION:

Page 42
A processing narrative is provided for each
function, design constraints are stated justified
and performance characteristics are stated, and
one or more diagrams are included to
graphically represent the overall structure of
the software and interplay among software and
other system elements.
BEHAVIORAL DESCRIPTION:
This section of the SRS examines the
operation of software as a consequence of
external events and internally generated
control characteristics.
VALIDATION CRITERIA:
It isprobably the most important and
ironically the most often neglected section of
the software requirement specification. The
section is neglected because completing it
demands a through understanding of the
software requirement, So it is essential that
time and attentionis given to this section.
BIBLIOGRAPHY AND REFERENCE:

Page 43
It is also important to put all the important
reference at the end of the document so that
any other programmer or user can refer to
them in case of any confusion or problems

10. ANALYSIS

nalysis is the first technical step in

the process if any software
development. A careful analysis can
help the software designer and
programmer to have a better insight of the
product to be created. Acareless analysis can
result into incomplete or dyfunctional
software. To avoid such a situation it is very
important to properly indentify the required
software’s features and create an effective
design for it. It is also important to analyze and
find out whether the application being
developed suits the current hardware and
software platform available or not. The
application should be developed well within

Page 44
 time and should meet the specified
requirements. If the application being
developed suits the current hardware and
software platform available or not. The
application should be developed well within
time and should meet the specified
requirements. If the application is being
developed for commercial purpose than a cost-
benefit analysis becomes must to find out the
real value of the software product.

TECHNIQUES USED FOR ANALYSIS:

 INTERVIEWS:
The interview is the face-to-face interpersonal
meeting designed to identify relations and
capture information as it exists. It is flexible
tool, offering a better opportunity than the
questionnaire to evaluate the validity of the
information gathered. This tool is used
because it is superior technique for capturing
information as it exists and it is also an
exploratory device to identify or verify
information.
Page 45
 GUIDELINES FOR INTERVIEWS:
 Who will be interviewed?
 In what order will they be interviewed?
 What specific questions will be asked in
each interview?
Besides these, individual group discussions
can also be conducted, which can lead to some
frank expression of openions and ideas.

During interviews it should be kept in mind

that there is a proper coordination between the
interviwer so that interviews ID fruitfully
fulfilled.

 QUESTIONNAIRES:
The questionnaire is a self-administrated tool
is more economical and requires less skill to
administer than other methods. It examines a
large number of respondents at the same time,
provides standardized wording and instrutions,
and places less pressure on subjects for
immediate responses.

Page 46
11. DATA FLOW DIAGRAM(DFD)

 O- LEVEL

ADMINISTRATION

ACCESS ALL
RECORDS

COLLEGE
MANAGEMENT

SYSTEM

GENERATE
Page 47
 RECORDS

12.ENTITY RELATIONSHIP DIAGRAM(ER-

DIAGRAM)

 ER-DIAGRAM:
An entity relationship model is a detailed and
logical representation of the data for an
organisation or for business area. The entity
relationship, which is also known as ER-
Relationship is based on the theory of real
world which consist of a set of basic, which
are called entites and relationships among
these object.
The data model was developed to facilitate
database design by allowing specification of
an enterprise scheme which represents the
overall logical structure of a database. We will
present the modelling concept of ER model

Page 48
which is higher level conceptual data, the ER-
model does not provide the overall database
structure but it gives the intermediate step on
the basis of which database is designed.
The ER modelling is a technique for analysis
and logical modelling of a systems data
requirement. It uses graphical notation for
representing these.

ENTITY

WEAK ENTITY

RELATIONSHIP

Page 49
WEAK RELATIONSHIP

ATTRIBUTES

KEY ATTRIBUTES

Page 50
 Billing System Software Flow- Diagram

DOB
GENDER
DEPT&COU
DO ADD M
F_ NAME N
ADDRESS
LOGIN NAME
EMAIL

ADD STUDENT
MOBILE NO
ROL NO
STUDENT REPORT
ID

MENU STUDENT STUDENT’S FEE

STU. FEE REPORT

Course Fee AD
Other
Total DOP
VIEW STAFF INFO
DOPay VIE
Month &Year
Salary

ABOUT STAFF’S SALARY

VIE
STAFF
STAFF SALARY REPORT

VIE

EMAIL
ID ADD STAFF INFO

ADDRESS
NAME Page 51
DO JOIN
 13. SYSTEM DESIGN

The main part of designning a client/server

application is to map the requirement
identified into the features provided by the
enviroment.

DESIGN PHASE:
The design phase focuses on the detailed
implementation of the system recommended in
the feasibility study. Emphasis is on
translating performance speciafication into
design speciafication. The design phase is a
transition from a user-oriented document
(system proposal) to a document oriented to
the programmers or database personnel. The
design process is a set of iterative steps that

Page 52
allow the designer to describe all the aspects of
the software to be built, based on the user
speciafication. System design goes through
two phases: the requirements analysis phase
defines what a system must do and the design
phase states how to do it.

DATABASE DESIGN:
Dtabase design activity deals with the design
of the physical database. A key to this is how
the access paths are to be implemented.
Aphysical path is derived from a logical path.
It may be implemented through pointers,
chains or some other mechanisms. A database
is a collection of information that’s related to a
particular subject or purpose, Such as details
of a bank and the users that use it. If your
database isn’t stored on a computer, or only
parts of it are, you may be tracking
information from a varity of sources that you
will need to coordinates and organize yourself.

Page 53
FIELD:
A field is the smallest entity in the database . It
is a particular characteristic or property of a
specific person or subject.

RECORD:
A record is a collection of related fields.

TABLE:
A table is a collection of related records.
Usaually a separated table is made for
different types of subjects or porposes. The
tables can be related to obtain a working
relationship in the database.

MODULE:
The complete functions of this project are
based on the following:

Page 54
To handle these entire tasks it takes help of
following forms, which are as follows:
 Student information form
 Result form
 Staff information form
 Staff’s salary form

 Quick Search Module:

This Module contains a strong search

mechanism, which search for different ways as
per the requirement of the user. It can search.

 Different student and staff present in

different department and course provides a full
details of student.
 Student’s result present in the database.
 Staff’s salary present in the database.

Page 55
14. SYSTEM IMPLEMENTATION
 ABOUT LANGUAGE

 The Control properties

Before writing an event procedure for the
control to response to a user’s input, you have
to set certain properties for the control to
determine its appearance and how it will work
with the event procedure. You can set the
properties for the controls in the properties
window or at runtime.

Page 56
 HANDLING SOME OF THE
COMMON CONTROLS

 The Text Box:

The text box is the standard control for
accepting input from the user as well as to
display the output. It can handle string(text)
and numeric data but not images or pictures.
String in a text box can be converted to a
numeric data by using the function Val(text).
The following example illustrate a simple
program that processing the input from the
user.
Example: In this program, many text boxes
inserted into the form together with a few
labels. The two text boxes are used to display
the sum of two numbers that are entered into
the two text boxes. Besides, a command button
is also programmed to calculate the sum of the
two numbers using the plus operator. The
program use creates a variable sum to accept
the summation of valuesfrom text box 1 and

Page 57
text box 2. The procedure to calculate and to
display the output on the labelis shown below.
 Coding:
Private Sub Command1_Click()
‘To add the values in text box1 and text box2
Sum = Val(Text1.text) + (Text2.Text)
‘To display the answer on label1
Label1.Caption = Sum
End Sub

 Figure:

Page 58
 The Label
The label is very useful control for visual
Basic, as it is not only used to provide
instructions and guides to the users, it can also
be used to display outputs. One of its most
important properties is Caption. Using the
syntax Label Caption, it can display text and
numeric data. You can change its caption in
the properties window and also at runtime.

Page 59
 The Command button
The command button is one of the most
important controls as it is used to execute
commands. It displays an illusion that the
button is oressed when the user click on it. The
most common event associated with the
command button is the click event, and the
syntax for the procedure is…….
Coding
Private Sub Command1_Click()
Statements
End Sub

 The Picture Box

The Picture Box is one of the controls that are
used to handle graphics. You can load a
picture at design phase by clicking on the
picture item in the properties window and
select the picture from the selected folder. You
can also load the picture at runtime using the
Load Picture method.

Page 60
For example: The statement will load the
picture grape.gif into the picture box. you will
learn more about the picture box in future
lessons. The image in the picture box is not
resizable.
Picture1.Picture=Load
Picture(“C:\VB\Image\grape.gif”).
 The Image Box
The image box is another control that handles
images and pictures. It functions almost
identically to the picture box. However, there
is one major difference, the image in an image
box is stretchable, which means it can be
resized. This feature is not available in the
picture box. Similar to the picture box, it can
also use the load picture method to load the
picture. For example, the statement loads the
picture grape.gif into the image box.
Image1.picture = Load
picture(“C:\VB\image\grape.gif”).

Page 61
 The List Box
The function of the list box is to present a list
of items where the user can click and select the
items from the list. In order to add items to the
list, we can use the AddItem Method.
For Example: If you wish to add a number of
items to list box1, you can key in the following
statements.
Coding:
Private Sub Form Load ()
List1.Additem “Lesson1”
List1.Additem “Lesson2”
List1.Additem “Lesson3”
End Sub
The Combo Box
The function of the combo box is also to
present a list of items where the user can click
and select the items from the list. However, the
user needs to click on the small arrowhead on
the right of the combo box to see the items

Page 62
which are presented in a drop-down list, In
order to add items to the right of the combo
box to see the items which are presented in
adrop-down list. In order to add items to the
list, you can also use the Additem Method.
For Example: If you wish to add number of
items to Combo Box1, you can key in the
following statements.
Coding:
Private Sub Form_Load ()
Combo1.Additem“Item1”
Combo2.Additem“Item2”
Combo3.Additem“Item3”
End Sub
The Check Box
The check box control lets the user selects or
unselects an option. When the check box is
checked, its value is set to 1 and when it is
unchecked, the value is set to 0. You can
include the statements Check1.Value = 1 to
mark the check box and Check1.Value = 0 to
Page 63
unmark the check box , as well as use them to
initiate certain actions.
For example:
The program will change the background color
of the form to red when the check box is
unchecked and it will change to blue when the
check box is checked. You will learn about the
conditional statement If…Then…Elseif in
later lesson. Vbred and blue are color
constants and back color is the background
color property of the form.
The Option Box
The option box control also lets the user
selects one of the choices. However, two or
more option boxes must work together because
as one of the option boxes is selected at one
time .When an option box is selected, the other
option boxes will be unselected. In fact, only
one option boxcan be selected at one time.
When an option box is selected, its value is set
to “True and when it is unselected ; its value is
set to “False”. In the Following example, the

Page 64
shape control is placed in the form together
with six option boxes. When the user clicks on
different option boxes, different shapes will
appear. The values of the shape control are 0,
1, and 2, 3, 4, 5 which will make it appear as a
rectangle, a square, an oval shape, a rounded
rectangle and a rounded square respectively.
Coding
Private Sub Option1_Click ()
Shape1.shape = 0
End Sub
Private Sub Option2_Click ()
Shape1.shape = 1
End Sub
Private Sub Option3_Click ()
Shape1.shape = 2
End Sub
Private Sub Option4_Click ()
Shape1.shape = 3

Page 65
End Sub
Private Sub Option5_Click ()
Shape1.shape = 4
End Sub
Private Sub Option6_Click ()
Shape1.shape = 5
End Sub
The Message Box
One of the best functions in VB is the message
box. The message box displays a message,
optional icon, and selected set of command
buttons. The user responds by clicking a
button. The statement form of the message box
returns no value (it simply displays the box).
Example : MsgBox Message, Type, Title
Line Tool
The line tool creates simple straight line
segments of various width and color. Together
with the shape tool discussed next, You can
use this tool to ‘Dress Up’ your application.
Page 66
Shape Tool
The shape tool can create circles, ovals,
squares, rectangles, and rounded squares and
rectangles. Colors can be used and various fill
patterns are available.
Common Dialog Box
The primary user for thedrive, directory, and
file name list boxes is to develop custom file
access routines. Two common file access
routines in windows-based applications are the
open file and save file operations.
Example : cdExample.Showopen.

Page 67
 SCREEN LAYOUT
(SNAP SHOT)

ST
 WELCOME PAGE(1 Form)

Page 68
Dim a As Integer

Private Sub Command1_Click()

Form1.Hide
frmLogin.Show

End Sub

Private Sub Command2_Click()

Unload Me
End Sub

Private Sub Form_Load()

a=0
End Sub

Private Sub Timer1_Timer()

a=a+1
If a <= im1.ListImages.Count Then
Image2.Picture = im1.ListImages(a).Picture
Else
a=0
End If

End SubDim a As Integer

Private Sub Command1_Click()

Form1.Hide
frmLogin.Show

End Sub

Page 69
Private Sub Command2_Click()
Unload Me
End Sub

Private Sub Form_Load()

a=0
End Sub

Private Sub Timer1_Timer()

a=a+1
If a <= im1.ListImages.Count Then
Image2.Picture = im1.ListImages(a).Picture
Else
a=0
End If

End SubDim a As Integer

Private Sub Command1_Click()

Form1.Hide
frmLogin.Show

End Sub

Private Sub Command2_Click()

Unload Me
End Sub

Private Sub Form_Load()

a=0
End Sub

Page 70
 Private Sub Timer1_Timer()
a=a+1
If a <= im1.ListImages.Count Then
Image2.Picture = im1.ListImages(a).Picture
Else
a=0
End If

End Sub

 Login Page (Log in Form)

Option Explicit

Pankaj Page 71
Public LoginSucceeded As Boolean

Private Sub cmdCancel_Click()

Form1.Show
txtPassword.Text = ""
txtUsername.Text = ""
Unload Me
End Sub

Private Sub cmdOK_Click()

loginado.RecordSource = "select * from Users where UserName='"
+ txtUsername.Text + "'and Password='" + txtPassword.Text + "'"
loginado.Refresh
If loginado.Recordset.EOF Then
MsgBox "Login failed, Try Again ...!!!!", vbCritical, "Please Enter
Correct Username and Password"
txtUsername.Text = ""
txtPassword.Text = ""

Else
MsgBox " Login Successful", vbInformation, "Successful Attempt"

Page 72
 Form2.Show
Unload Me

End If
End Sub

Private Sub Form_Load()

txtUsername.Text = ""
txtPassword.Text = ""
End Sub

Page 73
 nd
 MENU PAGE (2 Form)

Private Sub Command1_Click()

Form2.Hide

Form1.Show

End Sub

Private Sub Command2_Click()

Form3.Show

Form2.Hide

End Sub

Private Sub Command3_Click()

Form2.Hide

Form5.Show

End Sub

Private Sub Command4_Click()

Form2.Hide

Page 74
Form9.Show

End Sub

Private Sub Command5_Click()

Form2.Hide

frmLogin.Show

frmLogin.txtUsername.Text = ""

frmLogin.txtPassword.Text = ""

End Sub

Private Sub Command6_Click()

Unload Me

End Sub

 College Staff’s Corner (3rd Page)

Private Sub Command1_Click()

Form2.Show
Unload Me

End Sub

Private Sub Command2_Click()

Page 75
Form3.Hide
Form4.Show

Form4.Command1.Visible = True
Form4.Command2.Visible = True
Form4.Command3.Visible = True
Form4.Command4.Visible = True
Form4.Command5.Visible = True
Form4.Command7.Visible = False
Form4.Command8.Visible = False

Form4.Text1.Locked = False
Form4.Text2.Locked = False
Form4.Text3.Locked = False
Form4.Text4.Locked = False
Form4.Text5.Locked = False
Form4.Text6.Locked = False
Form4.Combo1.Locked = False
Form4.Combo2.Locked = False

End Sub

Private Sub Command3_Click()

Form3.Hide
Form7.Show
Form7.Command4.Visible = True
Form7.Command5.Visible = True

End Sub

Private Sub Command4_Click()

Form3.Hide
Form4.Show
Form4.Command1.Visible = False
Form4.Command2.Visible = False
Form4.Command3.Visible = False
Form4.Command4.Visible = False
Form4.Command5.Visible = False
Form4.Command6.Visible = True
Form4.Command7.Visible = True

Page 76
 Form4.Command8.Visible = True

Form4.Text1.Locked = False
Form4.Text2.Locked = True
Form4.Text3.Locked = True
Form4.Text4.Locked = True
Form4.Text5.Locked = True
Form4.Text6.Locked = True
Form4.Combo1.Locked = True
Form4.Combo2.Locked = True
End Sub

Private Sub Command5_Click()

Form3.Hide
Form7.Show
Form7.Command4.Visible = False
Form7.Command5.Visible = False
End Sub

Private Sub Form_Load()

End Sub

Page 77
Staff’s Profile (4th Form)

Dim con As New ADODB.Connection

Dim rs As New ADODB.Recordset
Dim str As String

Private Sub Combo1_Click()

Combo2.clear
If Combo1.Text = "Administration" Then
Combo2.AddItem "College Principal"
Combo2.AddItem "Incharge-Principal"
ElseIf Combo1.Text = "BCA" Then
Combo2.AddItem "Cordinator"
Combo2.AddItem "Computer Lecturer"
Combo2.AddItem "Mathematics Lecturer"
Combo2.AddItem "English Lecturer"
Combo2.AddItem "Hindi Lecturer"
Combo2.AddItem "Clerk"
Combo2.AddItem "Peon"
Combo2.AddItem "Other Staff"
ElseIf Combo1.Text = "B.Sc." Then

Page 78
 Combo2.AddItem "Head Of Department"
Combo2.AddItem "Physics Lecturer"
Combo2.AddItem "Chemistry Lecturer"
Combo2.AddItem "Biology Lecturer"
Combo2.AddItem "Botany Lecturer"
Combo2.AddItem "Mathematics Lecturer"
Combo2.AddItem "Other Lecturer"
Combo2.AddItem "English Lecturer"
Combo2.AddItem "Hindi Lecturer"
Combo2.AddItem "Clerk"
Combo2.AddItem "Peon"
Combo2.AddItem "Other Staff"
ElseIf Combo1.Text = "B.A." Then
Combo2.AddItem "Head Of Department"
Combo2.AddItem "Geography Lecturer"
Combo2.AddItem "History Lecturer"
Combo2.AddItem "Political Science Lecturer"
Combo2.AddItem "Psychology Lecturer"
Combo2.AddItem "Economics Lecturer"
Combo2.AddItem "Other Lecturer"
Combo2.AddItem "English Lecturer"
Combo2.AddItem "Hindi Lecturer"
Combo2.AddItem "Clerk"
Combo2.AddItem "Peon"
Combo2.AddItem "Other Staff"
ElseIf Combo1.Text = "B.Com." Then
Combo2.AddItem "Head Of Department"
Combo2.AddItem "Accountant Lecturer"
Combo2.AddItem "Mathematics Lecturer"
Combo2.AddItem "Other Lecturer"
Combo2.AddItem "English Lecturer"
Combo2.AddItem "Hindi Lecturer"
Combo2.AddItem "Clerk"
Combo2.AddItem "Peon"
Combo2.AddItem "Other Staff"
Else
End If

Page 79
End Sub

Private Sub Command1_Click()

rs.AddNew
clear
End Sub
Sub clear()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
DTPicker1.Value = "01/01/2005"
Combo1.Text = "Select Department"
Combo2.Text = "Select Post"
Option1.Value = False
Option2.Value = False
DTPicker1.Value = "01/01/2005"
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Picture1.Picture = LoadPicture("")

End Sub

Private Sub Command10_Click()

rs.MoveLast
display

End Sub

Private Sub Command11_Click()

rs.Close
rs.Open "Select * from StaffInfo where StaffID='" + Text1.Text + "'",
con, adOpenDynamic, adLockPessimistic
If Not rs.EOF Then
display
reload
Else
MsgBox "Record Profile Not Found ..!!", vbInformation

Page 80
End If

End Sub
Sub reload()
rs.Close
rs.Open "Select * from StaffInfo ", con, adOpenDynamic,
adLockPessimistic
End Sub

Private Sub Command2_Click()

rs.Fields("StaffID").Value = Text1.Text
rs.Fields("SName").Value = Text2.Text
rs.Fields("FName").Value = Text3.Text
rs.Fields("DOB").Value = DTPicker1.Value
rs.Fields("Dept").Value = Combo1.Text
rs.Fields("Post").Value = Combo2.Text
If Option1.Value = True Then
rs.Fields("Gender") = Option1.Caption
Else
rs.Fields("Gender") = Option2.Caption
End If
rs.Fields("DOJ").Value = DTPicker2.Value
rs.Fields("Address").Value = Text4.Text
rs.Fields("Mobile").Value = Text5.Text
rs.Fields("Email").Value = Text6.Text
rs.Fields("Photo").Value = str
MsgBox "Data is saved successfully ...!!!", vbInformation
rs.Update

End Sub

Private Sub Command3_Click()

rs.Fields("StaffID").Value = Text1.Text
rs.Fields("SName").Value = Text2.Text
rs.Fields("FName").Value = Text3.Text
rs.Fields("DOB").Value = DTPicker1.Value
rs.Fields("Dept").Value = Combo1.Text

Page 81
 rs.Fields("Post").Value = Combo2.Text
If Option1.Value = True Then
rs.Fields("Gender") = Option1.Caption
Else
rs.Fields("Gender") = Option2.Caption
End If
rs.Fields("DOJ").Value = DTPicker2.Value
rs.Fields("Address").Value = Text4.Text
rs.Fields("Mobile").Value = Text5.Text
rs.Fields("Email").Value = Text6.Text
rs.Fields("Photo").Value = str
MsgBox "Data is updated successfully ...!!!", vbInformation
rs.Update

End Sub

Private Sub Command4_Click()

confirm = MsgBox("Do you want to delete the Student Profile", vbYesNo
+ vbCritical, "Deletion Confirmation")
If confirm = vbYes Then
rs.Delete adAffectCurrent
MsgBox "Record has been Deleted successfully", vbInformation,
"Message"
rs.Update
refreshdata
Else
MsgBox "Profile Not Deleted ...!!!", vbInformation, "Message"
End If

End Sub
Sub refreshdata()
rs.Close
rs.Open "Select * from StaffInfo", con, adOpenStatic, adLockOptimistic
If Not rs.EOF Then
rs.MoveNext
display
Else
MsgBox "No Record Found"

Page 82
End If

End Sub

Private Sub Command5_Click()

CommonDialog1.ShowOpen
CommonDialog1.Filter = "jpeg|*.jpg"
str = CommonDialog1.FileName
Picture1.Picture = LoadPicture(str)

End Sub

Private Sub Command6_Click()

Form3.Show
con.Close
Unload Me
End Sub

Private Sub Command7_Click()

rs.MovePrevious
If rs.BOF Then
rs.MoveLast
display
Else
display
End If

End Sub

Private Sub Command8_Click()

rs.MoveNext
If Not rs.BOF Then
rs.MoveFirst
display
Else
display

Page 83
End If

End Sub

Private Sub Command9_Click()

rs.MoveFirst
display

End Sub

Private Sub Form_Load()

con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=G:\My VB

Project\DataBase\StaffDBF.mdb;Mode=ReadWrite|Share Deny
None;Persist Security Info=False"
rs.Open "Select * from StaffInfo", con, adOpenDynamic,
adLockPessimistic

Combo1.AddItem "Administration"
Combo1.AddItem "BCA"
Combo1.AddItem "B.Sc."
Combo1.AddItem "B.A."
Combo1.AddItem "B.Com."
Combo1.AddItem "Intermediate(+2)"
display

End Sub
Sub display()
Text1.Text = rs!StaffID
Text2.Text = rs!SName
Text3.Text = rs!FName
DTPicker1.Value = rs!DOB
If rs!Gender = "MALE" Then
Option1.Value = True
Else
Option2.Value = True
End If
Combo1.Text = rs!Dept

Page 84
Combo2.Text = rs!Post
DTPicker2.Value = rs!DOJ
Text4.Text = rs!Address
Text5.Text = rs!Mobile
Text6.Text = rs!Email
Picture1.Picture = LoadPicture(rs!Photo)

End Sub
Dim con As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim str As String

Private Sub Combo1_Click()

Combo2.clear
If Combo1.Text = "Administration" Then
Combo2.AddItem "College Principal"
Combo2.AddItem "Incharge-Principal"
ElseIf Combo1.Text = "BCA" Then
Combo2.AddItem "Cordinator"
Combo2.AddItem "Computer Lecturer"
Combo2.AddItem "Mathematics Lecturer"
Combo2.AddItem "English Lecturer"
Combo2.AddItem "Hindi Lecturer"
Combo2.AddItem "Clerk"
Combo2.AddItem "Peon"
Combo2.AddItem "Other Staff"
ElseIf Combo1.Text = "B.Sc." Then

Combo2.AddItem "Head Of Department"

Combo2.AddItem "Physics Lecturer"
Combo2.AddItem "Chemistry Lecturer"
Combo2.AddItem "Biology Lecturer"
Combo2.AddItem "Botany Lecturer"
Combo2.AddItem "Mathematics Lecturer"
Combo2.AddItem "Other Lecturer"
Combo2.AddItem "English Lecturer"
Combo2.AddItem "Hindi Lecturer"
Combo2.AddItem "Clerk"

Page 85
Combo2.AddItem "Peon"
Combo2.AddItem "Other Staff"
ElseIf Combo1.Text = "B.A." Then
Combo2.AddItem "Head Of Department"
Combo2.AddItem "Geography Lecturer"
Combo2.AddItem "History Lecturer"
Combo2.AddItem "Political Science Lecturer"
Combo2.AddItem "Psychology Lecturer"
Combo2.AddItem "Economics Lecturer"
Combo2.AddItem "Other Lecturer"
Combo2.AddItem "English Lecturer"
Combo2.AddItem "Hindi Lecturer"
Combo2.AddItem "Clerk"
Combo2.AddItem "Peon"
Combo2.AddItem "Other Staff"
ElseIf Combo1.Text = "B.Com." Then
Combo2.AddItem "Head Of Department"
Combo2.AddItem "Accountant Lecturer"
Combo2.AddItem "Mathematics Lecturer"
Combo2.AddItem "Other Lecturer"
Combo2.AddItem "English Lecturer"
Combo2.AddItem "Hindi Lecturer"
Combo2.AddItem "Clerk"
Combo2.AddItem "Peon"
Combo2.AddItem "Other Staff"
Else
End If

End Sub

Private Sub Command1_Click()

rs.AddNew
clear
End Sub
Sub clear()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""

Page 86
DTPicker1.Value = "01/01/2005"
Combo1.Text = "Select Department"
Combo2.Text = "Select Post"
Option1.Value = False
Option2.Value = False
DTPicker1.Value = "01/01/2005"
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Picture1.Picture = LoadPicture("")

End Sub

Private Sub Command10_Click()

rs.MoveLast
display

End Sub

Private Sub Command11_Click()

rs.Close
rs.Open "Select * from StaffInfo where StaffID='" + Text1.Text + "'",
con, adOpenDynamic, adLockPessimistic
If Not rs.EOF Then
display
reload
Else
MsgBox "Record Profile Not Found ..!!", vbInformation
End If

End Sub
Sub reload()
rs.Close
rs.Open "Select * from StaffInfo ", con, adOpenDynamic,
adLockPessimistic
End Sub

Private Sub Command2_Click()

Page 87
rs.Fields("StaffID").Value = Text1.Text
rs.Fields("SName").Value = Text2.Text
rs.Fields("FName").Value = Text3.Text
rs.Fields("DOB").Value = DTPicker1.Value
rs.Fields("Dept").Value = Combo1.Text
rs.Fields("Post").Value = Combo2.Text
If Option1.Value = True Then
rs.Fields("Gender") = Option1.Caption
Else
rs.Fields("Gender") = Option2.Caption
End If
rs.Fields("DOJ").Value = DTPicker2.Value
rs.Fields("Address").Value = Text4.Text
rs.Fields("Mobile").Value = Text5.Text
rs.Fields("Email").Value = Text6.Text
rs.Fields("Photo").Value = str
MsgBox "Data is saved successfully ...!!!", vbInformation
rs.Update

End Sub

Private Sub Command3_Click()

rs.Fields("StaffID").Value = Text1.Text
rs.Fields("SName").Value = Text2.Text
rs.Fields("FName").Value = Text3.Text
rs.Fields("DOB").Value = DTPicker1.Value
rs.Fields("Dept").Value = Combo1.Text
rs.Fields("Post").Value = Combo2.Text
If Option1.Value = True Then
rs.Fields("Gender") = Option1.Caption
Else
rs.Fields("Gender") = Option2.Caption
End If
rs.Fields("DOJ").Value = DTPicker2.Value
rs.Fields("Address").Value = Text4.Text
rs.Fields("Mobile").Value = Text5.Text
rs.Fields("Email").Value = Text6.Text
rs.Fields("Photo").Value = str

Page 88
MsgBox "Data is updated successfully ...!!!", vbInformation
rs.Update

End Sub

Private Sub Command4_Click()

confirm = MsgBox("Do you want to delete the Student Profile", vbYesNo
+ vbCritical, "Deletion Confirmation")
If confirm = vbYes Then
rs.Delete adAffectCurrent
MsgBox "Record has been Deleted successfully", vbInformation,
"Message"
rs.Update
refreshdata
Else
MsgBox "Profile Not Deleted ...!!!", vbInformation, "Message"
End If

End Sub
Sub refreshdata()
rs.Close
rs.Open "Select * from StaffInfo", con, adOpenStatic, adLockOptimistic
If Not rs.EOF Then
rs.MoveNext
display
Else
MsgBox "No Record Found"
End If

End Sub

Private Sub Command5_Click()

CommonDialog1.ShowOpen
CommonDialog1.Filter = "jpeg|*.jpg"
str = CommonDialog1.FileName
Picture1.Picture = LoadPicture(str)

Page 89
End Sub

Private Sub Command6_Click()

Form3.Show
con.Close
Unload Me
End Sub

Private Sub Command7_Click()

rs.MovePrevious
If rs.BOF Then
rs.MoveLast
display
Else
display
End If

End Sub

Private Sub Command8_Click()

rs.MoveNext
If Not rs.BOF Then
rs.MoveFirst
display
Else
display
End If

End Sub

Private Sub Command9_Click()

rs.MoveFirst
display

End Sub

Page 90
Private Sub Form_Load()

con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=G:\My VB

Project\DataBase\StaffDBF.mdb;Mode=ReadWrite|Share Deny
None;Persist Security Info=False"
rs.Open "Select * from StaffInfo", con, adOpenDynamic,
adLockPessimistic

Combo1.AddItem "Administration"
Combo1.AddItem "BCA"
Combo1.AddItem "B.Sc."
Combo1.AddItem "B.A."
Combo1.AddItem "B.Com."
Combo1.AddItem "Intermediate(+2)"
display

End Sub
Sub display()
Text1.Text = rs!StaffID
Text2.Text = rs!SName
Text3.Text = rs!FName
DTPicker1.Value = rs!DOB
If rs!Gender = "MALE" Then
Option1.Value = True
Else
Option2.Value = True
End If
Combo1.Text = rs!Dept
Combo2.Text = rs!Post
DTPicker2.Value = rs!DOJ
Text4.Text = rs!Address
Text5.Text = rs!Mobile
Text6.Text = rs!Email
Picture1.Picture = LoadPicture(rs!Photo)

End Sub

Page 91
 Staff’s Salary Information(7th Page)

Dim con1 As New ADODB.Connection

Dim rs1 As New ADODB.Recordset
Dim str As String

Private Sub Command1_Click()

Page 92
Form3.Show

Form7.Hide

End Sub

Private Sub Command2_Click()

Form7.Hide
frmLogin.Show
frmLogin.txtUsername.Text = ""
frmLogin.txtPassword.Text = ""

End Sub

Private Sub Command3_Click()

rs1.Close
rs1.Open "Select * from StaffInfo where StaffID='" +
Text1.Text + "'", con1, adOpenDynamic, adLockPessimistic
If Not rs1.EOF Then
display
reload
Else
MsgBox "Record Profile Not Found ..!!", vbInformation
End If

End Sub

Private Sub Command4_Click()

confirm = MsgBox("Do you confirm want to pay the Salary
Amount", vbYesNo + vbInformation, "Payment Confirmation")
If confirm = vbYes Then
rs1.Fields("StaffID").Value = Text1.Text
rs1.Fields("Salary").Value = Text2.Text
rs1.Fields("SalaryMonth").Value = Combo1.Text

Page 93
rs1.Fields("SalaryYear").Value = Combo2.Text
rs1.Fields("DOPayment").Value = DTPicker2.Value
MsgBox "Salary Amount has been Paid successfully",
vbInformation, "Message"
rs1.Update
Else
MsgBox "Salary Amount has Not been Paid ...!!!",
vbInformation, "Message"

End If
rs1.Fields.Refresh
End Sub

Private Sub Command5_Click()

Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Label8.Caption = ""
Label9.Caption = ""
Combo1.Text = "Month"
Combo2.Text = "Year"
Text4.Text = ""
End Sub

Private Sub Command6_Click()

Command1.Visible = False
Command2.Visible = False
Command3.Visible = False
Command4.Visible = False
Command5.Visible = False
Command6.Visible = False
Form7.PrintForm
Command1.Visible = True
Command2.Visible = True
Command3.Visible = True

Page 94
Command4.Visible = True
Command5.Visible = True
Command6.Visible = True
End Sub

Private Sub Form_Load()

con1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=G:\My VB
Project\DataBase\StaffDBF.mdb;Mode=ReadWrite|Share Deny
None;Persist Security Info=False"
rs1.Open "Select * from StaffInfo", con1, adOpenDynamic,
adLockPessimistic
DTPicker2.Value = Date

Combo1.AddItem "January"
Combo1.AddItem "February"
Combo1.AddItem "March"
Combo1.AddItem "April"
Combo1.AddItem "May"
Combo1.AddItem "June"
Combo1.AddItem "July"
Combo1.AddItem "August"
Combo1.AddItem "September"
Combo1.AddItem "October"
Combo1.AddItem "November"
Combo1.AddItem "December"
Combo2.AddItem "2018"
Combo2.AddItem "2019"
Combo2.AddItem "2020"
Combo2.AddItem "2021"
Combo2.AddItem "2022"
Combo2.AddItem "2023"
Combo2.AddItem "2024"
Combo2.AddItem "2025"
Combo2.AddItem "2026"

Page 95
 Combo2.AddItem "2027"
Combo2.AddItem "2028"
Combo2.AddItem "2029"
Combo2.AddItem "2030"
Combo2.AddItem "2031"
Combo2.AddItem "2032"
Combo2.AddItem "2033"
Combo2.AddItem "2034"
Combo2.AddItem "2035"
Combo2.AddItem "2036"
Combo2.AddItem "2037"
Combo2.AddItem "2038"
Combo2.AddItem "2039"
Combo2.AddItem "2040"
Combo2.AddItem "2041"
End Sub
Sub display()
Text1.Text = rs1!StaffID
Label8.Caption = rs1!SName
Label9.Caption = rs1!FName
Text4.Text = rs1!Mobile
DTPicker1.Value = rs1!DOB
Text3.Text = ""
Picture1.Picture = LoadPicture(rs1!Photo)

End Sub
Sub reload()
rs1.Close
rs1.Open "Select * from StaffInfo ", con1, adOpenDynamic,
adLockPessimistic
End Sub

Private Sub Text3_Click()

Text3.Text = Val(Text2.Text)
End Sub

Page 96
Page 97
 Student’s corner( 5th Page)

Private Sub Command1_Click()

Form2.Show
Unload Me
End Sub

Private Sub Command2_Click()

Form6.Show

Form6.Text1.Locked = False
Form6.Text2.Locked = False
Form6.Text3.Locked = False
Form6.Text4.Locked = False
Form6.Text5.Locked = False
Form6.Text6.Locked = False
Form6.Text7.Locked = False

Form6.Combo1.Locked = False
Form6.Combo2.Locked = False
Form6.Combo3.Locked = False
Form6.Command2.Visible = True
Form6.Command3.Visible = True
Form6.Command4.Visible = True
Form6.Command5.Visible = True
Form6.Command6.Visible = True
Form6.Command7.Visible = True
Form6.Command8.Visible = True
Form6.Printer.Visible = False

Form6.Command9.Visible = True
Form6.Command10.Visible = True
Form6.Command11.Visible = True

End Sub

Private Sub Command3_Click()

Form5.Hide

Page 98
Form6.Show
Form6.Command1.Visible = True
Form6.Command2.Visible = False
Form6.Command3.Visible = False
Form6.Command4.Visible = False
Form6.Command5.Visible = False
Form6.Command6.Visible = False
Form6.Command7.Visible = True
Form6.Command8.Visible = True
Form6.Command9.Visible = True
Form6.Command10.Visible = True
Form6.Command11.Visible = True
Form6.Printer.Visible = True

Form6.Text1.Locked = False
Form6.Text2.Locked = True
Form6.Text3.Locked = True
Form6.Text4.Locked = True
Form6.Text5.Locked = True
Form6.Text6.Locked = True
Form6.Text7.Locked = True

Form6.Combo1.Locked = True
Form6.Combo2.Locked = True
Form6.Combo3.Locked = True

End Sub

Private Sub Command4_Click()

Form5.Hide
Form8.Show
Form8.Command4.Visible = True
Form8.Command5.Visible = True
End Sub

Private Sub Command5_Click()

Form5.Hide
Form8.Show
Form8.Command4.Visible = False
Form8.Command5.Visible = False

End Sub

Page 99
 Student Management (6th Page)

Dim con2 As New ADODB.Connection

Dim rs2 As New ADODB.Recordset
Dim str2 As String

Private Sub Combo1_Click()

Combo2.clear
Combo3.clear
If Combo1.Text = "Vocational" Then
Combo2.AddItem "Batchelor Of Computer Appl."
Combo3.AddItem "Semester/Part-I"
Combo3.AddItem "Semester/Part-II"

Page 100
Combo3.AddItem "Semester/Part-III"
Combo3.AddItem "Semester-IV"
Combo3.AddItem "Semester-V"
Combo3.AddItem "Semester-VI"
ElseIf Combo1.Text = "Batchelor Of Science" Then
Combo2.AddItem "Physics"
Combo2.AddItem "Chemistry"
Combo2.AddItem "Botany"
Combo2.AddItem "Zoology"
Combo2.AddItem "Mathematics"
Combo2.AddItem "Other Subject"
Combo3.AddItem "Semester/Part-I"
Combo3.AddItem "Semester/Part-II"
Combo3.AddItem "Semester/Part-III"
Combo3.AddItem "Semester-IV"
Combo3.AddItem "Semestert-V"
Combo3.AddItem "Semester-VI"
ElseIf Combo1.Text = "Batchelor Of Arts" Then
Combo2.AddItem "Hindi"
Combo2.AddItem "English"
Combo2.AddItem "Geography"
Combo2.AddItem "History"
Combo2.AddItem "Psychology"
Combo2.AddItem "Sociology"
Combo2.AddItem "Economics"
Combo2.AddItem "Home Science"
Combo2.AddItem "Political Science"
Combo2.AddItem "Philosophy"
Combo2.AddItem "Music"
Combo2.AddItem "Other Subject"
Combo3.AddItem "Semester/Part-I"
Combo3.AddItem "Semester/Part-II"
Combo3.AddItem "Semester/Part-III"
Combo3.AddItem "Semester-IV"
Combo3.AddItem "Semestert-V"
Combo3.AddItem "Semester-VI"
ElseIf Combo1.Text = "Batchelor Of Commerce" Then
Combo2.AddItem "Accountancy"
Combo2.AddItem "B.O."
Combo2.AddItem "Pr. Eco."

Page 101
Combo2.AddItem "Other Subject"
Combo3.AddItem "Semester/Part-I"
Combo3.AddItem "Semester/Part-II"
Combo3.AddItem "Semester/Part-III"
Combo3.AddItem "Semester-IV"
Combo3.AddItem "Semestert-V"
Combo3.AddItem "Semester-VI"
ElseIf Combo1.Text = "Intermediate" Then
Combo2.AddItem "Intermediate Of Science"
Combo2.AddItem "Intermediate Of Arts"
Combo2.AddItem "Intermediate Of Commerce"
Combo3.AddItem "Intermediate-XI"
Combo3.AddItem "Intermediate-XII"
Else
End If

End Sub

Private Sub Command1_Click()

Form5.Show
con2.Close
Unload Me
End Sub

Private Sub Command10_Click()

rs2.MoveLast
display

End Sub

Private Sub Command11_Click()

rs2.Close
rs2.Open "Select * from StudentProfile where StudentID='" + Text1.Text + "'",
con2, adOpenDynamic, adLockPessimistic
If Not rs2.EOF Then
display
reload
Else
MsgBox "Record Profile Not Found ..!!", vbInformation

Page 102
End If

End Sub
Sub reload()
rs2.Close
rs2.Open "Select * from StudentProfile ", con2, adOpenDynamic,
adLockPessimistic
End Sub

Private Sub Command2_Click()

rs2.AddNew
clear

End Sub
Sub clear()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
DTPicker1.Value = "01/01/1995"
Combo1.Text = "Select Department"
Combo2.Text = "Select Course/Hons."
Combo3.Text = "Select Semester/Part"
Option1.Value = False
Option2.Value = False
DTPicker2.Value = "01/01/2015"
Picture1.Picture = LoadPicture("")
End Sub

Private Sub Command3_Click()

rs2.Fields("StudentID").Value = Text1.Text
rs2.Fields("SName").Value = Text2.Text
rs2.Fields("FName").Value = Text3.Text
rs2.Fields("DOB").Value = DTPicker1.Value
rs2.Fields("Dept").Value = Combo1.Text

Page 103
rs2.Fields("Course").Value = Combo2.Text
rs2.Fields("Semester").Value = Combo3.Text
If Option1.Value = True Then
rs2.Fields("Gender") = Option1.Caption
Else
rs2.Fields("Gender") = Option2.Caption
End If
rs2.Fields("DOAdm").Value = DTPicker2.Value
rs2.Fields("Address").Value = Text4.Text
rs2.Fields("Mobile").Value = Text5.Text
rs2.Fields("Email").Value = Text6.Text
rs2.Fields("Roll").Value = Text7.Text
rs2.Fields("Photo").Value = str2
MsgBox "Data is saved successfully ...!!!", vbInformation
rs2.Update
End Sub

Private Sub Command4_Click()

rs2.Fields("StudentID").Value = Text1.Text
rs2.Fields("SName").Value = Text2.Text
rs2.Fields("FName").Value = Text3.Text
rs2.Fields("DOB").Value = DTPicker1.Value
rs2.Fields("Dept").Value = Combo1.Text
rs2.Fields("Course").Value = Combo2.Text
rs2.Fields("Semester").Value = Combo3.Text
If Option1.Value = True Then
rs2.Fields("Gender") = Option1.Caption
Else
rs2.Fields("Gender") = Option2.Caption
End If
rs2.Fields("DOAdm").Value = DTPicker2.Value
rs2.Fields("Address").Value = Text4.Text
rs2.Fields("Mobile").Value = Text5.Text
rs2.Fields("Email").Value = Text6.Text
rs2.Fields("Roll").Value = Text7.Text
rs2.Fields("Photo").Value = str2
rs2.Update
MsgBox "Record is Updated successfully ...!!!", vbInformation

Page 104
End Sub

Private Sub Command5_Click()

confirm = MsgBox("Do you want to delete the Student Profile", vbYesNo +
vbCritical, "Deletion Confirmation")
If confirm = vbYes Then
rs2.Delete adAffectCurrent
MsgBox "Record has been Deleted successfully", vbInformation, "Message"
rs2.Update
refreshdata
Else
MsgBox "Profile Not Deleted ...!!!", vbInformation, "Message"
End If

End Sub
Sub refreshdata()
rs2.Close
rs2.Open "Select * from StudentProfile", con2, adOpenStatic, adLockOptimistic
If Not rs2.EOF Then
rs2.MoveNext
display
Else
MsgBox "No Record Found"
End If
End Sub

Private Sub Command6_Click()

CommonDialog1.ShowOpen
CommonDialog1.Filter = "jpeg|*.jpg"
str2 = CommonDialog1.FileName
Picture1.Picture = LoadPicture(str2)

End Sub

Private Sub Command7_Click()

rs2.MovePrevious
If rs2.BOF Then
rs2.MoveLast
display
Else

Page 105
display
End If
End Sub

Private Sub Command8_Click()

rs2.MoveNext
If Not rs2.EOF Then
rs2.MoveFirst
display
Else
display
End If

End Sub

Private Sub Command9_Click()

rs2.MoveFirst
display
End Sub

Private Sub Form_Load()

con2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=G:\My VB
Project\DataBase\StudentDBF.mdb;Persist Security Info=False"
rs2.Open "Select * from StudentProfile", con2, adOpenDynamic,
adLockPessimistic

Combo1.AddItem "Vocational"
Combo1.AddItem "Batchelor Of Science"
Combo1.AddItem "Batchelor Of Arts"
Combo1.AddItem "Batchelor Of Commerce"
Combo1.AddItem "Intermediate"

Text1.Locked = False
Text2.Locked = False
Text3.Locked = False
Text4.Locked = False
Text5.Locked = False
Text6.Locked = False
Combo1.Locked = False
Combo2.Locked = False

Page 106
Command2.Visible = True
Command3.Visible = True
Command4.Visible = True
Command5.Visible = True
Command6.Visible = True
Command7.Visible = True
Command8.Visible = True
'display

End Sub
Sub display()
Text1.Text = rs2!StudentID
Text2.Text = rs2!SName
Text3.Text = rs2!FName
Text4.Text = rs2!Address
Text5.Text = rs2!Mobile
Text6.Text = rs2!Email
Text7.Text = rs2!Roll
DTPicker1.Value = rs2!DOB
If rs2!Gender = "MALE" Then
Option1.Value = True
Else
Option2.Value = True
End If
Combo1.Text = rs2!Dept
Combo2.Text = rs2!Course
Combo3.Text = rs2!Semester
DTPicker2.Value = rs2!DOAdm
Picture1.Picture = LoadPicture(rs2!Photo)
End Sub

Private Sub printer_Click()

Command1.Visible = False
Command7.Visible = False
Command8.Visible = False
Command9.Visible = False
Command10.Visible = False
Command11.Visible = False

Page 107
printer.Visible = False
Me.PrintForm
Command1.Visible = True
Command7.Visible = True
Command8.Visible = True
Command9.Visible = True
Command10.Visible = True
Command11.Visible = True
printer.Visible = True

End Sub

Page 108
 Student’s Fee Information Desk (8th Page)

Dim con2 As New ADODB.Connection

Dim rs2 As New ADODB.Recordset
Dim str2 As String

Private Sub Cancel_Click()

Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Label13.Caption = ""
Label14.Caption = ""
Label15.Caption = ""
Label16.Caption = ""
Label17.Caption = ""
Label21.Caption = ""
Picture2.Picture = LoadPicture("")
DTPicker2.Value = Date
End Sub

Private Sub Command1_Click()

Page 109
Form5.Show
con2.Close
Unload Me
End Sub

Private Sub Command2_Click()

Form8.Hide
frmLogin.Show
frmLogin.txtUsername.Text = ""
frmLogin.txtPassword.Text = ""
End Sub

Private Sub Command3_Click()

rs2.Close
rs2.Open "Select * from StudentProfile where StudentID='" +
Text1.Text + "'", con2, adOpenDynamic, adLockPessimistic
If Not rs2.EOF Then
display
reload

If Label15.Caption = "Vocational" Then

Text2.Text = "11000"
ElseIf Label15.Caption = "Batchelor Of Science" Then
Text2.Text = "2200"
ElseIf Label15.Caption = "Batchelor Of Arts" Then
Text2.Text = "1600"
ElseIf Label15.Caption = "Batchelor Of Commerce" Then
Text2.Text = "1550"
ElseIf Label16.Caption = "Intermediate Of Science" Then
Text2.Text = "1800"
ElseIf Label16.Caption = "Intermediate Of Arts" Then
Text2.Text = "1500"
ElseIf Label16.Caption = "Intermediate Of Commerce" Then
Text2.Text = "1450"

Page 110
End If

Else
MsgBox "Record Profile Not Found ..!!", vbInformation
End If
End Sub

Private Sub Command4_Click()

'rs2.Fields("StudentID").Value = Text1.Text
rs2.Fields("CourseFee").Value = Text2.Text
rs2.Fields("OtherFee").Value = Text3.Text
rs2.Fields("Total").Value = Text4.Text
rs2.Fields("DOPay").Value = DTPicker2.Value
rs2.Update
MsgBox "Payment has been completed successfully ...!!!",
vbInformation

End Sub

Private Sub Command5_Click()

Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Label13.Caption = ""
Label14.Caption = ""
Label15.Caption = ""
Label16.Caption = ""
Label17.Caption = ""
Label21.Caption = ""
Picture2.Picture = LoadPicture("")
DTPicker2.Value = Date

End Sub

Page 111
Private Sub Command6_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Label13.Caption = ""
Label14.Caption = ""
Label15.Caption = ""
Label16.Caption = ""
Label17.Caption = ""
Label21.Caption = ""
Picture2.Picture = LoadPicture("")
DTPicker2.Value = Date
End Sub

Private Sub exi_Click(Index As Integer)

Form8.Hide
End Sub

Private Sub Form_Load()

con2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=G:\My VB Project\DataBase\StudentDBF.mdb;Persist
Security Info=False"
rs2.Open "Select * from StudentProfile", con2, adOpenDynamic,
adLockPessimistic

DTPicker1.Value = Date
DTPicker2.Value = Date

End Sub
Sub display()
Text1.Text = rs2!StudentID
Label13.Caption = rs2!SName

Page 112
Label14.Caption = rs2!FName
Label15.Caption = rs2!Dept
Label16.Caption = rs2!Course
Label17.Caption = rs2!Semester
Label21.Caption = rs2!Roll
DTPicker1.Value = rs2!DOB
Picture2.Picture = LoadPicture(rs2!Photo)
If rs2!CourseFee = "11000" Or rs2!CourseFee = "2200" Or
rs2!CourseFee = "1600" Or rs2!CourseFee = "1550" Or
rs2!CourseFee = "1800" Or rs2!CourseFee = "1500" Or
rs2!CourseFee = "1450" Then
Text2.Text = rs2!CourseFee
Text3.Text = rs2!OtherFee
Text4.Text = rs2!Total
DTPicker2.Value = rs2!DOPay
End If

End Sub
Sub reload()
rs2.Close
rs2.Open "Select * from StudentProfile ", con2, adOpenDynamic,
adLockPessimistic
End Sub

Private Sub printer_Click()

Command1.Visible = False
Command2.Visible = False
Command3.Visible = False
Command4.Visible = False
Command5.Visible = False
Command6.Visible = False
printer.Visible = False
Label19.Visible = True

Page 113
Me.PrintForm
Label19.Visible = False
Command1.Visible = True
Command2.Visible = True
Command3.Visible = True
Command4.Visible = True
Command5.Visible = True
Command6.Visible = True
printer.Visible = True

End Sub

Private Sub Save_Click()

'rs2.Fields("StudentID").Value = Text1.Text
rs2.Fields("CourseFee").Value = Text2.Text
rs2.Fields("OtherFee").Value = Text3.Text
rs2.Fields("Total").Value = Text4.Text
rs2.Fields("DOPay").Value = DTPicker2.Value
rs2.Update
MsgBox "Payment has been completed successfully ...!!!",
vbInformation
End Sub

Private Sub Text4_Click()

Text4.Text = (Val(Text2.Text) + Val(Text3.Text))
End Sub

Page 114
 About (9th Page)

Private Sub Command1_Click()

Form2.Show
Unload Me
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
Private Sub Label17_Click()
Form9.Hide
Form10.Show
End Sub Private Sub Command1_Click()
Form2.Show
Unload Me
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
Private Sub Label17_Click()
Form9.Hide
Form10.Show
End Sub

Page 115
 Photo Gallery (10th page)

Dim a As Integer

Private Sub Command1_Click()

Form9.Show

Unload Me

End Sub

Private Sub Command2_Click()

Form10.Hide

Form1.Show

End Sub

Page 116
Private Sub Command3_Click()

Command1.Visible = False

Command2.Visible = False

Command3.Visible = False

Form10.PrintForm

Command1.Visible = True

Command2.Visible = True

Command3.Visible = True

End Sub

Private Sub Form_Load()

a=0

End Sub

Private Sub Timer1_Timer()

a=a+1

If a <= im1.ListImages.Count Then

Image1.Picture = im1.ListImages(a).Picture

Else

a=0

End If

End Sub

Page 117
 16. TESTING
Software testing is a critical element of software
quality assurance and represents the ultimate
review application, design and coding. The aim of
testing process is to identify all defects existing in
a software product. Testing provides a practical
way of reducing defects in a system and increasing
the user’s confidence in a developed system.
 TESTING OBJECTIVE:
 Testing is a process of executing a program
with a program the intent of finding of error.

Page 118
 A good test case is one of that has a high
probability of finding as yet undiscovered error.
 A successful test is one of that uncovera as an
yet undiscovered error.
The objective is to design test cases that
systemically uncover different. Classes of error
and do so with a minimum amount of time and
effort.
This process has two parts:-
a) Planning :- This involves writing and
reviewing unit, integration, functional, validation
and acceptance test plans.
b) Execution :- This involves executing these
test plans, measuring, collection data and
verifying if its meets the quality criteria.
Data collected is used to make appropriate
changes in the plans related to developments and
testing. The quality of a product or item can be
archieved by ensuring that the product meets the
requirements by planning and conducting the
following tests at various stages.
The main types of software testing are :-

Page 119
  Components :-
Starting from the buttons the first level is
“Component Testing”, sometimes called unit
testing. It involves checking that each specified in
the “ Component Design” has been implemented
in the component. In theory an independent
tester should do this, but in practice the developer
usually does it, as they are the only people who
understand how a components work. The problem
with a component is that it performs only a small
part of functionality of a system, and it realies on
co-operative with other parts of the system, which
may not have been built yet. To cover come this,
the developer either builds, or uses special
software to trick the component into believing it is
working in a fully functional system.

In our project we perform three levels of testing :-

a. Unit Testing
b. Integration Testing
c. System Testing

i. Unit Testing :-

Page 120
 In unit testing we tested different modules of
system in isolation. To test a program we provide
set of inputs to program and observe whether it
behaves as expected. In unit testing we white-box
approach to develop the test cases.

ii. Integration Testing :-

During integration testing we integrated both
modules of system using integration plan. In
integration testing we tested the module
interfaces. For integration testing we used mixed
approach to test the modules. We use
incremental approach to integrated the syatem
modules. We use incremental approach to
integrate the system module.

iii. System Testing :-

System testing is actually series of test whose
primary purpose is to fully exercise the project.
We performed three type of system testing.

(a) Validation Testing

(b) Recovery Testing
(c) Security Testing

Page 121
(a) Validation Testing :-
The purpose of validation testing is to know
whether requirements of project are fulfilled or
not. For this we perform two type of testing.
1. Alpha Testing
2. Beta Testing

1. Alpha Testing :-
For alpha testing we simulated the required
environment within the organization and uses the
system.

2. Beta Testing :-
For beta testing we launch the system temporarily
and test it from outside the organization.
(b) Recovery Testing :-
In recovery testing we forced the project to fail in
variety of ways and verify that recovery is
performed properly. Here the recovery testing has
been done from all the aspects including
automatic reinstallation, check pointing

Page 122
mechanism, data recovery etc. All the above
points are evaluated for correctness.

(c) Security Testing :-

Security testing attempts to verify that protection
mechanism built into a system evil in fact protect
it from improper penetration. Here we are testing
that any unauthorized user could not change the
information of website. The project has been
throughly processed through security testing and
given enough time and resources for testing the
penetration into the project.

Page 123
 CONCLUSION

 ADVANTAGES OF THE PROJECT :-

The system has the following advantages :
 The data can be maintained and updated
easily with minimum efforts.

 The complex reports were generated easily

and without any delay so that important decisions
regarding to control the exam deficit, recovery of

Page 124
data, and declaration proof the results can be
done without any delay.

 The allocation of the examination schedule is

immediately provided to the students as earlier.

 Various kinds of queries put in by the

administration can be answered immediately.

 Various level of security is maintained for the

information at the most.

 Grouping and sorting of the records is

maintained.
 Fast retrieval of information regarding the
examination can be done.

Deficiencies :-
Of course we cannot claim to have the best
flexible information system, but all the same we
do have the most flexible information system that

Page 125
can be implemented in most of the organization.
Almost all the aspects that are existing in the
current manual system has been taken to a
number of accounts. The system is very much user
friendly. Even without having working experience
of the system, it can be handled in a very efficient
manner. The screen are adjusted in a structured
hierarchical manner such that one can move from
one screen to the another easily with the help of
menu.

Limitations :-

 The software is not centralized.

 The billing module does work for floating
point numbers.
 There is not payroll system for the employee.
 Each and every department works
independently.
 This software does not provide backup.
 The hotel personal expenses billing is
generated on monthly basis.
Page 126
Future Application of the Project :-

By this time according to the user we have

completed all the requirements but still there are
some section which can be computerized in this
system and after that one can say it is a fully
completed “”Hospital management System”.

It will be save money according to its performance

also will be helpful fast accessing of the
organization.

BIBLIOGRAPHY :-

 Visual Basic 6.0 in 21 days, Author :- Greg

M.Perry, Publisher :- SAMS.

 Aptech Academy Books, Author :- Valery V

Shmelef.

 6.0 VB Completed reference by Paul Sheriff.

Page 127
 www.sourcecode.com

Page 128