Visual Basic

About Visual Basic 6.0

Visual Basic 6.0

I. Definition


     Visual Basic 6.0 is one application to create a database information system. Visual Basic 6.0 This is a continuation of the visual basic 1 to 5. although a bit behind, but this software application is used to pengimplementaisannya in the manufacture of a database system. Visual Basic 6.0 was also developed into a visual studio, visual basic 2008 to visual basic. net.

    Visual Basic 6.0 is often also used in the calculation of salaries, sales and other goods. It supports visual basic windows operating system. and to be able to use Microsoft Access database, SQL Server and Oracle.

  In the menu there are visual basic components of course the need to determine the coding or syntax to be used. because one point or comma in a visual basic program will result in system debug or error.

      Here is a little introduction about visual basic 6.0

The above is a sample Visual Basic 6.0 application program, the user typically begins with the project. and Form1.

A. Project B. Sub Form / MDI Form C. Form D. Coding / sytax E. Report F. Module
A. Project

    Project is a file name that will be known in the calling application program. we can change it according to the name of the file or database system that we want. This project also specify the directory in the application form that will be created. because, the entire project is created, it was represented on behalf of the project. when we memembuat data application, the project is so representative of the entire application that you created in visual basic. Here is a picture / icon project when stored on your computer:

 

B. Sub Form / MDI Form


     MDI form is the main form in microsoft visual basic. because the MDI form it represents forms that exist in the database application that we make. in MDI form there is usually only coding calling other forms. we can not make the database system tables in it. because the MDI form is designed / is designed to control other forms. The following are examples of MDI form:

 

C. Form




      Application Form is made for the implementation of systems that can perform some appropriate command execution in want. in this form we can mengkodingkan application to call a database, display data, deleting data, updating data, edit data and print data that has been our execution. Here below is a sample form images that have been designed as needed:

 

D. Or Coding Syntax


     Are the commands in visual basic application programming language that has been ditentukan.dalam coding is also affecting the system can walk or not. in the manufacture of coding must be careful, because if one point or comma, will result in application programs that we make have debug or error. The following is an example of image coding for the form above. :

 

E. Report

     In Design Report also affect the results we have the execution output. in making the report must be careful, because if it is wrong, then the report will be in print would not be as expected. The following is a sample report in visual basic:

F. Module

    Module is a command to connect your between pogram visual basic with a database that will be used in applying the program. This is a picture berikuit module:

 

Note:




Example Problem:

1. Create a login program application form. by using Visual Basic 6.0 and MS database. Access:

Answer:

Make a design for a login form as shown below:

 

after creating the form please enter code in the form as follows:

Private Sub cmdCancel_Click()
Unload Me
End Sub

Private Sub cmdOK_Click()
If Combo1 = rsad!pengguna And txtPassword = rsad!sandi Then
FORMUTAMA.Show
Else
    MsgBox "Unknown user", vbExclamation, "DATA ERROR..!!"
    Unload Me
End If
End Sub

Private Sub tampil()
Combo1 = rsad!pengguna
End Sub

Private Sub Form_Load()
bukadata
tampil
End Sub

then make a Microsoft Access database with the following format:

 

then add modules as shown below, and fill in the coding as follows:

Global cn As Connection

Global Rsuser As Recordset
Global Rscpu As Recordset
Global Rsprinter As Recordset
Global Rsservicecpu As Recordset
Global rsservicep As Recordset
Global rsad As Recordset
Global Vcari As String


Sub bukadata()
Set cn = New ADODB.Connection
Set Rsuser = New ADODB.Recordset
Set Rscpu = New ADODB.Recordset
Set Rsprinter = New ADODB.Recordset
Set Rsservicecpu = New ADODB.Recordset
Set rsservicep = New ADODB.Recordset
Set rsad = New ADODB.Recordset


Luthfi = App.Path + "/itinventory.mdb"
cn.Open "provider=MSDASQL.1;Persist Security Info=False;Data Source=it"
Rsuser.Open "select*from pengguna", cn, 1, 2
Rscpu.Open "select*from cpuid", cn, 1, 2
Rsprinter.Open "select*from printer", cn, 1, 2
Rsservicecpu.Open "select*from servicecpu", cn, 1, 2

End Sub

Good luck