vb怎样解析数字?
1个回答
展开全部
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
Dim i As Integer
i = Val(TextBox1.Text)
TextBox2.Text = i \ 100 Mod 10
TextBox3.Text = i \ 10 Mod 10
TextBox4.Text = i Mod 10
End Sub
Textbox.text的内容通常是文数字(alphanumeric)
也就是文字跟数字可能混合出现
要做数值运算需先转成纯数值处理
可以使用val()函数来转换
现在可以想像下输入的数字是几位数?
可能会超过三位
那就输入12345好了
要取出百位数字
有个方法是
12345/100 = 123.45
12345\100 = 123
123 mod 10 = 3
\是整数除法
若用/会有小数点问题要处理
而mod是取馀数的意思
123/10=12馀3
mod就是显示馀多少用的
在C语言中,mod对应的是%,只有整数取馀数才能正常执行
这类取位数问题皆可依此类推
大概就会写出如上的程式码
事件是采TextChanged
也就是在文本框每改变一符号就执行一次
在Form1.vb连点两下Textbox应该就是那事件了
Dim i As Integer
i = Val(TextBox1.Text)
TextBox2.Text = i \ 100 Mod 10
TextBox3.Text = i \ 10 Mod 10
TextBox4.Text = i Mod 10
End Sub
Textbox.text的内容通常是文数字(alphanumeric)
也就是文字跟数字可能混合出现
要做数值运算需先转成纯数值处理
可以使用val()函数来转换
现在可以想像下输入的数字是几位数?
可能会超过三位
那就输入12345好了
要取出百位数字
有个方法是
12345/100 = 123.45
12345\100 = 123
123 mod 10 = 3
\是整数除法
若用/会有小数点问题要处理
而mod是取馀数的意思
123/10=12馀3
mod就是显示馀多少用的
在C语言中,mod对应的是%,只有整数取馀数才能正常执行
这类取位数问题皆可依此类推
大概就会写出如上的程式码
事件是采TextChanged
也就是在文本框每改变一符号就执行一次
在Form1.vb连点两下Textbox应该就是那事件了
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询