Name
CShort Function
Named Arguments
No
Syntax
CShort(expression)-
expression(required; Numeric or String) The range of
expressionis -32,768 to 32,767; fractions are rounded.
Return Value
expression cast as a Short
Description
Converts expression to a Short value; any
fractional portion of expression is
rounded.
Rules at a Glance
expressionmust evaluate to a numeric value; otherwise, a type-mismatch error is generated.If the value of
expressionis outside the range of the Short data type, an overflow error is generated.When the fractional part of
expressionis exactly .5, CShort always rounds it to the nearest even number. For example, .5 rounds to 0, and 1.5 rounds to 2.
Example
Dim iMyNumber as Short
If IsNumeric(sMyNumber) then
iMyNumber = CShort(sMyNumber)
End IfProgramming Tips and Gotchas
When converting a string representation of a number to a numeric, you should use the data type conversion functions — such as CShort — instead of Val, because the data type conversion functions take into account the system’s regional settings. In particular, CShort recognizes the thousands separator if it’s present in
expression, whereas Val does not. For example, ifexpressionis 1,234, CShort successfully converts it to the integer value 1234, while Val converts it to 1.Use IsNumeric to test whether
expressionevaluates to a number before performing the conversion.CShort differs from the Fix and Int functions, which truncate, rather than round, the fractional part of a number. Also,
Become an O’Reilly member and get unlimited access to this title plus top books and audiobooks from O’Reilly and nearly 200 top publishers, thousands of courses curated by job role, 150+ live events each month,
and much more.
Read now
Unlock full access