VB.net從記事本文件中讀取一定的值

-1

我只是想知道如何從使用vb.net的記事本文件中讀取某個值。VB.net從記事本文件中讀取一定的值

我的記事本會是這個樣子：

Name=Something 
Status=Open

我要的是VB.net能夠讀取這兩種名稱或狀態的值。所以我想要一個標籤來說「Something」，如果我想獲得Name的價值。

感謝

來源

2016-07-24 Henry J

顯示您到目前爲止所嘗試的內容。 –

@AndrewMortimer恐怕我沒有嘗試太多，因爲我不知道從哪裏開始。我試圖尋找答案，但我沒有找到任何幫助我的東西。 –

這是可幫助您讀取文件的'SteamReader'類：https://msdn.microsoft.com/en-us/library/system.io.streamreader(v=vs.110).aspx?cs-save- lang = 1＆cs-lang = vb＃code-snippet-2 –

這應該讓你開始：

Dim FileName = "File full path" 
Dim values = New Dictionary(Of String, String)() 
Dim text = File.ReadAllLines(FileName) 
For Each line In text 
    Dim keyValuePair = line.Split("="C) 
    values.Add(keyValuePair(0), keyValuePair(1)) 
Next

請注意：

這裏有上的位置或文件的內容沒有驗證。
代碼是用c＃編寫的，並使用在線工具轉換爲vb.Net。
我已經在c＃中測試過，但沒有在vb.Net中測試過。

來源

2016-07-24 12:37:39

在VB.net中爲你測試它，做這項工作，儘管你並不需要'Dim values = New Dictionary（Of String，字符串）（）' –

@ Cal-cium謝謝！自從我上次使用vb.net以來，已經很長時間了，幾年前轉移到了c＃並且從未回頭過...... –

...如果你想具體的值使用此：

Public Function getd(ByVal str As String, ByVal filepath As String) As String 
    Dim tb As New TextBox 
    tb.Text = My.Computer.FileSystem.ReadAllText(filepath) 
    For Each l In tb.Lines 
     If l.StartsWith(str & "=") Then 
      Return l.Replace(str & "=", "") 
     End If 
    Next 
End Function

例。 MsgBox(getd("Name", "C:\Users\user\Desktop\test.txt"))

來源

2016-07-26 09:12:58 BanForFun

VB.net從記事本文件中讀取一定的值

回答

相關問題