FRONT END TOOLS
Form Design:
Coding: Private Sub Combo1_Change() [Link] "BTech" [Link] "MTech" [Link] "BE" [Link] "ME" End Sub
Private Sub Command1_Click() [Link] [Link] [Link] [Link] If [Link] = True Then gender = "male" End If If [Link] = True Then gender = "female" End If [Link] gender [Link] [Link] If [Link] = 1 And [Link] = 0 Then area = "software Engineering & Networks" End If If [Link] = 0 And [Link] = 1 Then area = " Networks" End If [Link] area [Link] [Link] End Sub
Private Sub Command2_Click() End End Sub
Private Sub Command3_Click() If [Link] <> 0 Then
[Link] (0) End If End Sub
Private Sub Form_Load() MsgBox "Welcome to Registration" End Sub
Private Sub Option1_Click() If ([Link] = True) Then MsgBox ("You have selected Male") ElseIf ([Link] = True) Then MsgBox ("You have selected Female") End If End Sub
Private Sub Option2_Click() If ([Link] = True) Then MsgBox ("You have selected Male") ElseIf ([Link] = True) Then MsgBox ("You have selected Female") End If End Sub
Output:
MARK SHEET PREPARATION Form Design: Main Form:
Login Form:
Details Form:
Mark Form:
Personal Form:
Main Form Coding: Private Sub Command1_Click() [Link] End Sub Private Sub Command2_Click() End End Sub Login Form Coding: Private Sub Command1_Click() If [Link] = "Admin" And [Link] = "***" Then [Link] Else MsgBox "Invalid UserName and Password" End If
Unload Me End Sub Private Sub Command2_Click() Unload Me End Sub Details Form Coding: Private Sub Command1_Click() [Link] End Sub Private Sub Command2_Click() [Link] End Sub Private Sub Command3_Click() [Link] End Sub Mark Form Coding: Private Sub Command1_Click() [Link] End Sub Private Sub Command2_Click() [Link] End Sub Private Sub Command3_Click() [Link] End Sub
Personal Form Coding: Private Sub Command1_Click() [Link] End Sub Private Sub Command2_Click() [Link] End Sub Private Sub Command3_Click() [Link] End Sub Output:
MENU DESIGN
Theory:
Adding Menu Bar Using Menu Editor To start adding menu items to your application, open an existing project or start a new project, then click on Tools in the menu bar of the Visual Basic IDE and select Menu Editor. When you click on the Menu Editor, the Menu Editor dialog will appear. In the Menu Editor dialog , key in the first item File in thecaption text box. You can use the ampersand ( & ) sign in front of F so that F will be underlined when it appears in the menu, and F will become the hot key to initiate the action under this item by pressing the Alt key and the letter F. After typing &File in the Caption text box, move to the name textbox to enter the namefor this menu item, you can type in mnuFile here. Now, click the Next button and the menu item &File will move into the empty space below, as shown in the following diagram:
You can then add in other menu items on the menu bar by following the same procedure, as shown in the diagram below:
when you click Ok, the menu items will be shown on the menu bar of the form.
Now, you may proceed to add the sub menus. In the Menu Editor, click on the Insert button between Fileand Exit and then click the right arrow key, and the dotted line will appear. This shows the second level ofthe menu, or the submenu. Now key in the caption and the name. Repeat the same procedure to add other submenu items. Here, we are adding New, Open, Save, Save As and Exit.
Now click the OK button and go back to your form. You can see the dropped down submenus when you click on the item File, as shown.
REPORTS-PAY ROLL PROCESSING SYSTEM
Form Design:
Coding: Private Sub Command1_Click() [Link] End Sub Private Sub Command2_Click() [Link] End Sub Private Sub Command3_Click() End End Sub
Output: