說明
Sub Main() Dim Result As Float Result = EXP10(2.0) '100 Debug "EXP10 of 2.0 is ", result, CR Result = EXP10(-2.0) '0.01 Debug "EXP10 of -2.0 is ", result, CREnd Sub