首先感谢你对我的信任,我已经在QQ了为你解释了,另外还有
If h > 0 Then
.ColumnHeaders.Add , , ar(h), .Width * a(h), lvwColumnCenter '第二列开始居中
Else
.ColumnHeaders.Add , , ar(h), .Width * a(h)
End If
这段代码是让列表框第二列起居中,如果不要第二列起居中,就把上面的代码以下面这一句替换就好了
.ColumnHeaders.Add , , ar(h), .Width * a(h)
答：Set rng = Sheet2.Range("A2:A" & Sheet2.[A65536].End(xlUp).Row + 1) arr = rng.Val...详情>>
问：谁知道成都微恒网络技术有限公司推出的微恒MEM教务管理系统是怎么收费的啊
答：这个应该是 暂时不收费的 切记 。详情>>
答：楼主可以找找一下软件： 电脑监控专家 F8电脑监控软件 健康上网专家 前两个是共享版，很难找到注册的详情>>
