次の方法で共有


CSng Function

 

Returns an expression that has been converted to a Variant of subtype Single.

Syntax

CSng(expression) 

Remarks

The expression argument is any valid expression.

Use the CSng function to provide conversions from any data type to a Single subtype. For example, CSng forces single-precision arithmetic when currency or integer arithmetic would normally occur.

The CSng function uses the locale setting of your system to determine how to perform conversions. Different decimal separators are properly recognized depending on the locale setting, as are different thousand separators.

If expression lies outside the acceptable range for the Single subtype, an error occurs.

The following example uses the CSng function to convert a value to a Single:

Dim MyDouble1, MyDouble2, MySingle1, MySingle2   ' MyDouble1, MyDouble2 are Doubles.
MyDouble1 = 75.3421115: MyDouble2 = 75.3421555
MySingle1 = CSng(MyDouble1)   ' MySingle1 contains 75.34211.
MySingle2 = CSng(MyDouble2)   ' MySingle2 contains 75.34216.

Requirements

Version 1

Change History

Date

History

Reason

September 2009

Modified remarks.

Customer feedback.

See Also

CBool Function
CByte Function
CCur Function
CDate Function
CDbl Function
CInt Function
CLng Function
CStr Function