Re: [.NET] 請教各為神大大,哪裡有錯啊?
以下程式你參考一下
Module Module1
Sub Main()
Dim str As String = "我是丁丁,他是丁丁,誰是丁丁"
Console.WriteLine("字串為:我是丁丁,他是丁丁,誰是丁丁")
Console.WriteLine("")
For Each showstr As String In str.Split(",")
Console.WriteLine(showstr)
Next
Console.Read()
End Sub
End Module
※ 引述《jamanson (jason)》之銘言:
: 我寫了一個小程式,
: 目的是要把句子依符號(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.169.198.126
推
08/16 00:42, , 1F
08/16 00:42, 1F
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):