SUB printAll cdecl (count As Integer, ... ) DIM arg AS Any Ptr DIM i AS Integer arg = va_first() FOR i = 1 To count PRINT va_arg(arg, Double) arg = va_next(arg, Double) NEXT i END SUB printAll 3, 3.1415, 1.4142, 2.71828