51问答网 > VB编程，急求，从文本框1中输入的一个由字母和数字组成的字符串中找出所有的数字并依次连接，再输

VB编程，急求，从文本框1中输入的一个由字母和数字组成的字符串中找出所有的数字并依次连接，再输

2025-03-09 12:37:24

推荐回答（1个）

回答1：

Private Sub Command1_Click()
T = ""
For i = 1 To Len(Text1)
If Mid(Text1, i, 1) Like "[0-9]" Then
T = T & Mid(Text1, i, 1)
End If
Next
Text2 = T
End Sub

VB编程，急求，从文本框1中输入的 一个由字母和数字组成的字符串中找出所 有的数字并依次连接，再输

VB编程，急求，从文本框1中输入的一个由字母和数字组成的字符串中找出所有的数字并依次连接，再输