在vb中输入一个任意整数,如何实现将各个位数上的数字提取出来

来源：学生作业帮助网编辑：六六作业网时间：2024/12/22 10:46:59

在vb中输入一个任意整数,如何实现将各个位数上的数字提取出来在vb中输入一个任意整数,如何实现将各个位数上的数字提取出来在vb中输入一个任意整数,如何实现将各个位数上的数字提取出来创建两个text控件

在vb中输入一个任意整数,如何实现将各个位数上的数字提取出来
在vb中输入一个任意整数,如何实现将各个位数上的数字提取出来

在vb中输入一个任意整数,如何实现将各个位数上的数字提取出来
创建两个text控件和一个command按钮控件再输入以下代码 Private Sub Command1_Click() For i = 1 To Len(Text1.Text) a = Mid(Text1.Text, i, 1) If IsNumeric(a) = True Then Text2.Text = Text2.Text & a End If Next i End Sub 还有什么不懂的可以问我