Dim nSqr nSqr = Sqr(4) ' Zwraca 2 nSqr = Sqr(23) ' Zwraca 4.79583152331272 nSqr = Sqr(0) ' Zwraca 0 nSqr = Sqr(-4) ' powoduje błąd runtime