请问VB的COMMAND的CLICK事件怎么打开一个TXT文件

fage2000 2001-12-01 10:44:30

...全文

135 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

jmlmj 2001-12-01

打赏
举报

回复

shell

VB打开记事本程序源码，即用VB调用记事本，或用记事本打开一个txt文本文件。用VB调用记事本程序比较简单，可以API函数ShellExecute来实现，很简单，只要一行代码。先在窗体模块声明API函数：Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long,...

打开文本文件是不少程序必须处理的问题。如何更有效地打开文本文件应该是一个值得研究的课题。为此，笔者将自己搜集到的几种方法无私地奉献出来(-_-)，供各位参考。同时期盼大家也来参与，借VB编程乐园这块宝地互相交流。如您有这份心，土人在这里先说声谢谢！　　下面所举的例子均假设F盘下有一个名为d.txt的文本文件，若需要尝试这些例子请作相应的改动。方法一: 用定长的Strin...

对象的事件：事件是指对象对于外部动作的响应，当对象发生了某个事件，就会执行相应的代码，这段代码被称为“事件过程”。事件是Visual Basic预先编辑好的并且能够被对象识别的的动作，VB采用的是事件驱动机制，当用户触发了某个事件时，程序就会执行该事件过程下的代码。例如，用户点击一次按钮，就会触发一次该按钮的单击事件，即Command1_Click事件。一个事件，就好比一个动作，用户单击按钮是一个事件，双击按钮也是一个事件，按下一个键盘的按键是一个事件，关闭某个窗口也是一个事件。实际上，VB编程的思

Private Sub Command2_Click() Open "F:\TEST\b.txt" For Output As #1 Print #1, Text1.Text Close End Sub 以上代码可以创建一个txt文件 Private Sub Command1_Click() Dim str Open "F:\TEST\a.t

Private Sub Command1_Click() 读文件Open "d:a.txt" For Input As #1 Dim Lines As StringDim NextLine As StringDim i As IntegerDo While Not EOF(1) On Error Resume Next Line Input #1, NextLine Lin

7,785

社区成员

197,585

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章