CShort
Converts numeric or string expression to an integer (`Short`)
Syntax
`
Declare Function CShort ( ByVal expression As datatype ) As Short
Type typename
Declare Operator Cast ( ) As Short
End Type
`
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
`datatype`
any numeric, string, or pointer data type
`typename`
a user defined type
Return Value
A `Short` 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
`
Dialect Differences

- Not available in the -lang qb dialect unless referenced with the alias `__Cshort`.

Differences from QB

- New to FreeBASIC

See also

- `CByte`
- `CUByte`
- `CUShort`
- `CInt`
- `CUInt`
- `CLng`
- `CULng`
- `CLngInt`
- `CULngInt`
- `CSng`
- `CDbl`