0% found this document useful (0 votes)
39 views

Sheth N.K.T.T College, Thane

Here are the steps to add the controls and write code to display the sum of two numbers: 1. Add a Form and name it frmSum 2. Add Label controls named lblNum1, lblNum2, lblSum 3. Add TextBox controls named txtNum1, txtNum2, TxtSum 4. Add CommandButton controls named cmdSum, cmdClear 5. Double click on cmdSum and add the following code: TxtSum.Text = Val(txtNum1.Text) + Val(txtNum2.Text) 6. Double click on cmdClear and add the following code: txtNum1.Text = "" txtNum2.Text = ""
Copyright
© © All Rights Reserved
Available Formats
Download as PPTX, PDF, TXT or read online on Scribd
0% found this document useful (0 votes)
39 views

Sheth N.K.T.T College, Thane

Here are the steps to add the controls and write code to display the sum of two numbers: 1. Add a Form and name it frmSum 2. Add Label controls named lblNum1, lblNum2, lblSum 3. Add TextBox controls named txtNum1, txtNum2, TxtSum 4. Add CommandButton controls named cmdSum, cmdClear 5. Double click on cmdSum and add the following code: TxtSum.Text = Val(txtNum1.Text) + Val(txtNum2.Text) 6. Double click on cmdClear and add the following code: txtNum1.Text = "" txtNum2.Text = ""
Copyright
© © All Rights Reserved
Available Formats
Download as PPTX, PDF, TXT or read online on Scribd
You are on page 1/ 60

Sheth N.K.T.

T College,
Thane
Syllabus Sem-VI

Module Topic Marks

I E-Commerce 26

II & III Advanced Ms-Excel 32

IV Visual Basic 17
Total 75
Paper Pattern
( 2 ½ Hrs) Marks: 75
N.B : All questions are compulsory.

Q.1 A) Attempt any two (True/False) 2


a)
b) Module-II/III(Excel)
c)
B) Attempt any two (MCQ) 2
d)
e) Module-IV (VB)
f)
C) Attempt any six: (True/ False) 6
g), Module -I
h)….. o)
D) Attempt any Five (MCQ) 5
p)
q) Module-I
w)
Q.2A) Attempt any one:
a) 8
b) Module-I (E-Commerce) 8

B) Attempt any one:


a) 7
b) Module-I (E-Commerce) 7
Q.3A) Attempt any one:
a) 8
b) Module-II (Advanced Excel) 8

B) Attempt any one:


a) 7
b) Module-II (Advanced excel) 7
Q.4A) Attempt any one
a) 8
b) Module-III (Advanced excel) 8
Q.4 B) Attempt any one:
a) 7
b) Module-III(Advanced excel) 7
Q.5A) Attempt any One:
a) 8
b) Module –IV (VB) 8
B) Attempt any One
a) 7
b) Module –IV (VB) 7
Module-I: E-Commerce
1. Define E-Commerce. Explain features of E-
commerce.
2. What is E-commerce? Explain the types of
E-Commerce.
3. Explain advantages and limitations of e-
Commerce
4. Explain the business models(Revenue) in E-
Commerce
5. Explain various B2C models.
6. How an online credit card transaction work?
7. What is Encryption? Explain public key
encryption.
8. Explain the term:
i)Digital Cash ii)SSL iii)E-trailer
iv)Market creator

9. What are the security issues in E-Commerce?


 Integrity
 Non-denial
 Authenticity
 Confidentiality
 Privacy
 Availability
Module-I (E-Commerce)

10. Explain the payment systems in E-Commerce.


• Digital cash
• Online stored value
PayPal
Smart Cards
• Digital accumulating Balance Payment
• Digital Credit Card Payment
• Digital checking
Module-II
1. The following data has been entered in a worksheet:
A B C D E
1 NAME BASIC HRA DA
2 NIKITA 20000
3 AMOL 15000
4 POOJA 12000
5 ROHIT 10500
6 MINAL 25000
7 SONAM 30000

Write the steps to calculate:


i) HRA as 35% of basic salary whenever basic salary is
15000 or less otherwise 40% of basic salary.
ii) DA as 107% of basic salary
iii) Tax as 10% of Basic + HRA +DA
Module-II
To Calculate HRA
 Click at C2 and enter formula
= IF(B2<=15000,B2*35%,B2*40%)
 Click at C2 and drag the fill handle till C7
To Calculate DA
 Click at D2 and enter formula
= B2*107%
 Click at D2 and drag the fill handle till D7
To calculate Tax
 Click at E2 and enter formula
= (B2+C2+D2)*10%
Click at E2 and drag the fill handle tillE7
2. The following data has been enter into worksheet
A B C D
1 Name Income/month Annual income Income Tax
2 Akshay 45000
3 Kajol 58000
4 Sumit 75000
5 Gaurav 120000
6 Dolly 85000

Write the steps to calculate Annual Income and Tax in


column C and D. Income tax is calculated as follows.
Annual Income Income Tax
First Rs.2,50,000 Nil
Next Rs. 2,50,000 10%
Next Rs. 5,00,000 20%
Excess 30%
To calculate Annual Income:
Click at C2 and enter the formula
= B2*12
Click at C2 and drag the fill handle till C6
To calculate Tax:
click at D2 and enter formula
=IF(C2<=250000,0,IF(C2<=500000,0+(C2-250000)*10%,
IF(C2<=1000000, 25000+(C2-500000)*20%,
25000+100000+(C2-100000)*30%)))
 Click at D2 and drag the fill handle till D6
Consider the following worksheet

Write the steps to:


1. Count number of males
2. Find sum of sales if exceed Rs. 100000
3. Find total sales of females only in cell B10
4. Find average sale of male members in B11
5. Find the average sales if the sales is less than 100000
Consider the following worksheet
A B C D
1 Product Units Price Profit
2 A 100 13
3 B 100 18
4 C 100 22
5

The company wants to earn maximum profit with the


following constraints.
•Total production must be 300
•Maximum 50 units of product A must be produce
•Minimum 40 units of B must be produce
•Maximum 40 units of product C should be produce.
Find the number of units to be produce to get the
maximum profit by using solver.
Steps:
 Click at D2 and enter =B2*C2
 Click at D2 and drag the fill handle till D4.
 Click at B5 and enter =SUM(B2:B4)
 Click at D5 and enter = SUM(D2:D4)
 Click at solver, Dialog box appears
 Set target cell as D5 & click at MAX
 Type changing cell as B2:B4
 Click at Add button to add constraints
 Type B5 cell reference =300
 Click at Add button
 Next constraint, B2<=50 & Click at add
 Next constraint, B3>=40 & Click at Add
 Next constraint, B4<=50 & Click at OK
 Click Solve
Create the following worksheets.
A B C
1 Particulars Amount in 2014 Amount in 2020
2 Fees 200000
3 Hostel charges 15000
4 Food & clothing 25000
5 Misc 10000
6 Total Amount

Write the steps to calculate the amount required in 2020


by talking into accounts increase in the fees by 50%,
Hostel charges by 25%, Food & Clothing by 50% & Misc by
30%. Find the total amount required in the cell B6
respectively. Further assuming this target amount required
in 2020, taking into account various other factors in Rs.
450000. Find using Goal seek the amount that has to be
save each month in the next 6 years in the cell A8 to meet
this target amount by assuming no interest on the amount.
Module-III

Consider the following worksheet


A B C D
1 NAME DEPT CITY SALARY
2 DOLLY SALES MUMBAI 20000
3 MANOJ MKT THANE 15000
4 DEEPALI SALES PUNE 25000
5 MITALI A/C THANE 12000
6 KARAN HR NAGPUR 23500

Write the steps:


1) To display data of persons belongs to SALES department.
 Click anywhere in the data or select A1:D6
 Click on Sort & Filter button from Home
 Select Filter, , arrow appears against each column heading.
 Click at arrow in the DEPT column. The filter dialog box
appears.
 Remove check mark from all dept name except SALES.
2. To display records having salary less than 20000.
 Click anywhere in the data or select A1:D6
 Click on Sort & Filter button from Home
 Select Filter, , arrow appears against each column
heading.
 Click at arrow in the Salary column. The filter
dialog box appears.
 Select number filter less than, custom auto
filter box appears, type 20000
 Click at ok
3.To count number of persons in sales dept.
 Click at B8, and type =COUNTIF(B2:B6, “SALES”)
Module-III

The year wise production(million tons)has been


entered in a worksheet.
A B C D E
1 Year Wheat Rice Jawar Bajara
2 2010 80 65 40 15
3 2011 95 70 55 20
4 2012 75 85 50 25
5 2013 86 70 48 18

i) Find the annual production in column F.


 Click at F1 and type ‘Total’
 Click at F2 and enter formula =Sum(B2:E2)
 click at F2 and drag fill handle till F5.
2.Draw column chart for the data
 Select A1:E5
 Click at Insert and select Column chart
 Select the subtype, the basic chart will be created.
 Click anywhere in the chart
 Select Layout from the Chart Tool
 Give the Title of the chart, X & Y axis title

3. To create 3-D Pie chart for Wheat.


 Select B1:B5
 Click at Insert and select Pie chart
 Select the subtype as 3-D pie, the basic chart will be
created.
 Click anywhere in the chart
 Select Layout from the Chart Tool
 Give the Title of the chart.
ii) Calculate HRA @35% of basic salary or Rs.5000
whichever is less
 Click at D2 and enter formula
 Enter formula =MIN(B2*35% , 5000)
 Click at D2 and drag the fill handle to copy
formula till D6.
iii) To calculate net salary
 Click at E2 and enter formula
=SUM(B2:D2)
 Click at E2 and drag formula till E6.
1. Write a project in VB to design a suitable form to
add two numbers and display their sum

Controls and their properties


Object Property Value /setting
Form Name frmSum
Caption Sum
Label1 Name lblNum1
Caption Number1
Label2 Name lblNum2
Caption Number2
Label3 Name lblSum
Caption Sum
Prof Anil Khadse
Object Property Value /setting
Text1 Name txtNum1
Text Blank
Text2 Name TextNum2
Text Blank
Text3 Name TxtSum
Text blank
Command1 Name cmdSum
Caption Sum
Command2 Name cmdClear
Caption Clear
Command3 Name cmdExit
Caption Exit
Prof Anil Khadse
CODE:
Command1
Private Sub cmdSum_Click()
txtSum=Val(txtNum1) + Val(txtNum2)
txtSum=FormatNumber(txtSum,2)
End Sub
Command2:
Private Sub cmdClear_Click()
txtNum1=“ “
txtNum2=“ “
txtSum=“ “
End Sub
Command3:
Private Sub cmdExit_Click()
End
Prof Anil Khadse
Write a Project in VB to design a suitable form to enter total
sales and calculate and display the Commission @8%

Controls and their Properties:


Object Property Value /setting
Form Name frmComm
Caption Commission
Label1 Name lblSales
Caption Total Sales
Label2 Name lblComm
Caption Commission
Text1 Name txtSales
Text “ ” (Blank)
Text2 Name textComm
Text “Prof”Anil(Blank)
Khadse
Object Property Value /setting
Command1 Name cmdCalculate
Caption &Calculate
Command2 Name cmdClear
Caption &Clear
Command3 Name cmdExit
Caption &Exit

Prof Anil Khadse


CODES FOR COMMAND:

Private Sub cmdCalculate_Click()


txtComm = Val(txtSales)*0.08
End Sub

Private Sub cmdClear_Click()


txtSales =“ ”
txtComm=“ ”
End Sub

Private Sub cmdExit_Click()


End
End Sub
Prof Anil Khadse
Write a Project in VB to prepare a form as follows to
enter principal amount, years , rate of interest and
calculate simple and compound interest.
Principal Amount

No. of years

Rate of Interest

Interest Amount

Simple Compound Exit


Prof Anil Khadse
Controls and their properties
Object Property settings
Form Name frmint
Caption Interest Calculation
Label1 Name lblPamt
Caption Principal Amount
Label2 Name lblYears
Caption No. of years

Label3 Name lblRate

Caption Rate of interest

Label4 Name lblInterest

Caption Interest Amount

Prof Anil Khadse


Controls and their properties
Object Property settings
Text1 Name txtAmt
Text “ ” (Blank)
Text2 Name textYears
Text “ ” (Blank)
Text3 Name txtRate
Text “ ” (Blank)
Text4 Name textInt
Text “ ” (Blank)
Locked True
Prof Anil Khadse
Controls and their properties
Object Property settings
Command1 Name cmdSimple
Caption &Simple
Command2 Name cmdCompound
Caption &Compound
Command3 Name cmdExit
Caption &Exit

Prof Anil Khadse


Codes for the different commands:
Private Sub cmdSimple_Click()
txtInt = (Val(txtAmt)*Val(txtyears)*
Val(txtRate))/100
txtInt= FormatNumber(txtInt,2)
End Sub
Private Sub cmdCompound_Click()
txtInt = Val(txtAmt)*(1+Val(txtRate)/100) ^
Val(txtYears) – Val(txtAmt)
txtInt = FormatNumber(txtInt,2)
End Sub
Private Sub cmdExit_Click()
End
End Sub
Prof Anil Khadse
Write a Project in VB to design a suitable form to
enter Basic Salary and calculate and display the
DA @85% of Basic Salary

Controls and their properties

Object Property settings


Form Name frDA
Caption DA
Label1 Name lblBasic
Caption Basic Salary
Label2 Name lblDA
Caption DA

Prof Anil Khadse


Controls and their properties

Object Property settings


Text1 Name txtBasic
Text “ ” (Blank)
Text2 Name textDa
Text “ ” (Blank)
Command1 Name cmdCalculate
Caption &Calculate
Command2 Name cmdClear
Caption &Clear
Command3 Name cmdExit
Caption &Exit
Prof Anil Khadse
CODES FOR COMMAND:
Private Sub cmdCalculate_Click()
txtDa = Val(txtBasic)*0.85
End Sub
Private Sub cmdClear_Click()
txtBasic =“ ”
txtDa=“ ”
End Sub
Private Sub cmdExit_Click()
End
End Sub

Prof Anil Khadse


Project using If ---End If
1. Write a project in VB to design a suitable form to enter
height of a person and display the a message “Allowed to
take a ride” if the height is more than or equal to 55
inches otherwise “Sorry , Not Allowed to take ride”

Controls and properties:


Object Property Value
Form Name frmDecision
Caption Decision
Label Name lblHeight
Caption Height
Text Name txtHt
Caption “ “
Prof Anil Khadse
Object Property Value

Command Name cmdDecision


Button
Caption &Decision
Command Name cmdClear
Button
Caption &Clear
Command Name cmdExit
Button
Caption &Exit

Prof Anil Khadse


CODE:
Private Sub cmdDecision_Click()
Dim H As Integer
H=Val(txtHt)
If H> =55 Then
MsgBox “Allowed to take a Ride”,vbOkOnly
Else
MsgBox “Not Allowed to take a Ride”,vbOkOnly
End If
End Sub
Private Sub cmdClear_Click()
txtHt = “ ”
End Sub
Private Sub cmdExit_Click()
End
End Sub
Prof Anil Khadse
2.Write a project in VB to design a suitable form which
allows the user to enter the name and basic salary and to
calculate Bonus as 30% of basic salary whenever basic
salary is less than 10000 otherwise 40% of basic salary
using CALCULATE button and display the result.

Controls and properties


Object Property Setting
Form Name frmBonus
Caption Bonus
Label1 Name lblName
Caption Name
Label2 Name lblBasic
Caption Basic Salary

Prof Anil Khadse


Label3 Name lbllblBonus
Caption Bonus Amount
Text1 Name txtName
Text Blank
Text2 Name txtBasic
Text Blank
Text3 Name txtBonus
Text Blank
Command1 Name cmdCalculate
Caption &Calculate
Command1 Name cmdExit
Caption &Exit

Prof Anil Khadse


CODES:
Private Sub cmdCalculate_Click()
Dim Basic As Currency
Dim Bonus As Currency
Basic=Val(txtBasic)
If Basic<10000 Then
Bonus = Basic*0.30
Else
Bonus = Basic*0.40
End If
lblBonus=FormatCurrency(Bonus,2)
txtName.SetFocus
End Sub

Prof Anil Khadse


Private Sub cmdExit_Click
End
End Sub

Prof Anil Khadse


3. Write a project in VB to design a suitable form
to enter the name and salary earned by
employee, Calculate and display tax to be
paid as per the following schedule.

Salary Tax
< 500000 Nil
500000 – 1000000 10%
1000000 and more 20%

Prof Anil Khadse


Controls and their properties

Object Property Setting


Form Name frmTax
Caption Tax Calculation
Label1 Name lblName
Caption Name
Label2 Name lblSalary
Caption Salary
Label3 Name lblTax
Caption Tax
Text Box Name txtName
Text “ “

Prof Anil Khadse


Cond..
Object Property Setting
Text Box Name txtSalary
Text “ ”
Text Box Name txtTax
Text “ ”
Command button 1 Name cmdcalculate
Caption &Calculate Tax
Command Button2 Name cmdClear
Caption &Clear
Command Button3 Name cmdExit
Caption &Exit

Prof Anil Khadse


Codes for Commands
Private Sub cmdCalculate_Click()
Dim S,Tax As Single
S=Val(txtSalary)
If S<500000 Then
Tax = 0
Else If S>=500000 And S <1000000
Tax = S*0.10
Else
Tax= S*0.20
End If
txtTax=FormatNumber(Tax,2)
txtName.SetFocus
End Sub

Prof Anil Khadse


Private Sub cmdClear_Click()
txtName = “ ”
txtSalary = “ ”
txtTax= “ ”
End Sub
Private Sub cmdExit_Click()
End
End Sub

Prof Anil Khadse


3. Write a project in VB to design a suitable form which
allow the user to enter 3 numbers and find the largest of
these numbers and display the result in message box

Controls and properties:


Object Property Setting
Form Name frmLargest
Caption Largest
Label1 Name lblNum1
Caption First Number
Label2 Name lblNum2
Caption Second Number
Label3 Name lblNum3
Caption Third Number
Prof Anil Khadse
Text Box Name txtNum1
Text “ “
Text Box Name txtNum2
Text “ “
Text Box Name txtNum3
Text “ “
Command1 Name cmdLargest
Caption &Find Largest
Command2 Name cmdExit
Caption &Exit

Prof Anil Khadse/NKTT


Codes:
Private Sub cmdLargest_Click( )
Dim A,B,C,Largest As Integer
A = Val(txtNum1)
B = Val(txtNum2)
C = Val(txtNum3)
If A>B And A>C then
Largest = A
Else If B>C Then
Largest = B
Else
Largest = C
End If
MsgBox “Lergest Number is” &str(Largest), vbOkOnly
End Sub

Prof Anil Khadse


Private Sub cmdExit_Click
End
End Sub

Prof Anil Khadse


Write a project in VB to design a suitable form
which allow the user to enter any integer and then
display the sum of all integer upto that integer

Controls and properties:

Object Properties Setting


Form Name frmSum
Caption Sum
Label1 Name lblInt
Caption Enter Integer

Text Box Name txtInt


Text “ “
Command 1 Name cmdSum
Caption &Sum

Prof Anil Khadse


Object Properties Setting
Command Button 2 Name cmdClear
Caption &Clear
Command Button 3 Name cmdExit
Caption &Exit

Codes:
Private Sub cmdSum_Click( )
Dim I As Integer
Dim N As Integer
Dim Sum As Integer
N = Val(txtInt)
Sum = 0
For I = 1 To N
Sum = Sum + I
Next I
MsgBox”Sum of Integer is” &str(Sum)
End Sub
Prof Anil Khadse
Private Sub Clear_Click()
txtInt= “ ”
End Sub

Private Sub Exit_Click()


End
End Sub

Prof Anil Khadse


Write a project in VB to design a suitable form
which allow the user to enter any integer and then
display the factorial and sum of squares of integer
upto that integer.

Prof Anil Khadse


?????

You might also like