锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net新建文档 vbs 新建文件

IT技术文档

如何在VB中建立word文档 ， 并写入文字和图片？首先说明vb.net新建文档 ， 你这样是写TXTvb.net新建文档，不是DOCvb.net新建文档，虽然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.net 如何创建一个word文档Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
System.IO.Directory.CreateDirectory("C:\我的文件夹") '创建目录,路径就自己改吧,如果路径存在,就没必要创建了
System.IO.File.Create("C:\我的文件夹\我的文件.doc") '在指定目录下创建word文档
End Sub
VB.NET 创建文件夹用Directory.CreateDirectory即可创建文件夹vb.net新建文档：
' 建立目录
If Not Directory.Exists("C:\负屃\"TextBox1.Text) Then '检查文件夹是否存在
Directory.CreateDirectory("C:\负屃\"TextBox1.Text)'不存在vb.net新建文档，创建文件建夹
End If
你vb.net新建文档的例子是因为少了一个"\"引起vb.net新建文档的，正确的如下vb.net新建文档：
Dim fsotest As New FileSystemObject
If fsotest.FileExists("C:\负屃\"TextBox1.Text) = False Then
fsotest.CreateFolder("C:\负屃\"TextBox1.Text) '这里你少了一个\
End If
MsgBox("创建成功")
VB.Net怎么创建文件举个例子：
先引入命名空间：
Imports
System.IOImports
System.Security.AccessControl
代码：
Dim
sec
As
DirectorySecurity
=
New
DirectorySecurityDim
rule
As
FileSystemAccessRule
=
New
FileSystemAccessRule("Administrator",
FileSystemRights.Delete,
AccessControlType.Allow)sec.AddAccessRule(rule)Directory.CreateDirectory("C:\test",
sec)
这段代码就是以
Administrator
帐户
在
C:\
创建
test
文件夹 。
vb.net不能在c盘建立txt文件是的 。vb.net不能在c盘建立txt文件是由于其格式不支持所导致的 ， 通过更换文件格式即可解决 。c盘通常下是系统盘，也就是主要存放安装操作系统和软件的分区盘 。
【vb.net新建文档 vbs 新建文件】关于vb.net新建文档和vbs 新建文件的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：如何正确安装4路服务器的CPU？ 4路服务器cpu怎么放

    下一篇：gis里输入要素，gis输入要素类