[.NET] 關於搜尋字串

看板Visual_Basic作者 (Snow)時間15年前 (2008/08/22 02:30), 編輯推噓0(003)
留言3則, 2人參與, 最新討論串1/1
請輸入專案類型(網站專案或者應用程式專案):應用程式專案 我寫了一個關於搜尋字串的程式碼 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)

08/22 04:15, , 1F
為何不用InStr就好, 並且Count設0...
08/22 04:15, 1F
改InStr 我設0他說引數start要大於0 ※ 編輯: snowmanmax 來自: 140.135.43.61 (08/22 12:57)

08/22 14:07, , 2F
設1不就結了 還有.net的字串函數不是都改了 別用舊的吧
08/22 14:07, 2F

08/22 14:07, , 3F
mid()是歷史陳跡了
08/22 14:07, 3F
解決了 原來是TextBox的問題 ※ 編輯: snowmanmax 來自: 140.135.43.61 (08/22 22:13)
文章代碼(AID): #18hRH4Mt (Visual_Basic)