29 lines
922 B
Plaintext
29 lines
922 B
Plaintext
|
'..............................................................................
|
||
|
' Summary A simple hello world - an introduction to JScript language.
|
||
|
' Copyright (c) 2003 by Altium Limited
|
||
|
'..............................................................................
|
||
|
|
||
|
'..............................................................................
|
||
|
sub HelloWorld
|
||
|
ShowMessage("Hello world!")
|
||
|
end sub
|
||
|
'..............................................................................
|
||
|
|
||
|
'..............................................................................
|
||
|
sub ShowAParametricMessage(S)
|
||
|
dim DefaultMessage
|
||
|
|
||
|
DefaultMessage = "Hello World!"
|
||
|
|
||
|
If S = "" Then
|
||
|
ShowMessage(DefaultMessage)
|
||
|
Else
|
||
|
ShowMessage(S)
|
||
|
End If
|
||
|
end sub
|
||
|
'..............................................................................
|
||
|
|
||
|
'..............................................................................
|
||
|
|
||
|
|