[.NET] 請教各為神大大,哪裡有錯啊?

看板Visual_Basic作者 (jason)時間18年前 (2007/08/11 01:19), 編輯推噓3(302)
留言5則, 3人參與, 最新討論串1/2 (看更多)
我寫了一個小程式, 目的是要把句子依符號(ex.逗號)分開, 比方說下面這段話: "我是丁丁,他是丁丁,誰是丁丁" 將他分開印出成:我是丁丁 他是丁丁 誰是丁丁 但是卻不知道有什麼問題,弄不太出來 以下是我的程式,請教各為神大大,問題出在哪裡? ==================================================== Module Module1 Sub Main() Dim count As Integer = 0, i, j, k As Integer Dim str, showstring As String Dim sen As String() = New String() {} Console.WriteLine("請輸入任何只有中文字的句子") str = Console.ReadLine() For i = 1 To Len(str) If Mid(str, i, 1) = "," Then sen(j) = Mid(str, k + 1, i - 1) '我懷疑問題出現在這裡?? k = i j += 1 End If Next For Each showstring In sen Console.WriteLine("{0}", showstring) Next Console.Read() End Sub End Module ===================================================== 補充一下,我用的是VB2005express -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.160.238.62 ※ 編輯: jamanson 來自: 218.160.238.62 (08/11 01:19)

08/11 09:30, , 1F
記得VB2005好像也可以用 陣列=spilt(字串,分隔符號)
08/11 09:30, 1F

08/11 11:34, , 2F
Join(Split(字串, ","), vbCrLf)
08/11 11:34, 2F

08/11 11:35, , 3F
Join(字串.Split(","), vbCrlf)
08/11 11:35, 3F

08/11 11:41, , 4F
記得標題要用[.NET] 不是VB6
08/11 11:41, 4F

08/11 14:31, , 5F
Join要怎麼用啊?
08/11 14:31, 5F
文章代碼(AID): #16l9uKhO (Visual_Basic)
文章代碼(AID): #16l9uKhO (Visual_Basic)