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
|
|
'..............................................................................
|
|
|
|
'..............................................................................
|
|
|
|
|