Dobrý deň. Pracujem na programe, ktorý robí konverziu z jedného typu súboru do iného typu súboru. Využívam pri to Rich Text Box. Program prechádza každým jedným znakom súboru a znaky, ktoré v novom súbore nemajú byť jednoducho odstraňuje. Narazil som však na problém. Zadefinoval som do programu, aby ignoroval reťazec čiarka a reťazec prechod na ďaľší riadok. Čiarku mi program ignoruje, tak ako má, ale prechod na ďaľší riadok (vbCrLf) mi nechce ignorovať. Do nového reťazca mi pridá znak prázdny štvorček. Pritom vbCrLf majú byť štvorčeky dva. Neviem, čo mám zadať do podmienky, aby mi program ignoroval prechod na ďaľší riadok. Pre príklad uvádzam časť súboru, ktorý sa má skonvertovať a rozhodovaciu časť zdrojového kódu. Prosím o radu, ako to urobiť. Ďakujem. Súbor pre konverziu: SID,,01071665 STYPE,,TYPE1 STDATE,,5/29/2007 11:22:47 AM SPR1,16.90003,17.78335,18.69997 SPR2,16.90003,17.76902,18.69997
Dim file As String
Dim NumOfChars As Integer
Dim ActualString As String = ""
file = ListBox1.SelectedItem.ToString()
convertBox.LoadFile(file, RichTextBoxStreamType.PlainText)
For NumOfChars = 0 To convertBox.TextLength - 1
convertBox.Select(NumOfChars, 1)
ActualString = convertBox.SelectedText.ToString
If ActualString = "," Or ActualString = vbCrLf Then
TempString = TempString
Call saveTempString()
Else
TempString = TempString & ActualString
End If
ActualString = ""
Next NumOfChars
|