Question

VB数字和字母不能混输入记录 dim a as string a=val(text1.text) pring a 显示0 是什么原因

我在text1里输入a-2012-001

Answer 1

原因：
楼主多用了一个函数val()！

解决方法：
在这个题目中，没有必要使用val()这个函数，你直接写成：
dim a as string
a=text1.text
print a
这样子就可以显示text1中的全部内容了！

解释：
a=val(text1.text)是取text1中的内容从左到右出现的第一个非数字字符前面的所有数字，比如：
text1中是“12345dsaop”时，a=val(text1.text)＝12345
text1中是“808顺45F*Ujhyg”时，a=val(text1.text)＝808
假如text1中的第一个字符并不是数字，则返回“0”，如：
text1中是“MN28892saf匣光998788”时，a=val(text1.text)＝0

特别提醒：
楼主把显示命令print误打成了pring。这个字VB是不认识的。

Answer 2

string表示a是字符串变量
val是将字符串转换为数值
val和string类型不符

其实如果text1.text的内容如果是纯数值就没有什么问题，但是如果不是纯数值内容，经过val函数的时候就会出现变异，字符内容在数值内容前结果为0，数值内容在字符内容前则会截取数值内容

Answer 3

数据类型自动转换了