Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net 无法将string()类型的值转换为string_Vb.net - Fatal编程技术网

Vb.net 无法将string()类型的值转换为string

Vb.net 无法将string()类型的值转换为string,vb.net,Vb.net,我一直收到这个错误,我尽了全力,但它仍然说字符串的值类型不能转换为字符串 代码如下: Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click End Sub Sub New() InitializeComponent() RAN = New Random WB = New WebClient End Sub Private Const IDNum As Str

我一直收到这个错误,我尽了全力,但它仍然说字符串的值类型不能转换为字符串

代码如下:

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

End Sub
Sub New()
    InitializeComponent()

    RAN = New Random
    WB = New WebClient


End Sub

Private Const IDNum As String = "https://example.com/Data.php"

Private WB As WebClient
Private RAN As Random

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

    Dim Account As String() = WB.DownloadString(IDNum).Split(Environment.NewLine)
    AccSplit(Account(RAN.Next(1, Account.Length)))

End Sub


Private Sub AccSplit(ByVal Account As String)

    TextBox2.Text = Account.Split()
End Sub
文本框2。文本是一个字符串。Split函数返回VisualStudio显示为字符串的字符串数组。那些类型不匹配。不能只将数组分配给字符串。我可能会问你是否想要这个:

TextBox2.Text = String.Join(",", Account.Split())
这至少可以编译。但这毫无意义。。。为什么要拆分一个字符串,只是为了重新连接它?

当您在此处调用split时:

您将获得一个字符串数组。在没有参数的情况下调用Split将在空白字符上拆分字符串。例如:

Dim arr = "Hello World".Split()
相当于:

Dim arr = {"Hello", "World"}
TextBox的Text属性为String类型,因此无法为其分配字符串数组。那没有道理。如果你想煎鸡蛋,你会把鸡蛋盒放在锅里吗?正确的行动方针取决于你真正想要达到的目标。如果您只想在文本框中显示该字符串,请执行以下操作:

TextBox2.Text = Account
您也可以这样做:

TextBox2.Lines = Account.Split()

要在文本框中显示包含单独行上元素的数组,假定您已将其Multiline属性设置为True。

我有一个大text.php,当我单击按钮时,它不会逐行显示。它展示了全文。这就是为什么我想看看拆分是否有效。
TextBox2.Lines = Account.Split()