变量对象名称错误

时间:2017-11-26 18:33:25

标签: vb.net

我有以下内容:

  • 一个名为ListBox1的列表框,其中包含几个随机值
  • 一些名为Rit11到Rit 154的富文本框
  • 一个按钮

当我单击一个富文本框时,我想将一个变量设置为调用该框的数字。在此之后,我从列表框中选择一个值,当我按下按钮时,我希望此值移动到所选的文本框,并从列表视图中删除。我做了以下代码,但它给出了一个错误。

Private Sub Rit12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Rit12.Click
        SelBox = "12"
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Dim BoxName
        BoxName = ("Rit" & SelBox)

        Me.Controls(BoxName).Text = ListBox1.SelectedItem
        ListBox1.Items.RemoveAt(ListBox1.SelectedIndex)


    End Sub

它工作正常,直到我尝试使用变量名称。这条规则似乎给出了问题:

Me.Controls(BoxName).Text = ListBox1.SelectedItem

0 个答案:

没有答案