University of the Punjab
BA/BSc.
Part I Computer Science Practical
Group 3 – Annual-2020 Solution
Question
No 01:
MS Excel
Procedure:
1.
I clicked on Start Button and point
to the All Programs. All installed programs list appeared.
2.
I pointed to the MS Office Folder
and click on MS Word. MS Excel Program opened.
3.
I click on Office Button and take
new Sheet.
4.
I typed data on the sheet as
given in question paper.
5.
I selected first line and apply
shade form home ribbon and Pressed CTRL+B to make it bold.
6.
I wrot a formula to calculate
Final marks.
Formula
: = (0.2*B2)+(0.3*C2)+(0.5*D2)
7.
I pressed Ctrl + S
to save the sheet and give the file name “Result Card”.
Question
No 02: Write a VB 6 program that takes some number from user and stop when user
enters -1. Program should display largest and smallest no.
Program:
Private
Sub Command1_Click()
Dim
Price As Integer
Price
= InputBox(“Enter Current Price”)
Price
= Price *1.25;
Print
“Price After Second Year: = “& Price
Price
= Price *1.05;
Print
“Price after Third Year: = “& Price
Price
= Price *1.10;
Print
“Price after First Year: = “& Price
End
Sub
