vb.net输出文件,vbnet生成dll文件

VB.NET怎么输出指定字符串文本文件

Dim strFilePath As String =SaveFileDialog1.FileName

成都创新互联公司一直秉承“诚信做人，踏实做事”的原则，不欺瞒客户，是我们最起码的底线！ 以服务为基础，以质量求生存，以技术求发展，成交一个客户多一个朋友！为您提供网站设计制作、成都做网站、成都网页设计、小程序开发、成都网站开发、成都网站制作、成都软件开发、重庆APP开发是成都本地专业的网站建设和网站设计公司，等你一起来见证！

Dim sw As StreamWriter = New StreamWriter（strFilePath， True） 'true是指以追加的方式打开指定文件

For i = 0 To j

temp = i.ToString

sw.WriteLine（temp）

sw.Flush（）

Next

sw.Close（）

sw = Nothing

vb.net 导出PDF

利用DataWindow.net在 vb.net 下导出PDF格式文件

利用datawindow.net，导出PDF文件，实现前提：

1.安装Acrobat Distiller虚拟打印机,注意要用datawindow.net提供的打印驱动，在c:\program files\sybase\datawindow.net2.0\driver中,在文章最后，我会提供一个静态安装虚拟打印机的批处理文件，方便安装。

2.安装Ghostscript 7.05 ，在网上找,免费的。

3.导出PDF文件前，一要指定虚拟打印机名，其次导出格式为PDF（Export.PDF.Method=Distill!）,另外还要指定 PDF.Distill.CustomPostScript=Yes。

具体代码如下：

''' summary

''' 导出文件

''' /summary

''' param name="sender"/param

''' param name="e"/param

''' remarks/remarks

Private Sub btnExport_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExport.Click

Try

Dim strFilename, strPrinter As String

Dim saveDg As New SaveFileDialog

strPrinter = Me.dwPrint.Describe("DataWindow.Print.PrinterName")

saveDg.FileName = Me.dwPrint.Tag.ToString

saveDg.Filter = "Pdf文件|*.pdf|Excel文件|*.xls|所有文件|*.*"

If saveDg.ShowDialog = Windows.Forms.DialogResult.OK Then

strFilename = saveDg.FileName

If strFilename.IndexOf(".pdf") 0 Then

Me.dwPrint.Modify("DataWindow.Print.PrinterName='Acrobat Distiller'")

Me.dwPrint.Modify("DataWindow.Export.PDF.Method=Distill!")

Me.dwPrint.Modify("DataWindow.Export.PDF.Distill.CustomPostScript=Yes")

Me.dwPrint.SaveAs(strFilename, Sybase.DataWindow.FileSaveAsType.Pdf, True)

ElseIf strFilename.IndexOf(".xls") 0 Then

Me.dwPrint.SaveAs(strFilename, Sybase.DataWindow.FileSaveAsType.Excel, True)

End If

Me.dwPrint.Modify("DataWindow.Print.PrinterName='" + strPrinter + "'")

MessageBox.Show("导出成功!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)

End If

Catch ex As Exception

MessageBox.Show(ex.Message, "提示", MessageBoxButtons.OK, MessageBoxIcon.Error)

End Try

End Sub

4 批处理文件（实现静默安装）

用VB.NET编一个窗体程序 将程序结果输出为文档格式

写入txt文档的方法，需要一个参数作为写入的字符串：

Private Sub WriteDoc(ByVal wstring As String)

Using sw As New StreamWriter(Application.StartupPath "\output.txt", True)

sw.Write(wstring)

End Using

End Sub

vb.net控制台程序运行后，怎样将输出结果生成文件

首先执行Sub Main()

①定义两个变量a=45 b=18

②将a和b作为sum过程的两个参数x=45(按值传递)，y=18(按地址传递，将在过程中改变b的初始值)

③xy满足条件，将 x-y=45-18=27 赋值给x ；将 x+y=27+18=45 赋值给y，此时改变了b值为45.

④输出x的值27 y的值45

⑤输出a的值45 b的值45