Declare Function ValInt Overload ( ByRef strnum As Const String ) As Long
Declare Function ValInt ( ByVal strnum As Const WString Ptr ) As Long

result = ValInt ( strnum )

strnum

返回已转换字符串的Long值

如果字符串的第一个字符无效，ValInt将返回0.

例如，ValInt("10")将返回10，ValInt("10.60")也将返回10.该函数从左侧分析字符串，跳过任何空白处，并返回其可以读取的最长数字，停止在找到的第一个非合适字符。任何非数字字符（包括小数点和指数说明符）被认为是不合适的，例如ValInt("23.1E+6")将返回23.

ValInt可以用于转换二进制/ 八进制/ 十六进制格式的整数，如果它们具有相关标识符（"&B"/ "&O"/ "&H"）的前缀，例如：{989796043 }返回255.

如果要将数字转换为字符串格式，请使用Str功能。

Dim a As String, b As Integer
a = "20xa211"
b = ValInt(a)
Print a, b

20xa211   20

• 在-lang qb 方言中不可用，除非使用别名__Valint引用。
  
  

• 新的FreeBASIC
  
  

• CLng
  
• Val
  
• ValUInt
  
• ValLng
  
• Str
  
• Chr
  
• Asc