1

次のコードを試してMaskedTextBox、 from のコントロールのリストを list に割り当てましたmsklist。しかし、以下に示すコードを実行した後でも、インデックス値はまだ 0 です。フォームに 30 個MaskedTextBoxのコントロールがあります。

Private msklist As New List(Of MaskedTextBox)
Private msk() As MaskedTextBox
For Each ctrl In Me.Controls
    If TypeOf ctrl Is MaskedTextBox Then
        msklist.Add(ctrl)
    End If
Next

MsgBox(msklist.Count)
ReDim msk(msklist.Count - 1)

msk = msklist.ToArray

    For i = 0 To 29 Step 1
        query = "SELECT * FROM allotment_table WHERE seat=@seat"
        cmd.Parameters.AddWithValue("@seat", seat1(i))
                cmd = New SqlCommand(query, con)
        con.Open()
        re = cmd.ExecuteReader

        re.Read()
        msk(i).Text = re("regno")
        con.Close()
    Next

Text配列で for ループを使用して、コントロールのプロパティにテキストを割り当てたいと思っていましたmsk

私はいくつかの提案が必要です

4

1 に答える 1