Runtime errors can occur when your compiled VBA code is executed. While standard VBA uses the On Error statement for error handling, the XLS Padlock VBA compiler uses a Try...Except block.
When an error occurs within the Try block (or any procedure it calls), the compiler will immediately jump to the Except block for handling.
Syntax #
Try
' ... Code to execute ...
Except
' ... Code to run if an exception occurs ...
EndTip
An unhandled error will be displayed by the VBA compiler at runtime, unless you disable this option.
Code Example #
NumberStr = ""
if InputQuery("Input", "Type an integer from 1 to 7", NumberStr) then
try
Number = StrToFloat(NumberStr)
except
raise("Not a valid number")
end
select case Number
case 1
ShowMessage("One")
case 1 + 1
ShowMessage("Two")
case 4.5 / 1.5
ShowMessage("Three")
case 2 * 2
ShowMessage("Four")
case Length("xxxxx")
ShowMessage("Five")
case 3 + 3, 3 + 4
ShowMessage("Six or Seven")
case else
ShowMessage("You did not type an integer from 1 to 7")
end select
end if
