private sub form1_resize() me.windowstate=2 end sub
把窗体的windowstate属性设置为2-maximized,然后把boderstyle的属性设置为1-fixed single.然后写代码 Private Sub Form_Resize() if form1.WindowState<>maximized then form1.WindowState = maximized end if End Sub
private sub form_load() me.windowstate=2 end subprivate sub form_resize() me.windowstate=2 end sub另外1楼的多写了一个1,应是form
me.windowstate=2
end sub
Private Sub Form_Resize()
if form1.WindowState<>maximized then
form1.WindowState = maximized
end if
End Sub
me.windowstate=2
end subprivate sub form_resize()
me.windowstate=2
end sub另外1楼的多写了一个1,应是form