在VB中，将数字字符串转换成数值，可以用哪些函数、方法

val()函数是将字符串转换为数值变量，int()函数是将数值转换为整形变量，类似的还有CSng()、CVar()、CDbl()、CLng()等等。

例如：执行DebugPrint

Val("123456")则在立即窗口显示

123456

你用下面的例子试一下把：

1用强制转换

Dim a as string,i as integer

a="1253"

i=a

现在字符串a就转换成了整型数i。

2用类型转换函数Cint()

Dim a as string,i as integer

a="1253"

i=Cint(a)

3用Val()函数

该函数返回包含于字符串内的数字，字符串中是一个适当类型的数值。

Dim a as string,i as integer

a="1253"

i=Val(a)

说明：这里的“i=Val(a)”实际上也用到了上面说的强制转换数据类型的功能，如果你把前面的定义换成“i as Single”，则输出到i中的数值就是1253这个单精度浮点数据，则不是13这个整数了。

DebugPrint Format(4147739915, "yyyy-mm-dd hh:mm:ss")

结果显示 2013-07-22 09:34:47

VB中可将日期作为实数的一部分来存储。小数点左边的数值表示日期：小数点右边的数值表示时间。负的数值表示在1899 年 12 月 30 日 之前。所以每一天可以用一个整数来表示（以1899-12-30 为0，该日之后为正数，之前为负数） ，对于MSVB 的合法日期，即#100-1-1# 到#9999-12-31#，就有-657434～2958465来表示。

对于给定的日期，用Clng()可以获得该日期的整数，反过来，用Cdate()可以将-657434～2958465范围内的任意整数转换为相应的日期，但问题是，它是如何转换过来的？

公历就是一种阳历，平年365天，闰年366天，每四年一闰，每满百年少闰一次，到第四百年再闰，即每四百年中有97个闰年。公历的历年平均长度（36525日）与回归年（365242189日）只有26秒之差，要累积3300年才差一日。

下面就年份的转换作一分析：

Function myyear(ByVal datenum As Long) As Integer

myyear = 1900 + Int((datenum + Int((datenum - 15) / 36525) - Int((datenum - 15) / 146100 + 175)) / 36525)

End Function

以上代码完全自创，但说实话，觉得自己也是吃饱撑的没事干。

a=Right(a, 1)

b=Right(b, 1)

c=Right(c, 1)

例如：

dim a as string

dim b as string

a=Str$(5)

b=Str$(1)

a=b+a 'a="15"

print "个位是：" & right(a,1) '5

以上就是关于在VB中，将数字字符串转换成数值，可以用哪些函数、方法全部的内容，包括:在VB中，将数字字符串转换成数值，可以用哪些函数、方法、在vb中，怎样把一个数字从string转换为Integer、谁知道用vb 怎么把常规性数值转换成日期数值等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！