Vb.net 2010如何提取文本框中的数字？

Label1。文本= " "

标签2。文本= " "

Dim a为String = TextBox1。文本

Dim b As String = TextBox2。文本

对于x = 1到a .长度

Dim txt As String = Mid(a，x，1)

如果txt像“#”那么

Label1。Text = Label1。文本& amp文本文件（textfile）

如果…就会结束

然后

对于x = 1到b .长度

Dim txt As String = Mid(b，x，1)

如果txt像“#”那么

标签2。Text = Label2。文本& amp文本文件（textfile）

如果…就会结束

然后

这个方法使用mid将一个字符串拆分成单个字符，然后用like运算符比较它是否是一个数字。如果不了解这两个功能的用法，可以自己搜索一下。还有其他方法，这里就不多说了。