說明
Sub Main() Dim Result As Float Result = ATAN(0.5) 'the Result is 0.46365 Debug "ATAN(0.5) = ", Result,"In radians.", CREnd Sub