vb编程题~输入一段英文短文,将其中每个单词的首字母改为大写,若有两个或两个以上的连续空格……输入一段英文短文,将其中每个单词的首_其他解答

vb编程题~输入一段英文短文,将其中每个单词的首字母改为大写,若有两个或两个以上的连续空格……
输入一段英文短文,将其中每个单词的首字母改为大写,若有两个或两个以上的连续空格,把它们删成一个空格,将修改后的短文显示出来.

人气：262 ℃　时间：2020-05-20 01:44:18

解答

Private Sub Form_Click()Dim a As VariantDim strT As StringDim i As Longa = Split(Text1.Text," ")For i = LBound(a) To UBound(a)If Trim(a(i)) vbNullString ThenstrT = strT & UCase$(Left$(a(i),1)) & Right...