vb点虐 创建文本文件 vb创建word文档

vb点虐 中如何新建文本文档，并向其中写入字符？

按你说的方式，需要用到钩子

创新互联建站坚持“要么做到，要么别承诺”的工作理念，服务领域包括：网站制作、成都网站设计、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的固原网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！

建议你用File类进行操作，保存为TXT文件

祝好运，望采纳

我想用vb点虐 做一个程序，新建一个文本文件并打开（最前段），逐字显示我预先设定的文字（不是一

用StreamReader和StreamWriter读写文本文件，在读取的过程中判断字符串即可。

如何在VB中建立word文档，并写入文字和图片？

首先说明，你这样是写TXT，不是DOC，虽然Word可以打开，但根本就不是Word文件。当然不能存储图片了。请参考我以下的代码。建一个Command1。

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

Dim

ap

As

Word.Application,

doc

As

Document

Private

Sub

Form_Load()

'这个过程不必做修改，是建立一个新的Word文档

Set

ap

=

CreateObject("word.application")

ap.Visible

=

True

Set

doc

=

ap.Documents.Add

End

Sub

Private

Sub

Command1_Click()

doc.Content.InsertAfter

Text:="请输入你要输入的内容"

'插入文字，请使用这种格式

doc.Shapes.AddPicture

FileName:="D:\a.jpg"

'插入图片，请使用这种格式，路径自己写

End

Sub

其他问题再找我。

vb点虐 创建一个txt文本，在debug文件夹里

设计一个窗口，添加一个名为textBox1的System.Windows.Forms.TextBox，

添加一个名为button1的System.Windows.Forms.Button。

为button1的单击事件添加如下处理函数：

Sub Button1Click(sender As Object, e As EventArgs)

'f是你的文本文件的文件名

Const f As String="t.txt"

Dim sw As System.IO.StreamWriter=Nothing

Try

If Not System.IO.File.Exists(f) Then

sw=System.IO.File.CreateText(f)

Else

sw=New System.IO.StreamWriter(f,True)

End If

sw.WriteLine(textBox1.Text)

Finally

If sw IsNot Nothing Then

sw.close()

End If

End Try

End Sub