VB点虐 从oracle数据库导出CSV文件

和导出txt文件的操作是一样的。

创新互联是一家专注于网站建设、网站设计与策划设计,定安网站建设哪家好?创新互联做网站,专注于网站建设10多年,网设计领域的专业建站公司;建站业务涵盖:定安等地区。定安做网站价格咨询:028-86922220

sql语句从数据库获得数据集，然后逐条插入到csv

下面代码可以做参考，

Sub CSVdropmark()

Dim mFileName As String = Application.StartupPath + "\EmployeeMaster\ExcelData\BaanID.CSV"

Dim fs As FileStream

Dim st As StreamWriter

Dim reader As System.IO.StreamReader

Dim i As Integer

Dim str As String

reader = New System.IO.StreamReader(mFileName)

Try

fs = New FileStream(Application.StartupPath + "\EmployeeMaster\ExcelData\BaanIDAD.CSV", FileMode.Create, FileAccess.Write)

str = reader.ReadToEnd

str = str.Replace("""", "")

st = New StreamWriter(fs)

st.WriteLine(str)

st.Flush()

Catch ex As Exception

Finally

If Not reader Is Nothing Then reader.Close()

If st IsNot Nothing Then st.Close()

If fs IsNot Nothing Then fs.Close()

End Try

End Sub

vb点虐 导出csv后数字格式问题

这应该是exel自己的问题，和控件以及写csv文件没有关系吧。新建一个exel，敲入001，它也显示的是1。

关于VB.NET的CSV文件的读取

你是怎么读写的呢？下面是简单的读写

Dim str As String = (My.Computer.FileSystem.ReadAllText("C:\QD51-R24_A.csv")) '读

My.Computer.FileSystem.WriteAllText("C:\1.csv", str, True) '写

vb点虐 怎么生成csv文件啊 求具体代码

CSV只不过是用CRLF分行，逗号分列的一个简单文本

先做好行模板，如

Private RowTemp as string ="{0},{1},{2},....{n}"

写入文件时候分行写入

System.IO.StreamWriter.WriteLine(String.format(RowTemp,"数据1”,“数据2"...."数据n"))

文章名称：vb点虐 导出csv vb导出exe文件
转载注明：http://kswjz.com/article/ddggepi.html