Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
'Project B
Public class MyClass
Public Function DoThing(Value as string)
'...
End Sub
End class
'Project A
Public class MyClassA
Public Sub DoSomething()
dim x as ProjectB.MyClass
x.DoThing("Doing something in the class defined in Project B")
End Sub
End Class
'Project A
dim s as string
dim a as New ProjectB._myclass
s=a.Server 'Server is a public variable on _myclass
messagebox.show(s)
'Project B
Public Class _myClass
Private t As String
Public Property test() As String
Get
Return t
End Get
Set(ByVal Value As String)
t = server
End Set
End Property
End Class
'In Project A
dim s as string
dim a as New projectb._myclass
a.test = "testing" 'test is a public property on _myclass
messagebox.show(a.test)