作者snowmanmax (Snow)
看板Visual_Basic
標題[.NET] 關於搜尋字串
時間Fri Aug 22 02:30:25 2008
請輸入專案類型(網站專案或者應用程式專案)：應用程式專案
我寫了一個關於搜尋字串的程式碼
Private Sub search()
Dim data As String = "abacadaeaf"
Dim count As Integer = 1
Dim save(5) As String
For i As Integer = 0 To 4
count = InStr(count, data, "a", CompareMethod.Text)
save(i) = Mid(data, count, 2)
count += 1
Next i
For j As Integer = 0 To 4
TextBox1.Text += save(j) + ","
Next j
End Sub
預設跑出來應該要"ab,ac,ad,ae,af,"
不知道哪邊有想錯@@ 跑出來結果只出現 "af,"
請問這段程式碼要如何改？？
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.135.43.61
※ 編輯: snowmanmax 來自: 140.135.43.61 (08/22 02:56)
1F：→ horngsh:為何不用InStr就好, 並且Count設0... 08/22 04:15
改InStr 我設0他說引數start要大於0
※ 編輯: snowmanmax 來自: 140.135.43.61 (08/22 12:57)
2F：→ MOONRAKER:設1不就結了 還有.net的字串函數不是都改了 別用舊的吧 08/22 14:07
3F：→ MOONRAKER:mid()是歷史陳跡了 08/22 14:07
解決了 原來是TextBox的問題
※ 編輯: snowmanmax 來自: 140.135.43.61 (08/22 22:13)