朋友要我做一个简单的列表框应用程序。列表框内有一个项目。它被称为'itemTransfer =“true”'。双击它后,我添加了一个新表单。此表单(也称为itemTransfer,与列表框项目相同)具有文本框和按钮。
在新文本框中输入文本并单击“应用”(新按钮)后,它会将原始列表框的项目名称设置为我在第二个(新)文本框中键入的内容。但是,在编辑了列表框项目之后,我无法编辑它。
这是来自原始列表框和其他表单的代码。
列表框代码:
Private Sub ListBox1_MouseDoubleClick(sender As Object, e As MouseEventArgs) Handles ListBox1.MouseDoubleClick
If ListBox1.SelectedItem = "itemTransfer = """"" Then
itemTransfer.Show()
ElseIf ListBox1.SelectedItem = "itemTransfer = """ + itemTransfer.ComboBox1.Text + """" Then
itemTransfer.Show()
End If
End Sub
从组合框中设置列表框项名称的代码:
cschangerexe.ListBox1.Items(cschangerexe.ListBox1.SelectedIndex) = "itemTransfer = """ + ComboBox1.Text + """"
请注意,该程序名为“cschangerexe”。
然而,在用户评论之后,我查看了他们提供的链接,看了之后比我之前做的更深(我当时没想到)我想出了一个解决方案(或至少解决方法)现在),这里(它只影响原始列表框,而不是其他形式)。
新列表框代码:
Private Sub ListBox1_MouseDoubleClick(sender As Object, e As MouseEventArgs) Handles ListBox1.MouseDoubleClick
If ListBox1.SelectedIndex = 0 Then
itemTransfer.Show()
End If
End Sub