温馨提示×

温馨提示×

您好,登录后才能下订单哦!

密码登录×
登录注册×
其他方式登录
点击 登录注册 即表示同意《亿速云用户服务条款》

VB.NET中怎么访问INI文件

发布时间:2021-08-06 15:48:43 阅读:165 作者:Leah 栏目:编程语言
开发者测试专用服务器限时活动,0元免费领,库存有限,领完即止! 点击查看>>

本篇文章给大家分享的是有关VB.NET中怎么访问INI文件,小编觉得挺实用的,因此分享给大家学习,希望大家阅读完这篇文章后可以有所收获,话不多说,跟着小编一起来看看吧。

在VB.NET2005+winxp中,我使用GetPrivateProfileString实现VB.NET访问INI文件这一功能,如果文件路径中含有中文,就会遇到一个奇怪的问题:***次读取正常,第二次读取就取不到值

VB.NET访问INI文件代码如下:

Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As StringByVal lpKeyName As StringByVal lpDefault As StringByVal lpReturnedString As StringByVal nSize As IntegerByVal lpFileName As StringAs Integer  Private m_filename As String = "c:\椅子\slcuserinfo.INI" Public Function GetINIValue(ByVal lpKeyName As StringByVal strName As StringAs String  Dim strTmp As String  'Dim fileTmp As String   'fileTmp = m_filename strTmp = New String(" ", 100)  'Call GetPrivateProfileString(lpKeyName, strName, "", strTmp, Len(strTmp), fileTmp)  Call GetPrivateProfileString(lpKeyName, strName, "", strTmp, Len(strTmp), m_filename)  GetINIValue = Left$(strTmp, InStr(strTmp, vbNullChar) - 1)  End Function  Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal lpFileName As String) As Integer  Private m_filename As String = "c:\椅子\slcuserinfo.INI" Public Function GetINIValue(ByVal lpKeyName As String, ByVal strName As String) As String   Dim strTmp As String  'Dim fileTmp As String  'fileTmp = m_filename strTmp = New String(" ", 100)  'Call GetPrivateProfileString(lpKeyName, strName, "", strTmp, Len(strTmp), fileTmp)  Call GetPrivateProfileString(lpKeyName, strName, "", strTmp, Len(strTmp), m_filename)  GetINIValue = Left$(strTmp, InStr(strTmp, vbNullChar) - 1)   End Function  

以上就是VB.NET中怎么访问INI文件,小编相信有部分知识点可能是我们日常工作会见到或用到的。希望你能通过这篇文章学到更多知识。更多详情敬请关注亿速云行业资讯频道。

亿速云「云服务器」,即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘,价格低至29元/月。点击查看>>

向AI问一下细节

免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。

AI

开发者交流群×