[VB6 ] 字串包含換行判斷
請教各位一個問題,最近想處理一個字串,但裡面包含有換行字元,我試著模擬
這個字串為A & Chr(10) & Chr(13) & B,結果會像
A
B
但是我想把換行字元除掉,把每一行當作一個新字串,就會有字串A與字串B,我
程式如下。
Private Sub CommandButton1_Click()
Dim a As String
Dim c As Integer
c = 0
Dim data(2) As String
a = ("A" & Chr(10) & Chr(13) & "B")
For i = 1 To Len(a)
data(c) = data(c) & Mid(a, i, 1)
If Mid(a, Len(a), 1) = Chr(10) Then
c = c + 1
End If
If Mid(a, Len(a), 1) = Chr(13) Then
c = c + 1
End If
Next i
End Sub
但把他讀進來後似乎不能用x=Chr(13)這樣,不知道如果遇到字串換行判斷在VB要如何
處理?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.112.192.121
推
09/28 02:58, , 1F
09/28 02:58, 1F
推
09/28 08:43, , 2F
09/28 08:43, 2F
推
09/28 22:43, , 3F
09/28 22:43, 3F
推
09/29 00:23, , 4F
09/29 00:23, 4F
推
09/29 06:19, , 5F
09/29 06:19, 5F
推
10/04 17:20, , 6F
10/04 17:20, 6F
討論串 (同標題文章)
完整討論串 (本文為第 1 之 2 篇):