vb的text中肿么删除小数点后的内容

要删除文本框Text中的小数点后内容，可以使用Len（）函数和Mid（）函数来实现。首先，将文本框的文本内容转换成整数型数值，然后根据数值的长度来确定显示的位数。最后再将整数型数值转换成字符型数值并设置到文本框中即可。Text1.Text=Mid(Val(Text1.Text),1,Len(Val(Text1.Text)))这个程序代码的意思就是：将Text1中存储的数值转换成整型数值，然后提取出前Len(Val(Text1.Text))位的数字，并将这Len(Val(Text1.Text))位数字存放到一个变量中（例如A1），然后根据字符长度换算成字符型数值并存放到文本框中即可。另外还可以使用Mid（）函数结合正则表达式来实现删除小数点后内容，代码如下：Text1.Text=Text1.Text Replace(Mid(Text1.Text,3,Len(Text1.Text)-2),".","")这个程序代码的意思就是：将Text1中存储的数值转换成整型数值，然后提取出前Len(Text1.Text)位的数字，并将这Len(Val(Text1.Text))位数字存放到一个变量中（例如A1），然后根据字符长度换算成字符型数值并存放到文本框中即可。以上就是删除文本框小数点后内容的两种方法。希望能够帮到你。