CShort

将numeric或string表达式转换为整数（Short）

语法

Declare Function CShort ( ByVal expression As datatype ) As Short Type typename Declare Operator Cast ( ) As Short End Type

用法

result = CShort( numeric expression ) result = CShort( string expression ) result = CShort( user defined type )

参数

expression

要转换为Short值的数字，字符串或指针表达式

datatype

任何数字，字符串或指针数据类型

typename

用户定义的类型

返回值

这个 Short值。

说明

CShort函数舍入小数部分，并返回16位Short值。该函数不检查溢出，并且对于小于-32768或大于32767的值，结果未定义。

该名称可以解释为“转换为短”。

如果参数是字符串表达式，则使用ValInt将其转换为数字。

例子

'使用CSHORT功能转换数值 '创建一个SHORT变量 Dim numeric_value As Short '转换数值 numeric_value = CShort(-4500.66) '打印结果，应该返回-4501 Print numeric_value Sleep

方言差异

与QB差别

参考