Question

我有一个CSV文件，格式为（名称，编号）在每一行。

我正在创建一个应用程序，在表单加载时将所有名称index（0）加载到列表框中，当选择名称时，index(1)中会显示数字.textbox

首先填写数组并在框中显示index(0)。没问题。但是当所选文本发生变化时，我会遇到问题。如果你不能告诉我我是VB的新手。如果我可以为所选文本分配一个var，我可以使用while循环，但我不知道如何分配。有没有更好的方法来解决这个问题？以下是我的来源。任何帮助都会很棒。

Public Class Form1

Public Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    For Each line As String In IO.File.ReadAllLines("MembershipPhone.txt")
        Dim myData = line.Split(","c)
        Dim mName = myData(0)
        Dim mPhone = myData(1)
        ListBox1.Items.Add(mName)
    Next

End Sub

Private Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox1.SelectedIndexChanged
    For Each line As String In IO.File.ReadAllLines("MembershipPhone.txt")
        Dim query = line.Split(","c)
        Dim mName = query(0)
        Dim mPhone = query(1)
        TextBox2.Text = mPhone
    Next
End Sub

显示所选数组的值

0 个答案: