VB编程之如何提取记事本中某一行的内容

网络评论阅读模式

VB编程之如何提取记事本中某行的内容,下面来看具体代码。对一个按钮编程,点击一下,就可以实现读取记事本某行内容的功能。

先看读取第一行的内容

[code]Private Sub Command1_Click()
Open texturl For Input As #1
Dim txt As String
Line Input #1, txt
Debug.Print txt
Close #1
End Sub

[/code]

假设要提取文本地址为texturl中行数为i行的内容

[code]
Private Sub Command1_Click()
Open texturl For Input As #1
Dim txt As String
Dim n As Integer
n = 1
Do While n <= i
Line Input #1, txt
n = n + 1
Loop
'现在txt就是所求的文本
Debug.Print txt
Close #1
End Sub
[/code]

看似很简单的功能,有些场合我们会用到,发在这里当作备忘录用吧。

weinxin
我的微信
运营不易,
感谢支持!
网络最后更新:2020-5-20
公式库网
  • 本文由 发表于 2020年3月26日 12:46:32
  • 转载请务必保留本文链接:https://www.gongshiku.com/html/202003/vbbianchengzhiruheanxingtiqujishibenzhongdeneirong.html
网络

Microsoft Edge已阻止不安全的…解决办法

Microsoft Edge已阻止不安全的…解决办法 Edge提示站点不安全,怎么办: 1、打开浏览器,点击右上角的三个点。 2、在任务栏中点击“设置”。 3、点击左侧的“隐私搜索和服务”...

发表评论