vb读取特定一行字符
我的目的是读取初始化文件中的特定的一行的字符,只是读特定的一行,其他的不读
比如说有一个这样的文件test.ini,里面的内容是
[WindowCaption]
"测试 "
我现在只需要读取第二行里面的字符,其他的不用读取(第二行字符是 "测试 ")
我的目的就是读 "测试 "这个内容
请问这个功能要如何实现,想了好久都没想出来,请高手帮忙解决下,谢谢各位了!
[解决办法]
INI文件的读取方式就好...
判断前边的KEY 取 VALUE
[解决办法]
RetInt = GetPrivateProfileString( "WindowCaption ", "测试 ", " ", RetStr, 50, App.Path & "\setting.ini ")
If RetInt > 0 Then
yourStr = Val(RetStr)
End If
[解决办法]
你这个是INI文件
它的读取方式用的API 比较方便
[解决办法]
楼主的这个不是INI文件的格式, 不能用GetPrivateProfileString来读取的。
写个函数试试:
Function GetLineData(sFile As String, iLine As Long) As String
Dim iFileNo As Long, iCount As Long, sData As String
sData = " "
iFileNo = FreeFile()
On Error Resume Next
Open sFile For Input As iFileNo
If Err.Number = 0 Then
iCount = 1
Do While Not EOF(iFileNo) And iCount <= iLine
Line Input #iFileNo, sData
Loop
Close #iFileNo
End If
On Error GoTo 0
GetLineData = sData
End Function
Private Sub Command1_Click()
Debug.Print GetLineData( "c:\1.ini ", 2)
End Sub