Write a program to demonstrate Constructors and Destructors in VB.net.

WAP to Demonstrate Constructors and Destructors in VB.net.

 

Imports System.Console

Module Module1

Class base

Private a As Integer

Private b As Double

Private c As String

 

Public Sub New(ByVal x As Integer, ByVal y As Double, ByVal z As String)

WriteLine("Constructor Of Base Class Executed ! ")

a = x

b = y

c = z

WriteLine("a=" & a)

WriteLine("b=" & b)

WriteLine("c=" & c)

End Sub

 

Protected Overrides Sub finalize()

WriteLine("Destructor of Base Class Executed ! ")

End Sub

End Class

 

Class derive : Inherits base

Private d As Integer

Public Sub New(ByVal e As Integer, ByVal x As Integer, ByVal y As Double, ByVal z As String)

MyBase.New(x, y, z)

WriteLine("Constructor of Derived Class Executed!")

d = e

WriteLine("d=" & d)

End Sub

Protected Overrides Sub finalize()

WriteLine("Destructor of Derived Class Executed ! ")

End Sub

End Class

 

Sub Main()

WriteLine("When WE Declare Object of Base Classs :- ")

WriteLine()

WriteLine()

Dim s1 As base = New base(20, 30.5, "GOGO")

 

WriteLine("When WE Declare Object of Derived Classs :- ")

WriteLine()

WriteLine()

Dim s2 As derive = New derive(10, 20, 30.5, "GOGO")

 

End Sub

 

End Module

OUTPUT

Program to implement Constructors and Destructors in VB.net

output of vb.net Program to implement Constructors and Destructors

Read More
admin October 17, 2014 0 Comments

Program in VB.Net to build a class which implements an interface

Que : Write a program in VB.Net to build a class which implements an interface

Ans:

Imports System.Console

 

Interface inf1

Sub show()

Sub disp()

End Interface

 

Class class1 : Implements inf1

 

Public Sub disp() Implements inf1.disp

WriteLine("Disp of class 1")

End Sub

 

Public Sub show() Implements inf1.show

WriteLine("show of Class 1")

End Sub

End Class

 

 

Module Module1

Sub Main()

Dim obj As class1 = New class1()

obj.disp()

obj.show()

 

End Sub

 

End Module

OUTPUT :

 

Read More
admin October 17, 2014 0 Comments

Program to demonstrate abstract class and abstract methods in VB.net.

Ques :Write a program to demonstrate abstract class and abstract methods in VB.net. (more…)

Read More
admin October 17, 2014 0 Comments