-1

テキスト ファイルを読み取り、異なるラベルに行を書き込みたい。ラベルを生成することは可能ですか?

label1、label2、label3、label4 という名前の 4 つのラベルを試してみましたが、ファイルのすべての行を読み取り、すべての異なるラベルに書き込むループを作成する方法がわかりません。最初のラベルの 1 行目、2 番目のラベルの 2 行目など。

私が試したこと：

Do Until fread.EndOfStream
    line = fread.ReadLine()
    parti = line.Split("_")
    ora.Text = parti(1)

    data.Text = parti(2)

    If Len(parti(3)) > 10 Then
        mesaj.Text = Microsoft.VisualBasic.Left(parti(3), 25) & "..."

    Else
        mesaj.Text = parti(3)

    End If

Loop
4

1 に答える 1

1

このコードを試して、ラベルを作成し、フォームにラベルを付けてください。

Dim label As New Label
label.Text = "label"
Me.Controls.Add(label)
于 2012-05-22T13:55:29.563 に答える