frmWarp

[Dr. Spoon]

he could also use

Code:

Select Case SelectWarp.Text
Case "Castle"
    Call WarpTo2(m,x,y)
Case Else
    Call AddText("no such destination", BrightRed)
End Select

just an idea..