你可以获取表格的宽度，然后设置窗口的宽度
msgbox(Tables("表A").Grid.Width)msgbox(Forms("窗口1").Width)Forms("窗口1").BaseForm.Width = 1000
加好友 
发短信
Post By：2014/11/16 9:48:00 [显示全部帖子]
