一道简单的VB题目,帮忙看看,谢谢

Question

在窗体(名成为Form1,KeyPreview属性为True)上画一个列表框(名称为List1)和一个文本框(名称为Text1),
编写窗体的KeyDown事件过程.程序运行后,如果按下"A"键,则从键盘上输入要添加到列表框中的项目(至少三项);如果按下"D"键,则从键盘上输入要删除的项目,将其从列表框中删除.

Answer 1

首先,为什么一定要用FORM的keydown事件来控制增加和删除??用按纽不是很好吗?如果你一定要这么做,那你就在FORM的keydown事件写入keycode的判断.存入一个变量中,用这个变量的值去决定执行什么动作.

Answer 2

再多加两个按纽,一个增加,一个删除.
增加按纽的click事件里面写
Private Sub Command1_Click()
    If Text1.Text <> "" Then
        List1.AddItem Text1.Text
    End If
End Sub
当你要删除时,先根据Text1中的值去list1中查找,找到就删除.
Private Sub Command2_Click()
    For i = 0 To List1.ListCount
        If List1.List(i) = Text1.Text Then
            List1.RemoveItem i
        End If
        
    Next i
End Sub