发布网友
共2个回答
热心网友
不给你的相信我
那些没有发展前 景。推猫,这款软件刚上 市不到一年,使用者已经人山人海。每天几 块到十 几 块。我和同学们都在玩我们班特别流行。但在互联网这个大 数 据时代!没有粉 丝是万万不行的,只要人多,很重要。顺便说一句 片你我是脑残。
激 活【邀 请 码】是【UHQJ9C】,【注 册 时 用 处 多 多哦】!
热心网友
' 用这个函数就可以实现 你的要求: Function strlen(ByVal ss$) As String Dim I%, a, b$ a = Split(ss) For I = 0 To UBound(a) b = b & " " & Len(a(I)) Next I strlen = Trim(b) End Function ' 调用可以用下面的语句,在窗体上单击后,在窗体上显示结果 “1 2 3”: Private Sub Form_Click() Dim ss$ ss = "a bb ccc" Print strlen(ss) End Sub追答打开就可以了,自己去了就知道了 ditu/www.vip366366.com?xbVx