Re: [討論] 修改CSV格式 請問這樣值多少錢?
'--------VB.net的版本-----------------
Dim sr As New System.IO.StreamReader("C:\data.txt")
Dim sw As New System.IO.StreamWriter("C:\data_out.txt")
Dim data() As String = Split(sr.ReadToEnd(), " ")
sr.Close()
For Each s As String In data
If IsNumeric(s) Then
sw.WriteLine(s)
sw.Flush()
End If
Next
sw.Close()
MsgBox("OK~")
'-------簡單的Case用簡單的方式寫-------:D
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 60.251.170.34
→
12/02 14:56, , 1F
12/02 14:56, 1F
→
12/02 16:22, , 2F
12/02 16:22, 2F
討論串 (同標題文章)
完整討論串 (本文為第 7 之 12 篇)：