solidco2 写的程序很好,不过解决他的问题,可将程序稍作修改即可: Private Sub Form_Resize() For i = 1 To 4 StatusBar1.Panels(i).Width = Me.ScaleWidth / 4 Next End Sub 把me.Width/4 改成 Me.ScaleWidth / 4, 就达到你的目的.
还是楼上的聪明啊
在窗体重置大小过程中添加此循环 Private Sub Form_Resize() For i = 1 To 4 StatusBar1.Panels(i).Width = me.Width / 4 Next End Sub 不过最右面一列会根据你的窗体边框宽度多少有点不准确.但是如果用statusbar1.width/4 的话又会有最大化和还原置后的问题.请根据需要决定吧 其实你还可以添加一个计时器,设定窗体resize以后100豪秒以后执行列宽设置
答：重启一下电脑试下吧，也有可能是显示器的问题啊，不明白的可以去问问堂问下那里的电脑方面的专家啊，应该能帮你解决掉额·详情>>
答：线性链表分好几种,分为单链,双链等,它们的存储顺序也不一样. 线性表是顺序存储的,占顺序的存储空间详情>>
问：电脑安装了VB6.0，为什么打开方式里面没有VB程序选项，进安装好的VB里去关联...
答：打开方式最下面还有一个《选择程序》，点开后查VB的安装目录的EXE，找到后直接打开，下次就会在打开方式里查到了详情>>
