CSng Function

Named Arguments



expression (required; Numeric or String)

The range of expression is -3.402823E38 to -1.401298E-45 for negative values, and 1.401298E-45 to 3.402823E38 for positive values.

Return Value

expression cast as a Single data type


Returns a single-precision number

Rules at a Glance

  • expression must evaluate to a numeric value; otherwise, a type-mismatch error is generated.

  • If the value of expression is outside the range of the Double data type, an overflow error is generated.


Dim sngMyNumber As Single
If IsNumeric(sMyNumber) Then
    sngMyNumber = CSng(sMyNumber)
End If

Programming Tips and Gotchas

  • You can use IsNumeric to test an expression before passing it to CSng.

  • When converting a string representation of a number to a numeric, you should use the data type conversion functions — such as CSng — instead of Val, because the data type conversion functions take into account the computer’s regional settings. The thousands separator is the most important of these regional settings. For example, if the value of expression is the string 1,234.987, CSng converts it to 1234.987, while Val incorrectly converts it to 1.

  • Like most of the conversion functions, CSng is not actually a function in the Microsoft.VisualBasic namespace. Instead, it is similar to a Visual C++ macro; the compiler translates the function call into inline code.

See Also

CDbl Function

Get VB.NET Language in a Nutshell, Second Edition now with O’Reilly online learning.

O’Reilly members experience live online training, plus books, videos, and digital content from 200+ publishers.