奇怪了,我把你的代码复制到我的机子里面测试了一下是正确有效的,我的机子装的是VB6.0中文企业版,而且我安装了VS6的Server Pack 3,不知道是不是打过了补丁的缘故。你可以试试装一下VS6的SP3,不过一定要装简体中文版哦。其实VB的好多控件都存在BUG的,装了SP3会解决好多原来莫名其妙的问题,试一下吧,SP3在计算机报的一张配套光盘上可以找到,好象就是今年一季度的那张。