CShort
Converts numeric or string expression to an integer (Short)
result = CShort( numeric expression )
result = CShort( string expression )
result = CShort( user defined type )
expression
The CShort function rounds off the decimal part and returns a 16 bit Short value. The function does not check for an overflow, so be sure not to pas a value thats less/larger then -32768 to 32767. The name can be explained as 'Convert to Short'.
If the argument is a string expression, it is converted to numeric by using ValInt.
Syntax
Usage
result = CShort( numeric expression )
result = CShort( string expression )
result = CShort( user defined type )
Parameters
expression
a numeric, string, or pointer expression to cast to a Short value
datatypeany numeric, string, or pointer data type
typenamea user defined type
Return Value
Description
The CShort function rounds off the decimal part and returns a 16 bit Short value. The function does not check for an overflow, so be sure not to pas a value thats less/larger then -32768 to 32767. The name can be explained as 'Convert to Short'.
If the argument is a string expression, it is converted to numeric by using ValInt.
Example
' Using the CSHORT function to convert a numeric value
'Create an SHORT variable
Dim numeric_value As Short
'Convert a numeric value
numeric_value = CShort(-4500.66)
'Print the result, should return -4501
Print numeric_value
Sleep
'Create an SHORT variable
Dim numeric_value As Short
'Convert a numeric value
numeric_value = CShort(-4500.66)
'Print the result, should return -4501
Print numeric_value
Sleep
Dialect Differences
- Not available in the -lang qb dialect unless referenced with the alias __Cshort.
Differences from QB
- New to FreeBASIC
See also
