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.
private in_length
...
public Property Get count
count = in_length
end Property
public Property Let count(newValue)
in_length = newValue
End property
<ClassName>.count = 5
..
dim newCount
newCount = <ClassName>.count
Class HelloWord
public function display()
MsgBox "Hello Word"
End function
End class
Class Test
private myHelloWord
public sub Class_Initialize
Set myHelloWord = new HelloWord
end sub
public Property Get displayer
Set displayer = myHelloWord
end Property
public Property Let displayer(newValue)
myHelloWord = newValue
End property
public Property Set displayer(newValue)
Set myHelloWord = newValue
End property
End Class