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

默认分类 未结 1 1646
____Hnrp°↘
____Hnrp°↘ 2023-03-20 13:42
1条回答
  • 2023-03-20 14:26

    Private Sub Form_Click() Dim a As Variant Dim strT As String Dim i As Long a = Split(Text1.Text, " ") For i = LBound(a) To UBound(a) If Trim(a(i))

    0 讨论(0)
提交回复