
str是将其它数据类型强制转换为字符串类型,val则相反,强制转换为数据类型
Dim a as integer,b as string
a=100
b=str(a)
b=b+"200"
a=val(b)
结果:a=100200
Val
函数,在它不能识别为数字的第一个字符上,停止读入字符串。那些被认为是数值的一部分的符号和字符,例如美圆号与逗号,都不能被识别。但是函数可以识别进位制符号
&O(八进制)和
&H(十六进制)。空白、制表符和换行符都从参数中被去掉。
下面的返回值为
1615198:
Val("
1615
198th
Street
NE")
在下面的代码中,Val
为所示的十六进制数值返回十进制数值
-1。
Val("&HFFFF")
注意
Val
函数只会将句点()当成一个可用的小数点分隔符。当使用不同的小数点分隔符时,如在国际版应用程序中,代之以
CDbl
来把字符串转换为数字。
'=====================================
Val
函数示例
本示例使用
Val
函数返回字符串中所含的数值。
Dim
MyValue
MyValue
=
Val("2457")
'
返回
2457。
MyValue
=
Val("
2
45
7")
'
返回
2457。
MyValue
=
Val("24
and
57")
'
返回
24。
VB语言中,val一个把数值字符串转为数值的函数,在它不能识别为数字的第一个字符上,停止读入字符串。它返回包含于字符串内的数字,字符串是一个适当类型的数值。通常在visualfoxpro(数据库管理系统)中用的比较多。必要的string参数可以是任何有效的字符串表达式。Val函数,在它不能识别为数字的第一个字符上,停止读入字符串。那些被认为是数值的一部分的符号和字符,例如美圆号与逗号,都不能被识别。但是函数可以识别进位制八进制和十六进制。空白、制表符和换行符都从参数中被去掉。
Val函数的功能是将一个数据行变量转换成数字长整型变量。
如
text1text = "10"
text2text = "11"
text3text = text1text+text2text
按道理应该得到10+11(结果是21),但是返回什么呢返回的是1011 这个是因为运算时候是字符运算 所以这样不行
那么怎么办
text1text = "10"
text2text = "11"
text3text = val(text1text)+val(text2text)
这样就返回21了 因为这里不是计算"11"+"12"而是计算11+12 前者等同于"11" & "12"
如果是字符串或者空格会返回一个0 所以可以利用这一点过滤字符只能输入数字。
Private Sub Command1_Click()
If IsNumeric(Text1Text) And IsNumeric(Text2Text) And IsNumeric(Text3Text) Then
MsgBox Val(Text1Text) + Val(Text2Text) + Val(Text3Text)
Else
MsgBox "请在文本框内输入数字"
End If
End Sub
以上就是关于VB程序中 str 和 val 什么意思 给个例子最好了 谢了全部的内容,包括:VB程序中 str 和 val 什么意思 给个例子最好了 谢了、VB中Val函数的具体作用和用法、请问一下vb中val是什么意思等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)