DISTANCE EDUCATION
B.Sc. B.Sc. (Lateral) DEGREE EXAMINATION,
DECEMBER 2017.
Lab IV — VISUAL BASIC AND ORACLE
(2007 Onwards)
Time Three hours Maximum 100 marks
ONE question should be given to each candidate by
LOT system.
1. Write and test a VB program to print twenty
address labels in a two-column format for the
address
The Registrar
Madurai Kamaraj University
Madurai
Create a table PAY with the fields
EMPNO, NAME, DOJ, BPAY, DA, HRA, DED,
GPAY, NPAY
Add 5 records
Fill DA with 20% of BPAY
Fill HRA with 10% of BPAY
Fill DED with 2000 for all employees
Fill GPAY with the sum of BPAY, DA and
HRA
Fill NPAY with GPAY DED
Display all records.
Sub. Code
36
DE-9822
2
sp3
2. Write and test a VB program to display the Day of
the given Date and convert upper case from lower
case to given word.
Create a table ADDRESS with the fields
NAME, STREET, CITY, PIN
Add 10 records
Add the field DIST
Fill all DIST with MADURAI
Change the PIN to 630003 where city is
KARAIKUDI and PIN is 623003.
3. Write and test a VB program to compute and print
either the sum of odd numbers or even numbers at
the user's choice using Label, Text and Option
buttons.
Create a table RESULT with the fields
REGNO, NAME, M1, M2, M3, TOT, RES
Add 10 records
Fill TOT field with the sum of M1, M2 and
M3.
Fill RES field with PASS if TOT 150
otherwise FAIL.
Cut here
DE-9822
3
sp3
4. Write a VB program to temperature conversion C to
F and F to C at user's choice using Label, Text and
Enter key.
Create table PERSONAL with the fields
SNO, NAME, CITY, PIN, PHONE
Add 10 records
Display all records
Display all names without duplicate
Display all names in uppercase, lowercase and
initial capital letters.
5. Write and test a VB program to read principal,
Number of years and Rate of interest through
INPUT boxes. Compute and print the simple
interest and compound interest through labels.
Create a table MARKS with the fields
REGNO, NAME, M1, M2, M3, TOTAL, AVG,
GRADE
Add 6 records
Replace all TOTAL with M1+M2+M3
Replace all AVG with TOTAL/3
Replace GRADE with the following
conditions
if AVG 40 then GRADE C
Display the maximum marks in each subject.