隨機讀取txt文本行，將字符串拆分爲：並在文本框中寫入

Question

我有兩個文本框，我想讓帳戶生成器從網站上的txt文件讀取隨機行並將其寫入文本框。因此，我想從文本文件中讀取隨機行（僅一個），其中電子郵件和密碼由以下分隔：so .txt文件看起來像email@site.com：密碼，在textbox1（電子郵件）之前寫入數據和在textbox2之後從同一行寫入數據。

.txt文件看起來是這樣的：

email1@example.com:password1 
email2@example.com:password2 
email3@example.com:password3 etc.... 

我無法弄清楚如何分割這個字符串，任何幫助，無論如何都會被感激，謝謝:)

Answer 1

你去那裏。

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    tbxEmail.Text = String.Empty 
    tbxPassword.Text = String.Empty 
    Dim lines As String() = getData("URL_OF_FILE") 
    Dim lineCount As Integer = lines.Length 
    Dim randomValue As Integer = CInt(Math.Floor((lineCount) * Rnd())) 
    Dim line As String = lines(randomValue) 
    Dim parts As String() = line.Split(New Char() {":"c}) 
    Dim email As String = parts(0) 
    Dim password As String = parts(1) 

    tbxEmail.Text = email 
    tbxPassword.Text = password 

End Sub 

Function getData(url As String) As String() 
    Dim client As System.Net.WebClient = New System.Net.WebClient() 
    Dim data As String = client.DownloadString(url) 
    Dim returnValue As String() = data.Split(New String() {Environment.NewLine}, 
     StringSplitOptions.RemoveEmptyEntries) 
    Return returnValue 
End Function 

請不認爲這是一個同步的請求，這意味着將「凍結」您的應用程序請求的持續時間。