vb读取ini文件
来源:互联网 发布:淘宝钻石展位怎么收费 编辑:程序博客网 时间:2024/04/29 16:26
'以下是模块中的函数代码
Public Function readini(ByVal filename As String) As String()
Dim fileExists As Boolean
fileExists = My.Computer.FileSystem.FileExists(filename)
If fileExists Then
Dim fields As String()
Dim delimiter As String = ","
Using parser As New TextFieldParser(filename)
parser.SetDelimiters(delimiter)
While Not parser.EndOfData
' Read in the fields for the current line
fields = parser.ReadFields()
' Add code here to use data in fields variable.
End While
Return fields
End Using
Else
My.Computer.FileSystem.WriteAllText(filename, ",", False)
End If
End Function
'------------------------------------------------------------------------
'以下是读取到combobox中的代码
Imports Microsoft.VisualBasic.FileIO
Dim i As Integer
Dim f1 As String(), f2 As String()
f1 = readini("shebei.ini")
comboBox2.Items.Clear()
For i = 1 To f1.Length - 2
comboBox2.Items.Add(f1(i))
Next
- vb读取ini文件
- VB读取INI文件
- VB 读取INI文件
- vb.net 读取ini文件
- VB读取ini文件的函数
- vb.net 读取INI文件信息
- vb 读取ini文件(API函数使用)
- 用FileSystemObject对象读取INI 文件 支持 VB读INI VBS读INI ASP 读INI
- VB.NET中读取INI文件设置信息函数
- VB.NET中读取INI文件设置信息函数sdGetIniInfo
- VB.net 程序.ini文件的读取方法
- VB.net调用windows api读取INI文件
- VB.NET 读取INI,TXT文件 写入数据
- VB.NET中读取INI文件,设置信息函数sdGetIniInfo
- VB读写ini文件
- VB读写INI文件
- VB读写INI文件
- VB 读写ini文件
- petshop4.0设计说明
- 我学习的第一个ASP.NET三层架构
- 过程改进能给公司带来什么
- 模态和非模态对话框的区别
- vb 运行文件和程序
- vb读取ini文件
- 架构风格与基于网络的软件架构设计(转)
- 获取记录集、执行SQL语句、记录读取
- C的关键字——const的理解和用法
- SQL备份与还原经典文档
- 转---都用 preparedstatement
- 二次开发:主需求平台分析
- 原型设计模式
- 网页播放的视频代码