vb.net双击文件 vbnet打开指定文件夹

vb.net2005利用webbrowser实现类似资源管理器功能，希望双击txt文件时不进行操作，直接读取里边数据

取得到FileName然后就读文件呗

File.ReadAllText(filename,Encoding.Default)

vb.net文件关联后获取文件路径

vb.net双击文件我没有设置关联vb.net双击文件，只是把文件拖到程序文件上打开vb.net双击文件，应该是一样vb.net双击文件的。

主要是看程序启动时的命令行参数My.Application.CommandLineArgs，里面包括要打开的文件路径。

在Sub Main 或者 启动窗口的Load事件里添加代码

If My.Application.CommandLineArgs.Count 0 AndAlso My.Computer.FileSystem.FileExists(My.Application.CommandLineArgs(0)) Then‘参数不为空且文件存在

Dim s As New IO.StreamReader(My.Application.CommandLineArgs(0))

MsgBox(s.ReadToEnd)

End If

vb.net双击文件你还可以处理更多的命令行参数。

关于命令行参数

vb.net如何调用打开外部excel文档

第一步，新建项目。

1

打开vb.net，也就是打开Microsoft visual studio 2010，第一次使用的时候设置为basic语言就行。新建项目--打开excel。

2

新建成功。

END

第二步，添加引用。

1

“项目”--“添加引用”。

2

添加Microsoft Excel 14.0 Object Library。

END

第三步，添加打开文件对话框工具。

1

工具箱--对话框--openfiledialog。

2

添加成功。

END

第四步，添加命令按钮控件。

1

工具箱--公共控件--button。

在控件上右击鼠标，进入属性设置。

2

text属性设置为“打开excel”。

3

name属性也设置为“打开excel”。

END

第五步，编写程序。

1

鼠标双击命令按钮，进入编程界面，编写程序。

END

第六步，运行程序。

1

鼠标单击启动调式图标，程序开始运行。

2

单击打开excel命令按钮，调用打开文件对话框，选择自己要打开的excel文件。

END

第七步，保存程序。

第一次程序运行完，关闭程序，出现关闭项目提示，选择保存。

2

选好自己要保存的位置。

vb.net如何在listbox中增加双击事件?

给ListBox添加DoubleClick事件，然后通过ListBox的SelectedItem就知道用户双击了哪一个Item

补充：

晕，我还以为是WinForm呢。楼主你说清楚是ASP.NET啊！

给你个思路，给listbox（也就是HTML的select）添加一个ondoubleclick属性，调用JavaScript代码，设法标记双击的对象并通知页面提交。如果有困难我再给你写代码

===================

补充：例子做好喽

Default.aspx

***********

%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Default.aspx.vb" Inherits="WebApplication1._Default" %

!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" ""

html xmlns=""

head runat="server"

title演示/title

script type="text/javascript"

function Move() {

var myForm = document.getElementById("% = Me.form1.ClientId %");

var iptHidden = document.getElementById("% = Me.iptHidden.ClientId %");

var listbox1 = document.getElementById("% = Me.ListBox1.ClientId %");

iptHidden.value = listbox1.selectedIndex;

myForm.submit();

}

/script

/head

body

form id="form1" runat="server"

div

asp:ListBox ID="ListBox1" ondblclick="javascript:Move();" runat="server" Height="238px"

Width="338px"

/asp:ListBox

asp:ListBox ID="ListBox2" runat="server" Height="235px" Style="margin-top: 0px"

Width="339px"/asp:ListBox

input type="hidden" id="iptHidden" runat="server" /

/div

/form

/body

/html

**********

Default.aspx.vb

**********

Public Class _Default

Inherits System.Web.UI.Page

Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init

Me.ListBox1.Items.Add("选项1")

Me.ListBox1.Items.Add("选项2")

Me.ListBox1.Items.Add("选项3")

Me.ListBox1.Items.Add("选项4")

Me.ListBox1.Items.Add("选项5")

End Sub

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

If Me.IsPostBack Then

Dim indexToMove = CInt(Request.Form("iptHidden"))

If indexToMove = 0 Then

Dim itemToMove = Me.ListBox1.Items(indexToMove)

itemToMove.Selected = False

Me.ListBox1.Items.Remove(itemToMove)

Me.ListBox2.Items.Add(itemToMove)

End If

End If

End Sub

End Class

**********

Default.aspx.designer.vb

**********

'------------------------------------------------------------------------------

' 自动生成

' 此代码由工具生成。

'

' 对此文件的更改可能会导致不正确的行为，并且如果

' 重新生成代码，这些更改将会丢失。

' /自动生成

'------------------------------------------------------------------------------

Option Strict On

Option Explicit On

Partial Public Class _Default

'''summary

'''form1 控件。

'''/summary

'''remarks

'''自动生成的字段。

'''若要进行修改，请将字段声明从设计器文件移到代码隐藏文件。

'''/remarks

Protected WithEvents form1 As Global.System.Web.UI.HtmlControls.HtmlForm

'''summary

'''ListBox1 控件。

'''/summary

'''remarks

'''自动生成的字段。

'''若要进行修改，请将字段声明从设计器文件移到代码隐藏文件。

'''/remarks

Protected WithEvents ListBox1 As Global.System.Web.UI.WebControls.ListBox

'''summary

'''ListBox2 控件。

'''/summary

'''remarks

'''自动生成的字段。

'''若要进行修改，请将字段声明从设计器文件移到代码隐藏文件。

'''/remarks

Protected WithEvents ListBox2 As Global.System.Web.UI.WebControls.ListBox

'''summary

'''iptHidden 控件。

'''/summary

'''remarks

'''自动生成的字段。

'''若要进行修改，请将字段声明从设计器文件移到代码隐藏文件。

'''/remarks

Protected WithEvents iptHidden As Global.System.Web.UI.HtmlControls.HtmlInputHidden

End Class

**********

vb.net双击文件的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet打开指定文件夹、vb.net双击文件的信息别忘了在本站进行查找喔。