|
分類:[.NET 全般]
お世話になります
WinXP,VB.NET2005,Excel2003と言う環境です
CSVから文字列を取得してそれをデータベースに書き込もうとしています
Dim sr As New System.IO.StreamReader(Me.txt_PATH.Text, System.Text.Encoding.Default)
として、Me.txt_PATH.Textに書き込まれた所にあるCSVファイルを読み込んでいます
Dim strRead as String = Nothing
strRead = sr.ReadLine '読込
Dim strData() As String = StrRead.Split(CChar(","))
として、一行ずつ読んで、","毎にstrDataに入れて、加工してデータベースにと言う流れです
文字列の加工なんですが
例えば「"東京都ABC(XP)"」と、「"」と全角と半角が入り混じっていてそこから「東京都ABC」と「(XP)」と分けたいのですが
どの様にすれば取れるのでしょうか
strCharは"東京都ABC(XP)"など加工する文字列を入れる様にしています
Dim intPos1 As Integer = 0
Dim intPos2 As Integer = 0
Dim strMAE As String = ""
Dim strUSIRO As String = ""
intPos1 = strChar.LastIndexOf("(")
intPos2 = strChar.LastIndexOf(")")
If intPos1 <> -1 AndAlso intPos2 <> -1 AndAlso (intPos1 < intPos2) Then
strMAE = strChar.Remove(intPos1, intPos2)
strUSIRO = strChar.Remove(1, intPos1)
End if
としていますがエラーが出たり、正しく取れないのです
よろしくお願いします
|