千家信息网

VB.NET如何读取INI

发表于:2026-11-02 作者:千家信息网编辑
千家信息网最后更新 2026年11月02日,这篇文章主要介绍VB.NET如何读取INI,文中介绍的非常详细,具有一定的参考价值,感兴趣的小伙伴们一定要看完!虽然VB.NET中读取XML配置信息很方便,但有时开发的过程中还是要用到INI文件,VB
千家信息网最后更新 2026年11月02日VB.NET如何读取INI

这篇文章主要介绍VB.NET如何读取INI,文中介绍的非常详细,具有一定的参考价值,感兴趣的小伙伴们一定要看完!

虽然VB.NET中读取XML配置信息很方便,但有时开发的过程中还是要用到INI文件,VB.NET读取INI却不像VB中那么方便了,刚才写了个函数,现贴出来,也许各位能用得上。

  1. Function sdGetIniInfo(ByVal iniFile As String,
    ByVal iniSection As String) As String

  2. If Not File.Exists(iniFile) Then

  3. Return "文件 " & iniFile & " 未找到,请确认路径和文件名是否正确!"

  4. Exit Function

  5. End If

  6. Dim iniRead As New StreamReader(iniFile)

  7. Dim iniStr As String = iniRead.ReadToEnd

  8. Dim i As Integer

  9. Dim cLine As Integer

  10. Dim noSec As Boolean = False

  11. Dim getValue As String = ""

  12. Dim cLst

  13. cLst = iniStr.Split(Chr(13))

  14. cLine = UBound(cLst)

  15. For i = 0 To cLine

  16. If cLst(i).indexof("=") > 0 Then

  17. If cLst(i).split("=")(0).trim() = iniSection Then

  18. noSec = True

  19. getValue = cLst(i).split("=")(1).trim()

  20. Exit For

  21. End If

  22. End If

  23. Next

  24. If noSec = True Then

  25. Return getValue

  26. Else

  27. Return "没有找到 " & iniSection & " 的设置信息!"

  28. End If

  29. End Function

说明:在引用的面页中要先引用 Imports System.IO

set.ini文件内容:

  1. Private Sub Button1_Click(ByVal sender As System.Object,
    ByVal e As System.EventArgs) Handles Button1.Click

  2. Dim name As String

  3. name = sdGetIniInfo(Application.StartupPath & "\set.ini", "name")

  4. MsgBox(name)

  5. End Sub

以上是"VB.NET如何读取INI"这篇文章的所有内容,感谢各位的阅读!希望分享的内容对大家有帮助,更多相关知识,欢迎关注行业资讯频道!

文件 内容 信息 篇文章 价值 位能 兴趣 函数 小伙 小伙伴 文件名 更多 知识 行业 资讯 资讯频道 路径 过程 还是 频道 数据库的安全要保护哪些东西 数据库安全各自的含义是什么 生产安全数据库录入 数据库的安全性及管理 数据库安全策略包含哪些 海淀数据库安全审计系统 建立农村房屋安全信息数据库 易用的数据库客户端支持安全管理 连接数据库失败ssl安全错误 数据库的锁怎样保障安全 华服互联网科技怎么样 为想互联网科技怎么样 互联网最新的科技 智能科技公司是互联网公司吗 互联网最新的科技有限公司 互联网 科技 深圳天众互联网科技公司 上游互联网科技 互联网金融 科技创新 成都铂石互联网科技做什么的 湖北码尼互联网科技有限公司电话 宜昌元轩互联网科技有限公司 互联网科技研发水平 想开互联网科技公司怎么样 爱医互联网络科技 滨湖区互联网智能科技产品有哪些 山东有哪些互联网科技公司 图游互联网科技 银川新华互联网科技学校原画 重庆科技产业互联网有哪些 科技互联网政务服务 与互联网科技公司 易互联网科技有限公司 智网互联网科技 盛创互联网科技有限公司 开一家科技互联网公司需要多少钱 华夏恒生互联网科技013171 合肥互联网科技公司公章图片 杭州披云加互联网科技有限公司 互联网科技包装股份有限公司上市
0