10 lines
165 B
Text
10 lines
165 B
Text
|
Option Explicit
|
||
|
|
|
||
|
|
Sub test()
|
||
|
|
Dim Obj As New myObject
|
||
|
|
Obj.Method_1 "Hello to you"
|
||
|
|
Obj.Method_2 "What is your name ?"
|
||
|
|
Obj.Method_1
|
||
|
|
Obj.Method_2
|
||
|
|
End Sub
|