关于vb点虐 访问记事本的信息

vb点虐 怎样获取指定的记事本所有内容,并显示textbox中?

Private Sub open()

成都创新互联是专业的民和网站建设公司,民和接单;提供成都做网站、成都网站制作、成都外贸网站建设,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行民和网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

Dim thefile as string

On Error Goto FE

If (Right(dirLook.Path,1)="\") then

TheFile=dirLook.Path+filFind.FileName

Else

TheFile=dirLook.Path+"\"+filFind.FileName

End if

Open thefile for input as #1

TEXTBOX1.text=Input(LOF(1),#1)

Close #1

Exit Sub

FE:

MsgBox"ERR"核改

Resume Next

End Sub

'dirLook指路径,filFind.filFind指芦枯文件名,dirlook最先为盘陪氏洞名

vb点虐 如何用我编写的一个记事本程序通过鼠标右键菜单来打开一个文件

一、用wshshell组件的RegWrite方法写注册表,在HKEY_CLASSES_ROOT\*\Shell 位置加入的你槐轮唯程序,

例如:

[HKEY_CLASSES_ROOT\*\shell\我的程序\command]

@="D:\\我的程序.exe %1"

后桐凯面的%1会将文件名传送给你的程序的Command$,多文件名需要使用DDE方式进行互斥传入。

二、

将下面内容输入记事本后保存为reg文件,运行即可:

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\*\shell]

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\*\shell\铅培OpenInNotepad]

@="用记事本打开"

[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\*\shell\OpenInNotepad\command]

@="notepad.exe %1"

"用记事本打开" 为右键菜单中显示的名称

怎样在VB .NET中调用记事本和计算器

这个啊,呵呵,应该不难吧

先找到你要打开的应用程序的文件

然后用一个调用代码:

System.Diagnostics.Process.Start("C:\WINDOWS\system32\notepad.exe")

这是要枯高前开记事本的

System.Diagnostics.Process.Start("C:\WINDOWS\system32\calc.exe")

这是打开计算器的

应念塌该也可以把这两个应用程序复制到你的程序的默认目录下,就是BIN下吧!

呵呵,试没清试!!要给我加分哦!!!

vb 点虐 程序怎么默认打开txt记事本文件?

楼下的根散拿本不对。冲判搭exe右键是没有“打开方式”的,也没必要因为这个问题而还原系统。把exe设置为冲手直接运行,方法:新建一个txt文件,输入ftype exefile="%1" %* ,保存,把扩展名改为bat,双击这个文件,就好了。


当前标题:关于vb点虐 访问记事本的信息
文章源于:http://scyanting.com/article/ddpssee.html