這段程式里n = (Len(s1) - Len(Replace(s1, s2, ""))) / Len(s2)什么意思啊
Private Sub Command1_Click()
Open "E:\123.txt" For Binary As #1
s1 = StrConv(InputB(LOF(1), 1), vbUnicode)
Close #1
s2 = " "
n = (Len(s1) - Len(Replace(s1, s2, ""))) / Len(s2)
Text1.Text = Val(n)
End Sub
uj5u.com熱心網友回復:
將s1里的s2洗掉掉,n代表洗掉了多少次(原始字串長度減去新字串長度,得到洗掉字串總長,把總長度除以s2這個字串的長度,得到替換次數)。uj5u.com熱心網友回復:
沒錯,是替換的次數!
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/10431.html
標籤:VB基礎類
上一篇:這種字體是什么字體
