帮我看看这个调用程序怎么写
那个按纽功能怎么弄啊，关键
·清除列表框和文本框中的内容
·使“删除项目”按纽禁用
·在第三个标签中显示当前列表框中的项目数
（7）单击“退出”按纽后，结束程序运行

[此贴子已经被作者于2007-6-4 15:24:44编辑过]

我的代码是：
Private Sub Command1_Click()
List1.AddItem Text1.Text
Text1.Text = ""
Text1.SetFocus
Label3.Caption = List1.ListCount
End Sub

Private Sub Command2_Click()
List1.RemoveItem List1.ListIndex
Label3.Caption = List1.ListCount
End Sub

Private Sub Command3_Click()
List1.Clear
Text1.Text = ""
Command2.Enabled = False
Label3.Caption = List1.ListCount
End Sub

Private Sub Command4_Click()
End
End Sub

Private Sub Form_Load()
Command1.Enabled = False
Command2.Enabled = False
Command3.Enabled = False
End Sub

Private Sub Text1_Change()
Command1.Enabled = True
Command2.Enabled = True
Command3.Enabled = True
End Sub
谢谢你，站们可以好好交流一下

我也是刚刚弄出来的