String（）をStringに変換できません - Vb Error

Question

string（）をvbの文字列に変換できず、何が間違っているのか分かりません。私は、ボタンをクリックするたびにURL行からidを生成しようとしています。 HERESにコード：

Imports System.Net 
    Imports System.IO 

Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click 

End Sub 

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    Dim source As String 

    source = New WebClient().DownloadString("https://example.com/Id.php").Split(Enviroment.NewLine) 
    TextBox1.Text = source(New Random().Next(0, source.Length)) 
End Sub 

Answer 1

は、String配列としてあなたsource変数を設定します。多くの人が既に述べたように、Splitは配列を返します。したがって、配列が返された場合は、配列に割り当てられている変数が配列であることを確認する必要があります。そうでない場合は、すでにエラーが発生していることがわかります。以下のコードは問題を解決します：

Dim source As String()