CHAPTER 1

Objective and scope of the Project

Page | 1
OBJECTIVES AND SCOPE OF PROJECT
Objective:
The purpose of the project entitled “AGRICULTURE SHOP MANAGEMENT”
is providing basic objective are to extend their reach to geographically
scattered location and widely used in many AGRICULTURE SHOP and is
used to cater the need of the sales system there.
Scope:
The scope of the AGRICULTURE SHOP MANAGEMENT project is as
follows:

This project maintains / controls most of the activities happening in

AGRICULTURE SHOP MANAGEMENT. This maintains and controls the
stock detail and does billing and generates various reports.

Page | 2
CHAPTER 2

Introduction

Page | 3
INTRODUCTION

This project is aimed to develop the “Agriculture shop

management” administration system, which is used to simplify the
maintenance of the complete detail of product, inventory, customer, billing,
delivery of goods, etc.

This project is a widely used in many big ” Agriculture shop

management” and is used to cater the need of the sales system there. This is
a system and is used to maintain / control most of the activities happening in
agriculture. This maintains and controls the stock detail and does billing and
generates various Reports.

The objective of this project is to develop the “Agriculture shop

management” administration system, which is used to simplify the
maintenance of the agriculture shop management database. At the same
time, it is very convenient for customer and management, because this
system provides a brief description of customer billing, delivery of goods
and other aspects.The biggest advantage of this system is that we can save
all the data in the digital format in hard disk and with only one click, all the
information about the product, customer and delivery etc.

Page | 4
 CHAPTER 3

Theoretical Background of Project

Page | 5
PROPOSED SYSTEM:-

Shop management software is a unique tool for managing your retail shop
database effectively. With this easy-to-use application you get a great
opportunity to administer your categories, products, suppliers, customers,
orders, sales, RMA/RTV etc. This all-in-one solution will help manage your
shop and saves two or more hours each day by automating and simplifying
your everyday operations.

This project is a widely used in many big“agriculture related shop”

and is used to cater the need of the sales system there. This is a system and is
used to maintain / control most of the activities happening in agriculture.
This maintains and controls the stock detail and does billing and generates
various Reports. Other benefits of shop managements are described below,

1. Quality management – the nature of durable and non-durable goods

is that issues and errors do occur. Delivery can be delayed, fill rates
can lag, packages can be broken. Shop management software
identifies and tracks the various issues that could occur, and through
reports and analytics, provides guidance regarding the factors
impacting quality.
2. Forecasting and planning – Shop management software not only
manages "optimal" stock levels at the warehouse, but can also predict
your future capacity requirements. Through insights provided by the
software, you may identify the viability of opening multiple regional
warehouses located near key customers to increase efficiencies and
improve service levels.

Page | 6
 3. Cost management – any product sitting on the shelf is a liability that
picks away at your business profitability. By managing your stock
requirements in real-time and increasing inventory turns, your
business can make the most out of existing shelf space to improve
margins.
4. Efficiency and customer service – optimizing your inventory
processes can reduce the amount of time to replenish stock, process
shipments or delivery, and serve your customers (i.e. "pick, pack, and
ship"). All of these efficiency improvements are recognizes without
sacrificing quality or increasing head count.
5. Scale – as your business grows you will need software that grows
with you. Shop management software ensures growth without adding
a significant amount of hardware or system expenses. If you enter
new markets, introduce new products, or expand your customer base –
the right shop management software solution keeps pace with your
business.

Advantages:

 Planned approach towards working: the working in the organization

will be planned well and organized. The data will store properly in the
database which will help in retrieval of information as well as storage.
 Accuracy: The level of accuracy in the proposed system will be higher.
All operation would be correctly done and it ensures that whatever
information is coming from the centre is correct.

Page | 7
 Immediate retrieval of information: The data retrieval is just a click
away rather than goin through lot of registers the whole day. It also saves
a lot of time.
 Immediate storage of information: Data is easy to store and can be
saved with no difficulty.
 Easy to handle: The system is not physically bulky so it is easy to
handle and use.

Page | 8
 CHAPTER 4

Definition of Problem

Page | 9
Limitations of present system

1) Lack of immediate retrievals: the information is very difficult to

retrieve and to find particular information. Eg: To find out purchase
history 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 effort to be stored at right place.
3) Lack of prompt updation: Various changes to the information like cost
of garments and other information is difficult to make as paperwork is
involved.
4) Error prone manual calculation: Manual calculations are error prone
and take a lot of time. This may result in incorrect information.
5) Preparation of accurate and prompt reports: This becomes a difficult
job to collect information from various registers.

Page | 10
 CHAPTER 5

System Analysis and Design

Page | 11
System Analysis

A system is a set or arrangement of functionally dependent

component or working together to attain a predefined goal by processing
information. It is the process of examine of a business situation with the
intent of improving it through better procedure and method. It is the process
of gathering and method. It is process gathering and interpreting facts.

Timing problems and using the information to recommend

improvement to the system. Analysis is used gained and understanding of
the conclusion of the system there is a system description and as set of
requirement for a new system. It there is on existing system, then the
analysis only defines the requirement. The step, which follows, will propose
a new system that meets these requirements.

The new system may be built a fresh or by changing the existing system.
Development being by defining a model of new system an continuous by
converting these model to a system in a short analysis specifies what the
system should do.

Analysis objective

An efficient system analysis always plays the role of strong

foundation for development of any proposed system. Information play key
role, as the horizon of knowledge keep on expending, since this project is
anaphor to convert the manual in to computer based system, a thorough
knowledge of the day-to-day functions of present system of mandatory the
objective of this study comprise.

Page | 12
Feasibility Study

Feasibility is the determination of whether or not a project is worth

doing. The process followed in making this decision is called feasibility
study. It determines whether a project should be taken or not. Various types
of feasibility were studied, like:

Technical feasibility

This is concerned with specifying equipment and the software that

successfully satisfies the user requirements. In examining the technical
feasibility, the configuration of the system is given importance than the
actual hardware.

Operational feasibility

It is mainly related to the human organizational and political aspects.

It involved the study of the changes to be through in the system, new skills
needed etc. In the present manual system there is no use of computer and
also the operational staff has no idea about the operation of the computer
system, hence an introductory training of the staff is needed.

Economic feasibility

It is the most frequently used technique for the evaluation of the

effectiveness of the proposed system. It involves the cost/benefit analysis.
This study has outweighed the manual system to the new system.

Page | 13
Social feasibility

It is the determination of whether a system will by the user or not. This

examines the probability of the project being accepted directly by the users.

Management feasibility

It is to determine whether the proposed system will be acceptable to

the management or not.

Time feasibility

It is a determination of whether the proposed system can be

implemented fully within a stipulated time interval.

Fact Finding

Fact-finding means learning about the existing system as much as

possible. The various methods that were employed to find facts are:

Observing the current system:

Direct observation of the system allows the analyst to verify his

understanding of the system. It is one of the most difficult techniques. It
requires intrusion into the user’s area and can cause adverse reaction by the
users if not handled properly. The user should not be able to know that he is
being observed else he might behave in a different manner. We had to be
very careful in doing the on-site observation though the users are co-
operative or reluctant. A lot of information about the system was gathered by
observing the existing system at work.

Page | 14
Gathering information from the existing documents

The information regarding the system was gathered by the existing

documents such as various reports, procedure and practices of the, Raipur
(C.G.). After studying these documents we got the various requirements of
the system which helped us to determine to what extent were the
requirements being met by the present system.

Defining the system requirements

During the fact-finding phase of the system, we gathered facts, figures

and documents and came to grip with the entire scope of the problem. After
the fact-finding, the system requirements were defined as to what were the
system requirements.

These were then put forward to the management and the user. After
the approval from them, we proceeded to start the system design.

Page | 15
 CHAPTER 6

Hardware and software Requirement

Page | 16
Hardware:

HARDWARE REQUIREMENT

Processor : Pentium IV or above

RAM : 1 GB or more

Hard disk : 160 GB or more

Monitor : VGA/SVGA

Keyboard : 104 key

Mouse : 2 buttons /3 buttons

SOFTWARE REQUIREMENT

Operating system: Window 2000/Xp/7/8/10

Front end: visual basic 6.0

Back end: MS Access2007

Page | 17
 CHAPTER 7

Plate form specification

Page | 18
Introduction to Windows XP

An Operating System (OS) dictates how all the parts (software and hardware
resources) of your computer work together and how specific tasks (i.e.,
displaying and saving information) are to be performed.

Windows XP is built primarily on Windows 2000 technology which

includes the best attributes of previous Windows versions. People who
already know and have used previous versions of Windows should have no
problems using Windows XP. One major difference will be in the logging
in and logging out procedures. Windows XP offers several benefits over
other versions, namely, its built-in file encryption and password control
capabilities provide basic data and access security, increased reliability and
performance ability, friendly graphical user interface (GUI), and its Web
communication features. Windows XP's desktop is graphical which allows
the user to click on pictures (or icons) to launch applications, open files and
folders, connect to a network, and perform many other functions.

Users should find that Windows XP is more efficient and customizable than
previous versions and other platforms. The Start button on the bottom left
corner of the screen allows easy access to just about everything in the
system. The Start button is used to initiate applications, opens or search for
documents, adjusts settings, activates the Help Support system, manages
files, and maintains the entire system to meet your specific needs.

The taskbar acts as a "home base" and has three elements: the Start button,
a bar across the bottom of the screen that lines up opened (active)
applications side-by-side, and the system tray located on the bottom right

Page | 19
corner where the clock and other system icons may appear. The taskbar is
an efficient tool of keeping track of what applications are active, and allows
for switching between applications.

INTRODUCTION TO VISUAL BASIC

VISUAL BASIC is the Graphical User Interface (GUI) language. It is the

language that many developers including Microsoft themselves are using to
write new applications software, Microsoft Corporation created it in 1991. It
is a high level language. With the help of Visual Basic we can communicate
with other applications running under windows. It is an internet based and an
object oriented programming.

Visual Basic is substantially different from traditional Basic, though

there are similarities. Visual Basic requires a different approach to
developing programs and to learning the language. But in Basics, we can
develop a program line by line, testing each command as we write it. With
Visual Basic we must develop our programs and we can understand across a
broader front.

In Visual Basic we can write a program by assembling the object that we

will use for screen displays and interaction with the users, adjusting the
properties of those objects, determining which events we will respond to,
thinking through the variables we need for holding data and for passing
information from one part of the program to another, and writing the
command lines that will run when events are activated. At each stage of
development we may add to or change any aspect of the program, but it must
be done with an awareness of how it will affect the other aspects. Objects,

Page | 20
properties events and code are all intimation. Visual Basic lets us add
menus, text boxes, command buttons, option buttons, check boxes, list
boxes, scroll bars, file and directory boxes to blank windows, we can use
grids to handle toolbar data, communicate with other window applications
and access database. We can have multiple windows on a screen. These
windows have full access to the clipboard and to the information in most
other window application running at the same line.

So Visual Basic is a collection of files. It is a very easy language and

flexible to use. This language also contains all the features of basic
language. It is an event driven programming. It is also called a friend of a
user. One of the advantages of visual basic is that it is a grammar free
language. It provides both compiler and interpreter.

Programming in Visual Basic

Programming in Visual Basic was written around Visual Basic 3.0, standard
edition butvirtually all of the techniques and concepts apply equally well to
Visual Basic 2.0 . It doesn’t have advanced feature or development of free
standing commercial applications, for which the professional edition is
necessary. There was another version of Visual Basic that is Visual Basic for
DOS. This version was out of use. Windows is the natural medium for
Visual Basic. Then come more advanced version like Visual Basic 4.0,
Visual Basic 5.0, and Visual Basic 6.0 at present the latest the Visual Basic
6.0.

Event Driven Programming

Page | 21
Visual Basic is Object Oriented, i.e. it revolves around readymade objects
and it is called as EVENT DRIVEN, i.e. all the activities in a program are
triggered by one event or another. Each object has its own properties,
determining its position, size, color, the appearance and nature of its text,
and much more. Each object also has its own event handling procedures.

In an event driven application the code doesn’t follows a predefined path, it

executes different code section in response to events. Events can be
triggered by the user action, by message from the system of other application
or even from application itself. The sequence of this event determines the
sequence in which codes executes. Thus the path through the application
code written each time the program runs.

Visual basic system knows all about event handling procedures. It knows
what a button is and how it works. It also knows how to handle images,
menus, dialog boxes, driven and directory lists, and much else. The
programmer’s job is to determine where, how and when an object appears on
screen, what its caption reads and what happens when an event occurs. The
event might be the opening of a form, the user clicking on a box. The
programmer does not have to write code to trap these events the system does
that automatically. Because the program code runs in response to event, as at
any point whole range of event might be possible. The flow of execution is
not as fixed as in a traditional program.

About Visual Basic 6.0

Visual Basic is the most Popular Object Oriented event Driven

Programming language .It revolves around readymade objects, and it is
event driven i.e. all the activities in a program are triggered by one event or

Page | 22
another .The main advantage of visual Programming languages is that we
can concentrate on what we want our program to do, not how to get the
programming language to do it. Some Visual Basic features are: -

1. Compatibility: Visual Basic is capable of producing software as

sophisticated as any other data access techniques available.

2. Flexibility: It not only provides database access but can also be used
to link it with other word processor, spreadsheets software etc.

3. Familiarity: Because it can be said as an extended version of Basic,

which is very easy to learn and work with, its syntax seems to be more
familiar.

4. Features: Various Additional Features Like ADO reports And other

various type of Active X controls are Supported by this application, which
helps widely in development of the Project.

Visual Basic has developed into an extremely powerful application

development tool and it is often referred to as a Rapid Application
Development (RAD) tool. Another key concept of Visual Basic is the ability
to create and use self contained components or objects. One type of Objects
is VB Controls.

Controls are elements we can use when designing a user interface. VB

controls enable us to add feature to our programs without having to be
involved in the details of how these feature works.

This software is also designed using several controls available in Visual

Basic with the help of which interactive user interface screen can be

Page | 23
developed. Form Controls are used as containers for other controls like
command buttons, labels, scroll bar, combo box etc.

To avoid any invalid entries to be made a suitable restriction is put on

different controls with the help of their properties.

Coding scheme of different controls is hidden from their appearance and this
resulted into graphical user interface based event driven programming.

About MS Access

About Microsoft Access

It is an interactive Relation Database System for Microsoft Windows.

It helps to find, organize to find, organize and present information in your
hands.

Microsoft Access is Graphical

Microsoft Access takes full advantage of the graphical power in

windows, which gives access to data and simple ways to view and work with
the information.

Microsoft Access is Powerful for Query Capabilities

It is powerful for query capabilities that are helpful to find the

information regardless of format or location. You can use one query to work
data stored in different database and can change query at any time.

Page | 24
Microsoft Access is used for Data Publishing

MS-Access is used for data publishing, WYSIWYG (What You See Is

What You Get) that helps to produce effective forms and reports to make
your exact specification. You can plot data combine forms and reports into
one document.

A Database is collection of data that's related to a particular topic or

purpose. For e.g.: Employee records, collection of sales in a notebook. Each
of these collections is a database.

A Data Base Management System (DBMS) is a system that stores and

Retrieves Information in a Database Management system (RDMS). Using
MS-Access you can organize your data it's easy to track and verify and store
information about how different subjects are felted and it's easy to analyze
related data stored in table in a database.

This is a Backend Tool widely used for Personal Computer as a Data Base.
The relational database is a well-defined theoretical model of working with
and managing a set of data that attends to three specific things:

Data Structure, Data integrity and Data manipulation .The MS Access has a
distinct component, which adheres to these requirements. The basic Data
Structure in Access is Table having fixed number of columns but variable
rows.

The Data integrity rules of the relational models can be defined within
Access relationship using integrity constraints. When a table is created in
Access the integrity rule is defied at that very time.
Page | 25
MS Access has many important features that make it not only an exceptional
database Management System but also an excellent database for personal
system in windows environment,

 It provides highly secure environment to do better handling of

database.

 It can handle reasonable amount of data.

 Easily support all window based systems

The goal of the access is to help you get your work done in the least
of time, with a minimum of effort.

What type of application can you develop in Access?

Microsoft Access offers a variety of features for different databases needs. It

can be used to develop five general type of application:

1. Personal application.

2. Application used to run a small business.

3. Department application.

4. Corporation- wide application.

5. Front- end for enterprise-wide client/server application.

What is Database actually?

The term database means different things to different people. For

many years in the world of Dbase was used to describe a collection of fields
and records in a client/server environment. Dbase refers to all the data

Page | 26
schema, indexes, rules, triggers and stored procedures associated with a
system in access terms, a dbase is a collection of all the tables, queries,
forms, reports, macros and modules that compose a complete system.

Actually database is a collection of related information. Here

information is stored in tabular form one record shows all possible attribute
of an entity. In a simple word entity can be identified by its attributes like his
name, color, height and hairstyle etc identify a person. So in databases a
record makes tulle while attributes make fields.

Page | 27
 CHAPTER 8

Data flow diagram

Page | 28
DATA FLOW DIAGRAMS

A data flow diagram is graphical tool used to describe and analyze

movement of data through a system. These are the central tool and the basis
from which the other components are developed. The transformation of data
from input to output, through processed, may be described logically and
independently of physical components associated with the system. These
are known as the logical data flow diagrams. The physical data flow
diagrams show the actual implements and movement of data between
people, departments and workstations. A full description of a system
actually consists of a set of data flow diagrams. Using two familiar
notations Yourdon, Gane and Sarson notation develops the data flow
diagrams. Each component in a DFD is labeled with a descriptive name.
Process is further identified with a number that will be used for
identification purpose. It consist a single process MLDC, which plays vital
role in studying the current system. The process in the context level diagram
is exploded into other process at the first level DFD.

The idea behind the explosion of a process into more process is that
understanding at one level of detail is exploded into greater detail at the next
level. This is done until further explosion is necessary and an adequate
amount of detail is described for analyst to understand the process.

Larry Constantine first developed the DFD as a way of expressing

system requirements in a graphical from, this lead to the modular design.

A DFD is also known as a “bubble Chart” has the purpose of

clarifying system requirements and identifying major transformations that
will become programs in system design. So it is the starting point of the

Page | 29
design to the lowest level of detail. A DFD consists of a series of bubbles
joined by data flows in the system.

DFD SYMBOLS:

In the DFD, there are four symbols

1. A square defines a source(originator) or destination of system data

2. An arrow identifies data flow. It is the pipeline through which the
information flows
3. A circle or a bubble represents a process that transforms incoming data
flow into outgoing data flows.
4. An open rectangle is a data store, data at rest or a temporary repository of
data

Page | 30
7) DATA FLOW DIAGRAM :-

Employee

Bills

Employee Information

Generate Bill Chemical

drug
Item with Company Quantity

Agriculture Shop
Management
Deal By
Dealer

Customer Information
Customer

Purchase
Purchase By Quantity

Purchase by Item with Quantity

Insecticides

Page | 31
CHAPTER 9

E R diagram

Page | 32
E-R diagrams constructs

In E-R diagrams, entity types are represented by squares. See the table
below. Relationship types are shown in diamond shaped boxes attached to
the participating entity types with straight lines. Attributes are shown in
ovals, and each attribute is attached to its entity type or relationship type by
a straight line. Multivalued attributes are shown in double ovals. Key
attributes have their names underlined. Derived attributes are shown in
dotted ovals.

Weak entity types are distinguished by being placed in double rectangles and
by having their identifying relationship placed in double diamonds.

Attaching a 1, M, or N on each participating edge specifies cardinality ratio

of each binary relationship type. The participation constraint is specified by
a single line for partial participation and by double lines for total
participation. The participation constraints specify whether the existence of
an entity depends on its being related to another entity via the relationship
type. If every entity of an entity set is related to some other entity set via a
relationship type, then the participation of the first entity type is total. If only
few member of an entity type is related to some entity type via a relationship
type, the participation is partial.

ENTITY TYPE

Page | 33
WEAK ENTITY TYPE

RELATIONSHIP TYPE

ATTRIBUTE

KEY ATTRIBUTE

MULTIVALUED
ATTRIBUTE

DERIVED ATTRIBUTE

TOTAL
PARTICIPATION OF
E2 IN R

Cardinality Ratio 1:N

FOR E1:E2 IN R

Structural
Constraint(Min,Max) On
Participation Of E In R

Page | 34
 Naming Data Objects

The names should have the following properties:

 unique,
 Have meaning to the end-user.
 Contain the minimum number of words needed to uniquely and accurately
describe the object. For entities and attributes, names are singular nouns
while relationship names are typically verbs.

Page | 35
ENTITY RELATIONSHIP DIGRAM;-

AGRICULTURE SHOP

Add
Address
F.name Batch no.
Company
Gender
Name Name Rate
E-mail
ID Item no. Wage
Mobile
s
Available Want
Customer Insecticide
Company Batch no.
Name Rate

Item no. Wages

Chemical drug
Address
Mobile
Date
Name
Wages
S.no.
Handles Purchase

S.no
Salary
Name

Employee
Bill No. Item Name

Date Total price

Genrate
Bill

Page | 36
 CHAPTER 10
Data Base Design

Page | 37
9) DATA BASE DIAGRAM / TABLE:-

BILLING SYSTEM:-
FIELD NAME DATA TYPE DESCRIPTION

Bill No. Number Primary Key

Date Date/time

Name Text 255

Father name Text 255

Address Text 255

SI No. Number Long Integer

Drug name Text 255

Formulation Number Long Integer

Company Text 255

Expiry date Date/time

Quantity Number Long Integer

Rate Number Long Integer

Total Number Long Integer

Page | 38
CUSTOMER INFORMATION:-
FIELD NAME DATA TYPE DESCRIPTION

Bill no Number Primary key

Name Text 255

Caste Text 255

Father name Text 255

Address Text 255

Date Date/time

Total amount Number Long Integer

Cash Number Long Integer

Page | 39
CUSTOMER PURCHASE:-
FIELD NAME DATA TYPE DESCRIPTION

SI NO. Number Primary key

Name Text 255

Mob. No Number Long Integer

Address Text 255

Date Date/time

Item no Number Long Integer

Quantity Number Long Integer

Amount Number Long Integer

Page | 40
DEALER INFORMATION:-
Field Name Data Type Description

ID Number Primary key

F-Name Text 255

M-Name Text 255

I-Name Text 255

Father-Name Text 255

Mobile Number Double

Gender Text 255

E-mail Text 255

Address Text 255

Page | 41
EMPLOYEE INFORMATION:-
Field Name Data Type Description

Emp-id Number Primary key

Emp-name Text 255

Desiganation Text 255

Salary Number Long Integer

Address Text 255

Page | 42
CHEMICAL DRUG:-
Field Name Data Type Description

Item-Code Number Primary key

Item-Name Text 255

Company Text 255

Batch-No Text 255

Quantity Number Long Integer

Weight Number Long Integer

Rate Number Long Integer

Page | 43
INSECTICIDE :-

Field name Data type Description

Item code NUMBER Primary Key

Item name TEXT 255

Company TEXT 255

Batch no. TEXT 255

Quantity NUMBER Long Integer

Rate NUMBER Long Integer

Tatal NUMBER Long Integer

Page | 44
 CHAPTER 11

Input & output screen design

Page | 45
1. Login Form

Its use to log in ,enter valid user ID ror password.

Page | 46
SPLASH FORM

Page | 47
MDI FORM

Page | 48
EMPLOYEE INFORMATION

Page | 49
DEALER INFORMATION

Page | 50
BILL SYSTEM

Page | 51
COSTOMER SALES

DEALER PURCHASE

Page | 52
INSECTICIDE DRUGS

Page | 53
CHEMICAL DRUGS

Page | 54
 REPORT
1.RPT_STUDENT

This is the student table report for student details.

Page | 55
 2.DATA REPORT

This report shows the development of new laboratory in the department.

Page | 56
3.DEALER INFORMATION

Page | 57
4.CUSTOMER SALES

Page | 58
CHAPTER 12

Coding

Page | 59
1. LOGIN FORM

Private Sub cmd_ok_Click()

If txt_pass.Text = "anjali" Then

MDIForm1.Show

Me.Hide

Else

MsgBox "Invalid Password"

txt_pass.Text = " "

End If

End Sub

2. STUDENT FORM

Private Sub Command2_Click()

End
End Sub
Dim flag As Boolean

Private Sub cmd_add_Click()

Adodc1.Recordset.AddNew
cmd_edit.Enabled = False
cmd_up.Enabled = True
cmd_add.Enabled = False
cmd_can.Enabled = True
End Sub

Page | 60
Private Sub cmd_can_Click()

flag = False
cmd_add.Enabled = True
cmd_edit.Enabled = True
cmd_del.Enabled = True
cmd_up.Enabled = False
cmd_can.Enabled = False
If flag = False Then
Adodc1.Recordset.CancelUpdate
End If
End Sub

Private Sub cmd_del_Click()

If Adodc1.Recordset.EOF = False Then
Adodc1.Recordset.Delete
MsgBox " One Record is deleted"
Adodc1.Recordset.MoveNext
Else
MsgBox "No record to delete"
End If

End Sub

Private Sub cmd_edit_Click()

cmd_can.Enabled = True
cmd_add.Enabled = False
cmd_del.Enabled = False
cmd_up.Enabled = True

Page | 61
flag = True
End Sub

Private Sub cmd_exit_Click(Index As Integer)

Unload Me
MDIForm1.Show
End Sub

Private Sub cmd_mvfirst_Click()

If Adodc1.Recordset.EOF = False Then
Adodc1.Recordset.MoveFirst
End If

End Sub

Private Sub cmd_mvlast_Click()

If Adodc1.Recordset.BOF = False Then
Adodc1.Recordset.MoveLast
End If
End Sub

Private Sub cmd_mvnxt_Click()

If Adodc1.Recordset.BOF = False Then
Adodc1.Recordset.MoveNext
If Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveFirst
End If
End If
End Sub

Private Sub cmd_mvprev_Click()

Page | 62
If Adodc1.Recordset.EOF = False Then
Adodc1.Recordset.MovePrevious
If Adodc1.Recordset.BOF Then
Adodc1.Recordset.MoveLast
End If
End If
End Sub

Private Sub cmd_up_Click()

If txt_enum.Text = "" Then
MsgBox "Please enter the enrollment number"
Exit Sub
Else
Adodc1.Recordset.Fields(0) = txt_enum.Text
End If
If txt_name.Text <> "" Then
Adodc1.Recordset.Fields(1) = txt_name.Text
End If
If txt_branch.Text <> "" Then
Adodc1.Recordset.Fields(2) = txt_branch.Text
End If
If cmb_sem.Text <> "" Then
Adodc1.Recordset.Fields(3) = cmb_sem.Text
End If
If txt_batch.Text <> "" Then
Adodc1.Recordset.Fields(4) = txt_batch.Text
End If
Adodc1.Recordset.Update
MsgBox "your record is saved"

cmd_edit.Enabled = True

Page | 63
cmd_up.Enabled = False
cmd_add.Enabled = True
End Sub
Private Sub Command5_Click(Index As Integer)
End Sub

3. PROG_COND_DEPT FROM

Dim flag As Boolean

Private Sub cmd_add_Click()

Adodc1.Recordset.AddNew
cmd_edit.Enabled = False
cmd_up.Enabled = True
cmd_add.Enabled = False
cmd_can.Enabled = True
End Sub

Private Sub cmd_can_Click()

flag = False
cmd_add.Enabled = True
cmd_edit.Enabled = True
cmd_del.Enabled = True
cmd_up.Enabled = False
cmd_can.Enabled = False
If flag = False Then
Adodc1.Recordset.CancelUpdate
End If
End Sub

Private Sub cmd_del_Click()

Page | 64
If Adodc1.Recordset.EOF = False Then
Adodc1.Recordset.Delete
MsgBox " One Record is deleted"
Adodc1.Recordset.MoveNext
Else
MsgBox "No record to delete"
End If
End Sub

Private Sub cmd_edit_Click()

cmd_can.Enabled = True
cmd_add.Enabled = False
cmd_del.Enabled = False
cmd_up.Enabled = True
flag = True
End Sub

Private Sub cmd_exit_Click(Index As Integer)

Unload Me
MDIForm1.Show
End Sub

Private Sub cmd_mvfirst_Click()

If Adodc1.Recordset.BOF = False Then
Adodc1.Recordset.MoveFirst
End If
End Sub

Private Sub cmd_mvlast_Click()

If Adodc1.Recordset.BOF = False Then
Adodc1.Recordset.MoveLast

Page | 65
End If
End Sub

Private Sub cmd_mvnxt_Click()

If Adodc1.Recordset.BOF = False Then
Adodc1.Recordset.MoveNext
If Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveFirst
End If
End If
End Sub

Private Sub cmd_mvprev_Click()

If Adodc1.Recordset.EOF = False Then
Adodc1.Recordset.MovePrevious
If Adodc1.Recordset.BOF Then
Adodc1.Recordset.MoveLast
End If
End If
End Sub

Private Sub cmd_up_Click()

If txt_res_per_prg.Text = "" Then
MsgBox "Please enter Resource person name"
Exit Sub
Else
Adodc1.Recordset.Fields(0) = txt_res_per_prg.Text
End If
If txt_name_dept.Text = "" Then
MsgBox "Please enter Name of Department"
Exit Sub

Page | 66
Else
Adodc1.Recordset.Fields(1) = txt_name_dept.Text
End If
If txt_name_prg.Text = "" Then
MsgBox "Please enter the Name of Program"
Exit Sub
Else
Adodc1.Recordset.Fields(2) = txt_name_prg.Text
End If
If txt_app_parti.Text = "" Then
MsgBox "Please enter the Approximate No. of Participants"
Exit Sub
Else
Adodc1.Recordset.Fields(3) = txt_app_parti.Text
End If

If txt_dur_prg.Text = "" Then

MsgBox "Please enter the Duration of Program"
Exit Sub
Else
Adodc1.Recordset.Fields(4) = txt_dur_prg.Text
End If

Adodc1.Recordset.Update
MsgBox "your record is saved"

cmd_edit.Enabled = True
cmd_up.Enabled = False
cmd_add.Enabled = True
End Sub

Page | 67
4. MDI FORM
Private Sub dept_new_lab_Click()
Form8.Show
End Sub

Private Sub dept_prog_Click()

form10.Show
End Sub

Private Sub dept_proj_Click()

Form9.Show
End Sub

Private Sub Exit_Click()

End
End Sub

Private Sub fac_det_Click()

DataReport2.Show
End Sub

Private Sub Fac_detail_Click()

Form2.Show
End Sub

Private Sub Fac_res_Click()

DataReport1.Show
End Sub

Page | 68
Private Sub Fac_resource_Click()
Form7.Show
End Sub

Private Sub MDIForm_Unload(Cancel As Integer)

End
End Sub

Private Sub new_lab_Click()

DataReport7.Show
End Sub

Private Sub part_comp_Click()

DataReport12.Show
End Sub

Private Sub prg_cond_Click()

DataReport10.Show
End Sub

Private Sub pub_con_Click()

Form4.Show
End Sub

Private Sub pub_con1_Click()

DataReport4.Show
End Sub

Private Sub Pub_jour_Click()

form3.Show
End Sub

Page | 69
Private Sub pub_jour1_Click()
DataReport3.Show
End Sub

Private Sub res_paper1_Click()

DataReport11.Show
End Sub

Private Sub spon_proj_Click()

DataReport8.Show
End Sub

Private Sub stu_det_Click()

rpt_student.Show
End Sub

Private Sub Stu_detail_Click()

Form1.Show
End Sub

Private Sub stu_pap_pres_Click()

Form11.Show
End Sub

Private Sub stu_parti_Click()

Form12.Show
End Sub

Private Sub tra_fac_Click()

Form5.Show

Page | 70
End Sub

Private Sub Tra_fac1_Click()

DataReport5.Show
End Sub

Private Sub tra_sttp_Click()

DataReport6.Show
End Sub

Private Sub trai_sttp_Click()

Form6.Show
End Sub
6. DEALER PURCHASE FORM

Dim flag As Boolean

Private Sub cmd_add_Click()
Adodc1.Recordset.AddNew
cmd_edit.Enabled = False
cmd_up.Enabled = True
cmd_add.Enabled = False
cmd_can.Enabled = True
End Sub

Private Sub cmd_can_Click()

flag = False
cmd_add.Enabled = True
cmd_edit.Enabled = True
cmd_del.Enabled = True
cmd_up.Enabled = False
cmd_can.Enabled = False

Page | 71
If flag = False Then
Adodc1.Recordset.CancelUpdate
End If
End Sub

Private Sub cmd_del_Click()

If Adodc1.Recordset.EOF = False Then
Adodc1.Recordset.Delete
MsgBox " One Record is deleted"
Adodc1.Recordset.MoveNext
Else
MsgBox "No record to delete"
End If

End Sub

Private Sub cmd_edit_Click()

cmd_can.Enabled = True
cmd_add.Enabled = False
cmd_del.Enabled = False
cmd_up.Enabled = True
flag = True
End Sub

Private Sub cmd_exit_Click(Index As Integer)

Unload Me
MDIForm1.Show
End Sub

Private Sub cmd_mvfirst_Click()

If Adodc1.Recordset.BOF = False Then

Page | 72
Adodc1.Recordset.MoveFirst
End If
End Sub

Private Sub cmd_mvlast_Click()

If Adodc1.Recordset.BOF = False Then
Adodc1.Recordset.MoveLast
End If
End Sub

Private Sub cmd_mvnxt_Click()

If Adodc1.Recordset.BOF = False Then
Adodc1.Recordset.MoveNext
If Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveFirst
End If
End If
End Sub

Private Sub cmd_mvprev_Click()

If Adodc1.Recordset.EOF = False Then
Adodc1.Recordset.MovePrevious
If Adodc1.Recordset.BOF Then
Adodc1.Recordset.MoveLast
End If
End If
End Sub

Private Sub cmd_up_Click()

If txt_name_fac.Text = "" Then
MsgBox "Please enter Faculty name"

Page | 73
 Exit Sub
Else
Adodc1.Recordset.Fields(0) = txt_name_fac.Text
End If
If txt_dept.Text <> "" Then
Adodc1.Recordset.Fields(1) = txt_dept.Text
End If
If txt_trai_work.Text = "" Then
MsgBox "Please enter the topic of the training"
Exit Sub
Else
Adodc1.Recordset.Fields(2) = txt_trai_work.Text
End If
If txt_org.Text <> "" Then
Adodc1.Recordset.Fields(3) = txt_org.Text
End If
If txt_dur.Text <> "" Then
Adodc1.Recordset.Fields(4) = txt_dur.Text
End If
Adodc1.Recordset.Update
MsgBox "your record is saved"

cmd_edit.Enabled = True
cmd_up.Enabled = False
cmd_add.Enabled = True
End Sub

7. COSTOMER SALES FORM

Dim flag As Boolean

Page | 74
Private Sub cmd_add_Click()
Adodc1.Recordset.AddNew
cmd_edit.Enabled = False
cmd_up.Enabled = True
cmd_add.Enabled = False
cmd_can.Enabled = True
End Sub

Private Sub cmd_can_Click()

flag = False
cmd_add.Enabled = True
cmd_edit.Enabled = True
cmd_del.Enabled = True
cmd_up.Enabled = False
cmd_can.Enabled = False
If flag = False Then
Adodc1.Recordset.CancelUpdate
End If
End Sub

Private Sub cmd_del_Click()

If Adodc1.Recordset.EOF = False Then
Adodc1.Recordset.Delete
MsgBox " One Record is deleted"
Adodc1.Recordset.MoveNext
Else
MsgBox "No record to delete"
End If
End Sub

Page | 75
Private Sub cmd_edit_Click()
cmd_can.Enabled = True
cmd_add.Enabled = False
cmd_del.Enabled = False
cmd_up.Enabled = True
flag = True
End Sub

Private Sub cmd_exit_Click(Index As Integer)

Unload Me
MDIForm1.Show
End Sub

Private Sub cmd_mvfirst_Click()

If Adodc1.Recordset.BOF = False Then
Adodc1.Recordset.MoveFirst
End If
End Sub

Private Sub cmd_mvlast_Click()

If Adodc1.Recordset.BOF = False Then
Adodc1.Recordset.MoveLast
End If
End Sub

Private Sub cmd_mvnxt_Click()

If Adodc1.Recordset.BOF = False Then
Adodc1.Recordset.MoveNext
If Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveFirst
End If

Page | 76
End If
End Sub

Private Sub cmd_mvprev_Click()

If Adodc1.Recordset.EOF = False Then
Adodc1.Recordset.MovePrevious
If Adodc1.Recordset.BOF Then
Adodc1.Recordset.MoveLast
End If
End If
End Sub

Private Sub cmd_up_Click()

If txt_name_dept.Text = "" Then
MsgBox "Please enter Department name"
Exit Sub
Else
Adodc1.Recordset.Fields(0) = txt_name_dept.Text
End If
If txt_name_lab.Text = "" Then
MsgBox "Please enter Name of Laboratory"
Exit Sub
Else
Adodc1.Recordset.Fields(1) = txt_name_lab.Text
End If
If txt_equip.Text = "" Then
MsgBox "Please enter the Equipment Name"
Exit Sub
Else
Adodc1.Recordset.Fields(2) = txt_equip.Text
End If

Page | 77
If txt_purp_dev.Text <> "" Then
Adodc1.Recordset.Fields(3) = txt_purp_dev.Text
End If
If txt_app_cost.Text = "" Then
MsgBox "Please enter the Approximate cost"
Exit Sub
Else
Adodc1.Recordset.Fields(4) = txt_app_cost.Text
End If
Adodc1.Recordset.Update
MsgBox "your record is saved"
cmd_edit.Enabled = True
cmd_up.Enabled = False
cmd_add.Enabled = True
End Sub

Page | 78
CHAPTER 13

Conclusion

Page | 79
Conclusion

The project entitled “AGRICULTURE SHOP MANAGEMENT “ is developed

in Visual Basic 6.0 as FrontEnd and Ms-Access 2003 as BackEnd used as database . This
project is made for Agriculture shop management . It controls all the transaction Sales and
Purchase of goods etc. It also generates the reports in specific manner.The main features
of this software includes flexibility, reduce manual work in an efficient manner, a quick,
convenient, reliable and effective way to manage all aspects of shop management. The
project could very well be enhanced further as per the requirements.

So this project is very useful for “AGRICULTURE SHOP MANAGEMENT”.

It reduces extra work and it very reliable. In this project icons and other components are
understandable

Page | 80
 CHAPTER 14

Limitation & Future Scope

Page | 81
 LIMITATION

Agriculture shop management is developed keeping all the requirements of organization

in mind. At present it fulfils almost all the requirement. But as for growing organization,
it is difficult to exactly predict what they need in future, so it cannot be predicted that this
software will meet their requirement in future also without any up gradation in our
software.

I. As the project is developed in VB and Access any number of tables can be

included to store different data and any number of VB forms can be included to
design user interface.

II. As the software is properly documented it will not be difficult for any
programmer to update this software.

III. Any number of reports and graph can be added as and when required.

IV. The date format is properly handled as per Indian Date Nomenclature.

V. Further up gradation is possible in this software.

VI. In the later stage this S/W can be made online so that the manager can view all the
updations from his office.

VII. Agriculture shop management could be made automatically further at the current
stage the student registration is made manually and further the entry is made in to
the S/W. This is because the people making the registration of the students are not
literate enough to handle the computer. In future it is expected that this problem
could be solved effectively & easily.

VIII. As the project is developed in VB and Access any number of tables can be
included to store different data and any number of VB forms can be included to
design user interface.

IX. As the software is properly documented it will not be difficult for any
programmer to update this software.

Page | 82
CHAPTER 15

REFERENCES

Page | 83
References

For the completion of this project I referred to the following goods

1. Evangelos Petroutsos, “Mastering Visual Basic 6”, Sybex, 0782122728, 1998,

Vol.-6.
2. Steven Holzner, “Visual Basic 6 Black Book”, Coriolis Tech. Press, 1-932111-
08-5, 1998, Vol.-
3. Noel Jerke, “Visual Basic 6: The Complete Reference”, Mcgraw-Hill, 978-
0072118551, 2002
4. Julia Case Bradley & Anita Millspaugh, “Programming in Visual Basic 6.0”
Career Education, 978-0072518740, 1998, Edition-4
5. Francesco Balena, “Programming Microsoft Visual Basic 6.0”, Microsoft
Press, 978-0735605589, 1999, Edition-1
6. Elmasri & Navathe “Fundamentals of Database Systems” IV edition.
PEARSON Education.
7. Korth, Silberschatz sudarshan “Database systems, concepts” 5th edition
McGraw Hill.
8. “Software Engineering A Practitioners Approach”, Roger S Pressman, 2010,
Tata McGraw Hill Publishing Co Ltd, ISBN 9780070701137
9. Visual basic 6 in recarel timetm – steven brown

Page | 84