Swaping Two Numbers using third variable (VB 6.0)

Write a program in VB 6.0 to Swap Two Numbers using third variable

Private Sub Command1_Click ()
Dim a As Integer
Dim b As Integer
Dim temp As Integer
a = Val(Text1.Text)
b = Val(Text2.Text)
temp = b
b = a
a = temp
Text1.Text = a
Text2.Text = b
End Sub

List of Programs for OOPs Practical File

List of Programs for OOPs Practical File

1. WAP to find the sum of two numbers using function.
2. WAP to find Simple Interest and Compound Interest.
3. WAP to demonstrate the working of following Loops:
While, Do While, For,If-Else, Switch.
4. WAP to find greatest of three numbers.
5. WAP to check whether a number is even or odd.
6. WAP to check whether a year is leap year or not.
7. WAP to add and subtract two matrices.
8. WAP to display elements of an array.
9. WAP to calculate Sum and Average of an array.
10. WAP to sort elements of an array using Bubble sort.
11. WAP to calculate Factorial of a number.
12. WAP to check whether a given number is Prime or not.
13. WAP to generate Fibonacci series.
14. WAP to show function Overloading.
15. WAP to create a class and access member function of a class.