<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
	>

<channel>
	<title>Trek Innovations &#187; Oops Concepts</title>
	<atom:link href="http://www.trekinnovations.com/category/oops-concepts/feed/" rel="self" type="application/rss+xml" />
	<link>http://www.trekinnovations.com</link>
	<description>Thoughts For You</description>
	<lastBuildDate>Wed, 10 Feb 2010 13:59:12 +0000</lastBuildDate>
	<generator>http://wordpress.org/?v=2.9.1</generator>
	<language>en</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
			<item>
		<title>Worked Out Examples Of Oops Concepts in Console Application Using VB.NET</title>
		<link>http://www.trekinnovations.com/2008/11/worked-out-examples-of-oops-concepts-in-console-application-using-vbnet/</link>
		<comments>http://www.trekinnovations.com/2008/11/worked-out-examples-of-oops-concepts-in-console-application-using-vbnet/#comments</comments>
		<pubDate>Sun, 16 Nov 2008 13:41:20 +0000</pubDate>
		<dc:creator>admin</dc:creator>
				<category><![CDATA[Oops Concepts]]></category>
		<category><![CDATA[VB.NET]]></category>
		<category><![CDATA[Abstract Class]]></category>
		<category><![CDATA[Classes]]></category>
		<category><![CDATA[Constructors]]></category>
		<category><![CDATA[Exception Handling]]></category>
		<category><![CDATA[Inheritance]]></category>
		<category><![CDATA[Interfaces]]></category>
		<category><![CDATA[Jagged Arrays]]></category>
		<category><![CDATA[Method Overloading]]></category>
		<category><![CDATA[Method Overriding]]></category>
		<category><![CDATA[Overloading Methods]]></category>
		<category><![CDATA[Shared Variable]]></category>
		<category><![CDATA[Single Dimension Arrays]]></category>
		<category><![CDATA[Structures]]></category>
		<category><![CDATA[Two Dimensional Arrays]]></category>
		<category><![CDATA[Using ME Object]]></category>

		<guid isPermaLink="false">http://www.trekinnovations.com/?p=263</guid>
		<description><![CDATA[In this article I gave the examples for all Oops concepts in console applications using VB.NET. This article is only for the beginners who want to learn .NET. And in my next article I will give the same examples using C#. 
In this article you will see the examples for: 

Single Dimension Arrays
Two Dimensional Arrays
Jagged [...]]]></description>
			<content:encoded><![CDATA[<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">In this article I gave the examples for all Oops concepts in console applications using VB.NET. This article is only for the beginners who want to learn .NET. And in my next article I will give the same examples using C#. </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">In this article you will see the examples for: </span></p>
<ol style="margin-top: 0cm;" type="1">
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Single Dimension Arrays</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Two Dimensional Arrays</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Jagged Arrays</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Structures</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Classes</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Method Overloading</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Constructors</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Default Constructors</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Shared Constructors</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Constructor Overloading</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Shared Variable</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Parameterised Constructors</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Using ME Object</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inheritance</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Overloading Methods</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Method Overriding</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Constructor With Inheritance</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">My Base with Constructor</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Abstract Class</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Interfaces</span></li>
<li class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Exception Handling</span><span style="font-size: 10pt; font-family: Verdana;"> </span></li>
</ol>
<p class="MsoNormal"><span id="more-263"></span></p>
<p class="MsoNormal">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">SINGLE DIMENSION ARRAYS:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1 </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>Sub </span><span style="font-size: 10pt; font-family: Verdana;">Main</span><span style="font-size: 10pt; font-family: Verdana;">()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim i As Integer </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim NUM() As Integer = {10, 20, 30, 40, 50}</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(NUM.Length) </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To NUM.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(NUM(i) &amp; Constants.vbTab)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">SINGLE DIMENSIONS ARRAYS ACCEPTING VALUES FROM KEYBOARD:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1 </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub </span><span style="font-size: 10pt; font-family: Verdana;">Main</span><span style="font-size: 10pt; font-family: Verdana;">()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim i As Integer </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim NUM(4) As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(NUM.Length) </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To NUM.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>NUM(i) = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To NUM.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(NUM(i) &amp; Constants.vbTab)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">SINGLE DIMENSION ARRAYS USING REDIM AND REDIM PRESERVE:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1 </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub </span><span style="font-size: 10pt; font-family: Verdana;">Main</span><span style="font-size: 10pt; font-family: Verdana;">()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim i, max As Integer </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim NUM() As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter howmany numbers you want to store : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>max = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>ReDim NUM(max &#8211; 1)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(NUM.Length) </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To NUM.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>NUM(i) = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To NUM.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(NUM(i) &amp; Constants.vbTab)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>&#8216;Add 2 more locations in an array</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>ReDim Preserve NUM(NUM.Length + 1)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(NUM.Length) </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To NUM.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(NUM(i) &amp; Constants.vbTab)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>NUM(5) = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>NUM(6) = Console.ReadLine() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To NUM.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(NUM(i) &amp; Constants.vbTab)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">RECTANGULAR ARRAYS:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim i, j As Integer </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim NUM(,) As Integer = {{10, 20}, {30, 40}, {50, 60}}</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(NUM.Length)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To 2</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For j = 0 To 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(NUM(i, j) &amp; Constants.vbTab)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">RECTANGULAR ARRAYS :<span> </span>ASSIGINING VALUES FOR KEYBOARD </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim i, j, Array_item As Integer </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim NUM(2, 1) As Integer </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(NUM.Length)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To 2</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For j = 0 To 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>NUM(i, j) = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For Each Array_item In NUM</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(Array_item)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">JAGGED ARRAYS:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim i, j As Integer </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim NUM(3)() As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;No. of Rows : &#8221; &amp; NUM.Length) </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>ReDim NUM(0)(3)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>ReDim NUM(1)(2)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>ReDim NUM(2)(0)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>ReDim NUM(3)(1)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To NUM.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>Console.WriteLine(&#8220;No. of Cols in Row&#8221; &amp; i + 1 &amp; &#8221; : &#8221; &amp; NUM(i).Length)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To NUM.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For j = 0 To NUM(i).Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(NUM(i)(j) &amp; Constants.vbTab)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>Console.WriteLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">STRUCTURES: USING PUBLIC ACCESS SPECIFIER:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Structure Employee</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public eno As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public ename As String</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public salary As Single</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(eno &amp; Constants.vbTab &amp; ename &amp; Constants.vbTab &amp; salary)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Structure </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim e1 As Employee</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e1.eno = 10</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e1.ename = &#8220;Ramana&#8221;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e1.salary = 10000</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e1.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim e2 As Employee</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e2.eno = 11</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e2.ename = &#8220;Ramesh&#8221;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e2.salary = 15000</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e2.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">STRUCTURES : USING PRIVATE ACCESS SPECIFIER:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Structure Employee</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private eno As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private ename As String</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private salary As Single</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub SetData(ByVal en As Integer, ByVal estr As String, ByVal sal As Single)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>eno = en</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>ename = estr</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>salary = sal</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(eno &amp; Constants.vbTab &amp; ename &amp; Constants.vbTab &amp; salary)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Structure </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim e1 As Employee</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e1.SetData(10, &#8220;Ramana&#8221;, 10000)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e1.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim e2 As Employee</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e2.SetData(11, &#8220;Ramesh&#8221;, 15000)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>e2.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">CLASSES: </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private n1, n2 As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Accept()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter First Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>n1 = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter First Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>n2 = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Function Addition() As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Return n1 + n2</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Function</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Function Subtract() As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Subtract = n1 &#8211; n2</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Function</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Accept()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; t1.Addition())</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; t1.Subtract()) </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t2 As New Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2.Accept()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; t2.Addition())</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; t2.Subtract())</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private num, n2 As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Accept()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Show()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Value of num : &#8221; &amp; num)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Modify()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num += 10</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End class </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test()<span> </span>&#8216; Creating an object and Allocating memory in run time</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Accept()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t2 As Test &#8216; Declaring an object</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2 = t1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Modify()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Show()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2.Show()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;- </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Structure Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private num, n2 As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Accept()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Show()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Value of num : &#8221; &amp; num)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Modify()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num += 10</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Structure </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test() &#8216; Creating an object and Allocating memory in run time</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Accept()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t2 As Test &#8216; Creating an object and Allocating memory in complie time</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2 = t1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>t1.Modify()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Show()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2.Show()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">METHOD OVERLOADING:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;- </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Hello&#8230;.&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Display(ByVal x As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(x)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Display(ByVal s As Single)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>Console.WriteLine(s)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Display(ByVal x As Integer, ByVal c As Char)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(x &amp; Constants.vbTab &amp; c)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display(100)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display(3.14F)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display(1000, &#8220;a&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private num As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub SetData(ByVal n As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num = n</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(num)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub<span> </span></span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.SetData(10)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t2 As New Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2.SetData(20)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">CONSTRUCTORS:DEFAULT CONSTRUCTOR:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private num As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num = 100</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(num)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t2 As New Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">PARAMATRISED CONSTRUCTOR:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private num As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub New(ByVal n As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num = n</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(num)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test(100)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t2 As New Test(200)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t3 As New Test() &#8216;Gives an error</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t3.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">CONSTRUCTOR OVERLOADING:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private num As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num = 10</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub New(ByVal n As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num = n</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(num)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test(100)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"> </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t2 As New Test(200)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2.Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"> </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t3 As New Test()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t3.Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"> </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;- </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">USING ME OBJECT:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private num As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub New(ByVal num As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Me.num = num</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(Me.num)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test(100)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t2 As New Test(200)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2.Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">SHARED VARIABLE:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Shared cnt As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private num As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub New(ByVal n As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num = n</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Modify()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>num += 10</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>cnt += 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(cnt &amp; Constants.vbTab &amp; num)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test(100)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Modify()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t2 As New Test(200)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t2.Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Modify()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(Test.cnt)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">SHARED CONSTRUCTOR &amp; SHARED SUBPROGRAM OR SHARED METHOD:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;- </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Shared cnt As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Shared Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>cnt = 100</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Shared Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(cnt)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>Test.Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">INHERITANCE:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;- </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Rectangle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Area()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Area&#8230;&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Circle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits Rectangle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Perimeter()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Perimeter&#8230;&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim c1 As New Circle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>c1.Perimeter()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>c1.Area() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim r1 As New Rectangle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>r1.Area()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">OVERLOADING METHOD BETWEEN 2 CLASSES:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Rectangle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Area(ByVal l As Integer, ByVal b As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Rectangle Area&#8230; : &#8221; &amp; (l * b))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Circle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits Rectangle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Overloads Sub Area(ByVal r As Intege</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Circle Area&#8230; : &#8221; &amp; (3.14 * r * r))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Perimeter(ByVal r As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Circle Perimeter&#8230; : &#8221; &amp; (2 * 3.14 * r))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim c1 As New Circle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>c1.Perimeter(10)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>c1.Area(10)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>c1.Area(10, 20) </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim r1 As New Rectangle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>r1.Area(100, 200)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">METHOD OVERRIDING:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Rectangle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Overridable Sub Area()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Rectangle Area&#8230; : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Circle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits Rectangle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Overrides Sub Area()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Circle Area&#8230; : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Perimeter()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Circle Perimeter&#8230; : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim c1 As New Circle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>c1.Perimeter()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>c1.Area() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim r1 As New Rectangle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>r1.Area()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">PROTECT ACCESS SPECIFIER, SHADOW DATA: </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">USING MYBASE WITH SUBPROGRAMS,DATA AND CONSTRUCTOR:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class First</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Protected x, y As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Overridable Sub SetData(ByVal i As Integer, ByVal j As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>x = i</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>y = j</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Overridable Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Value of First X : &#8221; &amp; x)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Value of First Y : &#8221; &amp; y)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Second</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits First</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private Shadows y As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private z As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Overrides Sub SetData(ByVal i As Integer, ByVal j As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>MyBase.SetData(10, 20)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>y = i</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>z = j</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Overrides Sub Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>MyBase.Display()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Value of Second Y : &#8221; &amp; y)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Value of Second Z : &#8221; &amp; z)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Value of First Y in Second : &#8221; &amp; MyBase.y)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"> </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim s1 As New second</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>s1.SetData(100, 200)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>s1.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim f1 As New First</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>f1.SetData(11, 22)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>f1.Display() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">CONSTRUCTOR WITH INHERITANCE:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;- </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class First</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Default in First&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Second</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits First</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Default in Second&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim s1 As New Second</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">CONSTRUCTOR WITH INHERITANCE USING PARAMATERISED CONSTRUCTOR:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class First</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Default in First&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Second</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits First</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Default in Second&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New(ByVal msg As String)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(msg)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim s2 As New Second(&#8220;Perameterised in Second&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">MYBASE WITH CONSTRUCTOR:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class First</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Default in First&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New(ByVal msg As String)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(msg)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Second</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits First</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>MyBase.New(&#8220;Perameterised in First&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Default in Second&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New(ByVal msg As String)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(msg)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim s1 As New Second</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim s2 As New Second(&#8220;Perameterised in Second&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">ABSTRACT CLASS:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">MustInherit Class Shape</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Protected n1, n2 As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New(ByVal n1 As Integer, ByVal n2 As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Me.n1 = n1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Me.n2 = n2</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>MustOverride Sub Area()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Rectangle</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits Shape</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New(ByVal x As Integer, ByVal y As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>MyBase.New(x, y)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Overrides Sub Area()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Rectangle Area : &#8220;(n1 * n2))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Square</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits Shape</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>MyBase.New(11, 22)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Overrides Sub Area()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Square Area : &#8220;((n1 * n2) / 2))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim r1 As New Rectangle(10, 20)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>r1.Area() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim s1 As New Square</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>s1.Area()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">INTERFACES:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Interface ABC</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Addition(ByVal x As Integer, ByVal y As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Subtraction(ByVal x As Integer, ByVal y As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Interface</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Interface XYZ</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Multiply(ByVal x As Integer, ByVal y As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Division(ByVal x As Integer, ByVal y As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Interface </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Implements ABC, XYZ</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Addition(ByVal x As Integer, ByVal y As Integer) Implements ABC.Addition</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; (x + y))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"> </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Subtraction(ByVal x As Integer, ByVal y As Integer) Implements ABC.Subtraction</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; (x &#8211; y))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"> </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Division(ByVal x As Integer, ByVal y As Integer) Implements XYZ.Division</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; (x / y))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"> </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Multiply(ByVal x As Integer, ByVal y As Integer) Implements XYZ.Multiply</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; (x * y))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Addition(10, 20)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Subtraction(10, 5)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Multiply(10, 20)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Division(10, 5)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">ONE INTERFACE INHERITS ANOTHER INTERFACE:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;- </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Interface ABC</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Addition(ByVal x As Integer, ByVal y As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Subtraction(ByVal x As Integer, ByVal y As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Interface</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Interface XYZ</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits ABC</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Multiply(ByVal x As Integer, ByVal y As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Division(ByVal x As Integer, ByVal y As Integer)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Interface</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Implements XYZ</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Addition(ByVal x As Integer, ByVal y As Integer) Implements ABC.Addition</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; (x + y))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"> </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Subtraction(ByVal x As Integer, ByVal y As Integer) Implements ABC.Subtraction</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; (x &#8211; y))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"> </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Division(ByVal x As Integer, ByVal y As Integer) Implements XYZ.Division</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; (x / y))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"> </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Public Sub Multiply(ByVal x As Integer, ByVal y As Integer) Implements XYZ.Multiply</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; (x * y))</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim t1 As New Test</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Addition(10, 20)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>t1.Subtraction(10, 5)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Multiply(10, 20)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>t1.Division(10, 5)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">EXCEPTION HANDLING:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;- </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim n1, n2, res As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter First<span> </span>Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>n1 = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>Console.Write(&#8220;Enter Second<span> </span>Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>n2 = Console.ReadLine() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>res = n1 \ n2</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; res)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Catch ex As DivideByZeroException</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Second number cannt be zero&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Catch ex As InvalidCastException</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(ex.Message)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Catch ex As OverflowException</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(ex.StackTrace)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Last statement&#8230;&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim n1, n2, res As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter First<span> </span>Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>n1 = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Second<span> </span>Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>n2 = Console.ReadLine() </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>res = n1 \ n2</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; res)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Catch ex As Exception</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(ex.Message)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Last statement&#8230;&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim num1() As Integer = {10, 20, 30, 40, 50, 60, 70, 80}</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim num2() As Integer = {2, 0, 5, 4, 0}</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim res, i As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To num1.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>res = num1(i) \ num2(i)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; res)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>Catch ex As Exception</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(ex.Message)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Try </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim num1() As Integer = {10, 20, 30, 40, 50, 60, 70, 80}</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim num2() As Integer = {2, 0, 5, 4, 0}</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim res, i As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>For i = 0 To num1.Length &#8211; 1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>res = num1(i) \ num2(i)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; res)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Catch ex As DivideByZeroException</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(ex.Message)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Next</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Catch ex As IndexOutOfRangeException</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>Console.WriteLine(ex.Message)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Try<span> </span></span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">THROW EXCEPTION:</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212; </span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim n1, n2, res As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter First<span> </span>Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>n1 = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Second<span> </span>Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>n2 = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>If n2 = 0 Then</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Throw New DivideByZeroException()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Else</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>res = n1 \ n2</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; res)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End If</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Catch ex As Exception</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(ex.Message)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Finally</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Last statement&#8230;&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Try<span> </span></span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim n1, n2, res As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter First<span> </span>Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>n1 = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Second<span> </span>Number : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>n2 = Console.ReadLine()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>If n2 = 0 Then</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Throw New DivideByZeroException()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Else</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>res = n1 \ n2</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Result : &#8221; &amp; res)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End If</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Catch ex As Exception</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(ex.Message)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Finally</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Last statement&#8230;&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Try<span> </span></span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Class NilBalanceException</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Inherits Exception</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Private strErrorMsg As String</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>strErrorMsg = &#8220;Cant withdraw&#8230;&#8221;</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub New(ByVal msg As String)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>strErrorMsg = msg</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Function Display() As String</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Return strErrorMsg</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Function</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Class</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">Module Module1</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Sub Main()</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Dim amt As Integer</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.Write(&#8220;Enter Amount to withdraw : &#8220;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>amt = Console.ReadLine()<span> </span></span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>If amt = 0 Then</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Throw New NilBalanceException(&#8220;Error Occured&#8230;&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Else</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(&#8220;Transtation Completed&#8230;.&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End If</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Catch ex As NilBalanceException</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Console.WriteLine(ex.Display)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>Finally</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span><span> </span>Console.WriteLine(&#8220;Last statement&#8230;&#8221;)</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Try</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;"><span> </span>End Sub</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">End Module</span></p>
<p class="MsoNormal"><span style="font-size: 10pt; font-family: Verdana;">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8211;</span></p>
<p>Happy Coding&#8230;&#8230;&#8230;&#8230;&#8230;&#8230;&#8230;&#8230;&#8230;&#8230;&#8230;&#8230;&#8230;</p>
]]></content:encoded>
			<wfw:commentRss>http://www.trekinnovations.com/2008/11/worked-out-examples-of-oops-concepts-in-console-application-using-vbnet/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
		<item>
		<title>Object-Oriented Programming Concepts</title>
		<link>http://www.trekinnovations.com/2008/11/object-oriented-programming-concepts/</link>
		<comments>http://www.trekinnovations.com/2008/11/object-oriented-programming-concepts/#comments</comments>
		<pubDate>Fri, 07 Nov 2008 22:02:34 +0000</pubDate>
		<dc:creator>admin</dc:creator>
				<category><![CDATA[Oops Concepts]]></category>
		<category><![CDATA[Abstract Classes]]></category>
		<category><![CDATA[Basic concepts of Oops]]></category>
		<category><![CDATA[Classes]]></category>
		<category><![CDATA[Constructors]]></category>
		<category><![CDATA[Encapsulation]]></category>
		<category><![CDATA[Interfaces]]></category>
		<category><![CDATA[Object]]></category>
		<category><![CDATA[object oriented programming]]></category>
		<category><![CDATA[Reference Type Data types]]></category>
		<category><![CDATA[Structures]]></category>
		<category><![CDATA[Value Type Data Types]]></category>

		<guid isPermaLink="false">http://www.trekinnovations.com/?p=196</guid>
		<description><![CDATA[Basic Concepts of Oops
Value Type Data Types
 1. Memory allocates at compile time in stacks
 2. De-allocation will be take care by stacks 
 
Reference Type Data types
 1. Memory allocates at runtime time in heap
 2. De-allocation will be take care by Garbage Collector 
 
Classes
 1. It’s a reference type data type
 2. [...]]]></description>
			<content:encoded><![CDATA[<p class="MsoNormal" style="text-align: justify;"><span style="color: #0000ff;"><strong><span style="text-decoration: underline;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Basic Concepts of Oops</span></span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Value Type Data Types</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. Memory allocates at compile time in stacks</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. De-allocation will be take care by stacks </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Reference Type Data types</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. Memory allocates at runtime time in heap</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. De-allocation will be take care by Garbage Collector </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Classes</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. It’s a reference type data type</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. It’s a user defined data type </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>3. Collection of properties (data) and behaviour (functions) is called a class</span></p>
<p class="MsoNormal" style="text-align: justify;"><span id="more-196"></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Structures</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. It’s a value type data type</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. It’s a user defined data type </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>3. Collection of properties (data) and behaviour (functions) is called structures</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>4. We can’t define default constructor </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>5. It will not support inheritance </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Object</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. Any real time entity is called an object</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. Instance of a class is also called as an object</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Encapsulation</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;">Wrapping (binding) up of some information (data and functions) within a <span> </span>single entity (class) is called an encapsulation.</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;"> </span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Data Hiding</span></strong></span></p>
<p class="MsoNormal" style="margin-left: 11.25pt; text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;">Restricting some information (private data/functions) within a single entity (class) is called as data hiding<span>.</span></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Polymorphism</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>Poly means many and morphism means actions</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>I.e. many actions with a single name is called polymorphism </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>Ex: Function overloading, operator overloading</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Functions/Method Overloading<span> </span></span></strong></span></p>
<p class="MsoNormal" style="margin-left: 11.25pt; text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;">Defining same function name for more than one function body is called as function overloading.<span> </span></span></p>
<p class="MsoNormal" style="margin-left: 11.25pt; text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;">CLR will select the appropriate function depending upon no. of arguments we are passing into the function. If no. of arguments is same, CLR will select the corresponding function with respect to the which type of argument we are passing.</span></p>
<p class="MsoNormal" style="margin-left: 11.25pt; text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Constructors</span></strong></span></p>
<p class="MsoNormal" style="margin-left: 11.25pt; text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;">1. Constructors are useful to assign initial values while we are creating an <span> </span>object</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. Constructors are special functions in C#.net </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>3. Constructors are special procedures in VB.net</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>4. It must be define with public</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>5. Name of the constructor is same as a class name</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>6. Constructors will call automatically, whenever we are creating an object. </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;"><span> </span>Types of constructors<span> </span></span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. Default Constructor</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span><span> </span>Will not receive any arguments</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. Parameterised Constructor</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>Will receive arguments</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>3. Constructor overloading </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>Within a class, if we have more than one constructor, then it’s called constructor overloading.</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Static Data</span></strong></span></p>
<p class="MsoNormal" style="margin-left: 11.25pt; text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;">1. Memory allocates only once throughout the program and it can be shared by each and every object</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. We can call static data directly using class name, without creating an object<span> </span></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Static Functions<span> </span></span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. Within static functions we can use static data or it must be a local variable</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. We can call static Functions directly using class name</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>3. We cannot use instance-data (class data/variable) in static functions</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>3. We can’t use &#8216;this&#8217; object in static functions</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Static Constructors</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. Static constructors are useful to assign initial values to the static variables</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. We cannot pass arguments into the static constructors.</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>3. It will not allow using access specifier and by default its &#8216;public&#8217;.</span><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;"> </span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;"> </span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Static Class</span></strong></span></p>
<p class="MsoNormal" style="margin-left: 10.5pt; text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;">1. If a class contains only static variables and/or static functions and/or static constructors, then that class is called as static class</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. We cannot create an object of static class.</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">&#8216;Constant&#8217; Data</span></strong></span></p>
<p class="MsoNormal" style="margin-left: 11.25pt; text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;">1. Memory allocates only once thru out the program and it can be shared by <span> </span>each and every object</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. We have to assign initial value while we are declaring variable</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>3. Value in &#8216;const&#8217; variable is fixed thru out the program and we cannot change</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>4. All &#8216;const&#8217; variables are static by default. So, we can call &#8216;const&#8217; variable directly using class name</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">&#8216;Read only&#8217; Data</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span><strong>1. &#8216;Read only’ instance</strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. Memory allocates for each and every object</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. We can assign initial value or modify the value only in constructors </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;"><span> </span>2. &#8216;Read only&#8217; static</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. Memory allocates only once thru out the program and it can be shared by each and every object</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. We can assign initial value or modify the value only in static constructors.</span></p>
<p class="MsoNormal" style="text-align: justify;">
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Abstract Classes</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. A class which is not fully defined is called Abstract Class i.e. we may or may not implement the function within the current class. If we will not implement, at least we have to provide, signature / prototype of the function and we have to implement the function within derived function.</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. With in a class, if we have function signature/prototype, then that function is called as Abstract function. To declare abstract function, we have to use &#8216;abstract’ keyword. </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>3. With in a class, if we have at least one abstract function, then that class is called as abstract class. To define abstract class, we have to use &#8216;abstract’ keyword</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>4. We cannot create an object for abstract class</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>5. We can declare variables</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>6. We can also define constructors</span></p>
<p class="MsoNormal" style="text-align: justify;">
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Interfaces<span> </span></span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. Dot Net does not support multiple inheritance.</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. If we want to develop multiple type inheritance applications, we have to use, interfaces</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>3. Interface contains only abstract functions</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>4. It will not allow using access specified and by default its &#8216;public&#8217;</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>5. We can declare only &#8217;static&#8217; and &#8216;const&#8217; variables</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>6. An interface inherits another interface</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Final class</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>1. Final class cannot inherited</span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>2. All static classes are final classes<span> </span></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"> </span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="color: #000000;"><strong><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;;">Partial Class</span></strong></span></p>
<p class="MsoNormal" style="text-align: justify;"><span style="font-family: &quot;Verdana&quot;,&quot;sans-serif&quot;; color: #000000;"><span> </span>Using partial classes we can split definition of a class over two or more source files.</span></p>
]]></content:encoded>
			<wfw:commentRss>http://www.trekinnovations.com/2008/11/object-oriented-programming-concepts/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
	</channel>
</rss>
