Register forum user name Search FAQ

Gammon Forum

Notice: Any messages purporting to come from this site telling you that your password has expired, or that you need to verify your details, confirm your email, resolve issues, making threats, or asking for money, are spam. We do not email users with any such messages. If you have lost your password you can obtain a new one by using the password reset link.

Due to spam on this forum, all posts now need moderator approval.

 Entire forum ➜ MUSHclient ➜ VBscript ➜ Return value for functions

Return value for functions

It is now over 60 days since the last post. This thread is closed.     Refresh page


Posted by Edgeofforever   (25 posts)  Bio
Date Sat 01 Jan 2005 07:37 PM (UTC)
Message
This is basically what I'm trying to do:

weaponOne = Call weaponConvert(weaponOne)


sub weaponConvert(wName, newName)

if wName = "the ancient sword of the kami" then
newName = "Kami"
end if
end sub


I want weaponOne to go from "the ancient sword of the kami" to "kami". I don't see exactly how to do this with the vbscripting, this format just gives me an error.

Appriciate any help.
Top

Posted by Scypio   Poland  (50 posts)  Bio
Date Reply #1 on Sat 01 Jan 2005 07:45 PM (UTC)
Message
That's because in VB (and VBScript) you don't use subs this way, you need to use functions, like:

Function weaponConvert(wName)
if Name = "the ancient sword of the kami" then weaponConvert = "Kami"
End Function

Also, if you use the 'if.. then.. else' subroutine within one line, you don't need to use 'end if'.
You can also use functions in place of subs - this way you can trap errors and easily get return values, like:
if LoadFile(file)=true then ..
Top

Posted by Edgeofforever   (25 posts)  Bio
Date Reply #2 on Sat 01 Jan 2005 08:03 PM (UTC)
Message
Works perfectly, thanks for the advice.
Top

The dates and times for posts above are shown in Universal Co-ordinated Time (UTC).

To show them in your local time you can join the forum, and then set the 'time correction' field in your profile to the number of hours difference between your location and UTC time.


25,569 views.

It is now over 60 days since the last post. This thread is closed.     Refresh page

Go to topic:           Search the forum


[Go to top] top

Information and images on this site are licensed under the Creative Commons Attribution 3.0 Australia License unless stated otherwise.