资讯

精准传达 • 有效沟通

从品牌网站建设到网络营销策划,从策略到执行的一站式服务

vb.net文件处理 vbnet wcf

vb.net保存后怎么打开

vb.net保存后在菜单文件中打开。

创新互联公司是一家集网站建设,华蓥企业网站建设,华蓥品牌网站建设,网站定制,华蓥网站建设报价,网络营销,网络优化,华蓥网站推广为一体的创新建站企业,帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿,时刻以成就客户成长自我,坚持不断学习、思考、沉淀、净化自己,让我们为更多的企业打造出实用型网站。

在菜单中文件中选择生成EXE文件,然后打开Exe文件就可以了。

VB.NET是基于.NET框架的完全对向对象的编程语言,而vb6.0只是半面向对象的语言,使用vb.net可以编制出功能更加强大的windows程序。

在VB.NET中实现文件的拖放

本文介绍了在VB NET中如何实现接受拖放的文件 即从资源管理器中拖放到应用程序中的时候 自动获取拖放的文件 文中的例子是一个接受拖放文件显示文件内容的VB NET实例程序 引言

对于文本格式的文件 我们可以直接拖到记事本中就可以看到内容 各种类型的图片 拖到Photoshop中 就可以直接对其编辑 我们如何在VB NET开发的程序也实现上述效果呢?

思路

我们知道 每一个Windows的应用程序都有一个消息队列 程序的主体接受系统的消息 然后分发出去(给一个form 或者一个控件) 接受者有相应的程序来处理消息 在 NET的Form中 默认情况下程序是不翻译这些消息的 也就是说默认我们的Class是不加入应用程序的消息泵 能不能把我们的Form Class加入应用程序的消息泵呢?可以!

在 NET中 任何一个实现IMessageFilter 接口的类 可以添加到应用程序的消息泵中 以在消息被调度到控件或窗体之前将它筛选出来或执行其他操作 使用 Application 类中的 AddMessageFilter 方法 可以将消息筛选器添加到应用程序的消息泵中

于是我们在程序加载的时候 调用Application AddMessageFilter(Me) 然而 默认情况下一个Form或者控件是不能接受拖放的文件的 我们调用一个WIN API DragAcceptFiles源码天空 这个API可以设置对应的控件是否能接受拖放的文件 然后可以用DragQueryFile查询拖放到的文件列表 也就是拖放文件地具体路径和文件名

代码

Imports System Runtime InteropServices

Public Class Form

Inherits System Windows Forms Form

Implements IMessageFilter

API申明

Const WM_DROPFILES = H   拖放文件消息

DllImport( shell dll ) Public Shared Sub DragFinish(ByVal hDrop As Integer)

End Sub

DllImport( shell dll ) Public Shared Sub DragAcceptFiles(ByVal hwnd As Integer ByVal fAccept As Boolean)

End Sub

DllImport( shell dll ) Public Shared Function DragQueryFile(ByVal HDROP As Integer ByVal UINT As Integer ByVal lpStr As System Text StringBuilder ByVal ch As Integer) As Integer

End Function

Private Sub Form _Load(ByVal sender As System Object ByVal e As System EventArgs) Handles MyBase Load

Application AddMessageFilter(Me)

DragAcceptFiles(TextBox Handle ToInt True)

End Sub

Function PreFilterMessage(ByRef m As Message) As Boolean Implements IMessageFilter PreFilterMessage

If m Msg = WM_DROPFILES Then

设置拖放的动作

Dim nfiles As Int

nfiles = DragQueryFile(m WParam ToInt Nothing )

Dim i As Int

Dim *** As New System Text StringBuilder( )

Dim sFirstFileName As String 记录第一个文件名

TextBox Clear()

For i = To nfiles

DragQueryFile(m WParam ToInt i *** )

If i = Then sFirstFileName = *** ToString

TextBox AppendText(ControlChars CrLf *** ToString)

Next

DragFinish(m WParam ToInt ) 拖放完成

显示文件内容

Dim fs As New System IO FileStream(sFirstFileName IO FileMode Open)

Dim sr As New System IO StreamReader(fs System Text Encoding GetEncoding( gb ))

TextBox AppendText(ControlChars CrLf sr ReadToEnd() ToString)

fs Close()

sr Close()

End If

Return False

End Function

Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)

If disposing Then

If Not (ponents Is Nothing) Then

ponents Dispose()

End If

End If

Application RemoveMessageFilter(Me)

DragAcceptFiles(TextBox Handle ToInt False)

MyBase Dispose(disposing)

End Sub

lishixinzhi/Article/program/net/201311/13043

关于VB .NET文件处理?

我来回答:

用我的记事本程序建立的文件(扩展名为abc)如何关联到我的记事本程序,双击之后能够直接打开?

修改注册表,添加一个文件类型,并指定该文件类型打开程序的路径,除此,还要在代码里编写一个参数,代表双击(*.abc)文件的路径,代码如下(c#):

Main(string

arg)

{

//arg就是打开文件名的路径

}

同时能够显示程序的图标,就是建立的扩展名为abc的文件显示的图标和记事本程序的图标一样?

还是要修改注册表,把上一步建立的注册表的文件类型添加一个icon键,然后指定图标,很简单的,网上搜索下就出来了,我不细说了

目前我更改打开方式直接打开.abc的文件内容为空,而用我那个记事本程序打开确有内容,这是为什么呢?

因为你更改“打开方式”,也就是说,双击*.abc文件类型的文件,会打开您编写的“记事本”程序,但只是打开了,具体显示文件内容您还没有编写,所以您只能看到打开了,而并没有内容,方法上面说过了,添加参数(c#):

Main(string

arg)

{

//arg就是打开文件名的路径

StreamReader

sr=new

StreamReader(arg);

string

s

=

sr.ReadToEnd;

sr.Close();

}

看到了吗?这样s变量显示的就是文件内容,把它赋值到您要显示的文本框里就ok了~

vb.net二进制怎么读取文件?

一、二进制文件读写

1、写二进制数据到指定目录

==将barray字节数组中的数据创建在strFilename目录文件下,存储格式为二进制,False表示不添加,直接覆盖创建。

2、从指定路径下读取二进制数据到数组

==将目录中的文件读取到barry字节数组中,即读取二进制文件。

二、字符文件的读写

1、 将txtFile控件中的字符写到srtFileName指定目录,以创建方式。

2、从srtFileName目录中的文件读取到txtFile控件


本文名称:vb.net文件处理 vbnet wcf
分享链接:http://cdkjz.cn/article/ddophoo.html
多年建站经验

多一份参考,总有益处

联系快上网,免费获得专属《策划方案》及报价

咨询相关问题或预约面谈,可以通过以下方式与我们联系

大客户专线   成都:13518219792   座机:028-86922220