编译错误的原因有很多

你需要仔细看下提示编译错误后标黄或标红的代码

在这道题目中，最可能的原因是你的listbox控件的List属性没有赋予值

也就是你属性框中list那一栏是空的，比如：

回复 啪嗒啪嗒：

但是老师，我的确赋了值，但是还是出现编译错误

回复 汤姆%莱克：我仔细看了下，发现确实有点问题。

你可以先采用这样的方法实现遍历

VB的方法有很多，是开放性的，不影响具体的结果。

回复 啪嗒啪嗒：那老师，输入

For Each x In List1.List  

   Print x

Next

是哪儿错了啊？是不是还得用先前学的方法遍历列表框

回复 啪嗒啪嗒：好吧，我知道了，谢谢老师