下面和程序功能是将一个由字母与数字相混的字符串中选出字符串,并把该字符串在窗体上打印出来,
Option Explicit
Private Sub Command1_Click()
Dim s As String,k As Integer
Dim rAs String,i As Integer,tAs String
s=“aa11bb22Cc33”
For i=1 To Len(s)
t=()
Ift >=“a”And t<=“z”Or t >=“A”And t<=“Z”Then
r=r & t
End If
Next i
Print r
End Sub