用VB实现象Windows记事本的一些功能

页面导航:首页 > 软件编程 > vb.net > 用VB实现象Windows记事本的一些功能

用VB实现象Windows记事本的一些功能

来源: 作者: 时间:2016-01-21 10:23 【

www.2cto.com红色黑客联盟收集整理内容:讨论如何在用VB编写的记事中实现自动将日志添加到文档尾部、判断保存还是另存为、确认文件是否需要保存等功能。Windows自带的记事本即Notepad有

 红色联盟收集整理

内容:讨论如何在用VB编写的记事中实现自动将日志添加到文档尾部、判断保存还是另存为、确认文件是否需要保存等功能。

Windows自带的记事本即Notepad有一些功能还是颇具吸引力的,比如自动在特定的文档尾部加入计算机时钟的时间和日期,截取已经打开或者保存了的纯文档名[见记事本的标题栏]以及搜索等,给用户带来许多方便。本文就TextBox控件讨论如何实现这些功能。

一、将日志添加到文档

在Windows中,如果文档的第一行最左边有".LOG"字样,那么每次用记事本打开此文时,记事本会自动在文档尾部加入时间日期。
".LOG"共占四个字节,又置于文档第一行顶格处,因此可以用VB的Left函数来读取这个字符串,如有,则用CStr函数来自动添加时间和日期。
我们可以在打开文件的程序加入以下代码:

DimaAsString
a=Left(Text1.Text,4)取得头4个字节
Ifa=".LOG"Then若有则:
Text1.SelStart=Len(Text1.Text)光标移到文件尾
Text1.SelText=vbCrLf&CStr(Now)加入换行和时间
Else若无,退出过程
ExitSub
EndIf

这样,我们用VB编写的记事本就和Windows的Notepad一样具有自动将日志添加到文档的功能了。
Tags:

相关文章

    文章评论

    最 近 更 新
    热 点 排 行
    Js与CSS工具
    代码转换工具
    
    <