Mega Code Archive

 

Categories / VB.Net / Class

 

Use Shared method to construct Object

Imports System Imports System.Drawing Imports System.Data Imports System.IO Imports System.Collections Imports System.Windows.Forms Imports System.Drawing.Printing Public Class MainClass     Shared Sub Main()        Dim newUser As User        newUser = User.CreateUser("Joe", "password15")        Console.WriteLine(newUser.Username)     End Sub End Class Public Class User     Public Username As String     Private password As String     Public Shared Function CreateUser(ByVal username As String, _                      ByVal password As String) As User         Dim user As New User()         user.Username = username         user.Password = password         Return user     End Function End Class