输入一串数字字母间隔的字符串,将其中数字挑选出来,并且在相应的数字之间用 “ * ”分开,如“ a1b2c3d4f ”输出的结果为“ [1*2*3*4*] ”,如图所示。请将下列程序补充完整。 程序代码如下: Private Sub Form_Click() Dim st As String, i As Integer st = InputBox(" 输入数字字母混合的字符串 ") i = 1 Print "["; Do While i <= (1 ) If (Mid(st, i, 1) >= "0") And (Mid(st, i, 1) <= "9") Then Print Mid(st, i, 1); "*"; End If (2 ) Loop Print "]" End Sub