vbµÄ¿ÉÊÓ»¯±à³Ì·½·¨Ê¹µÃwindowsµÄÒ»°ã±à³Ì±äµÃ¼òµ¥Ö±¹Û¡£ÓÈÆäÊdzÌÐò½çÃæÉè¼Æ£¬Ö»ÐèÓÃÊó±ê½«ÏàÓ¦µÄ¿Ø¼þ£¨°´Å¥¡¢Í¼¿ò¡¢±í¸ñµÈ£©ÍϷŵ½±íµ¥£¨form£©ÉÏÖ±½Óµ÷ÕûÆäλÖúʹóС£¬¼´¿ÉÉè¼Æ³öƯÁÁʵÓõĽçÃæ¡£µ«ÔÚ³ÌÐòÔËÐÐÆڼ䣬Èç¹û¸Ä±ä±íµ¥µÄ´óС£¬±íµ¥ÉϿؼþµÄ´óСºÍλÖò¢·Ç³É±ÈÀýµØ·¢ÉúÏàÓ¦±ä»¯£¬µ¼Ö½çÃæ³ÊÏÖÄÑ¿´µÄ²»¾ùÔÈÏÖÏó¡£
---- ÉÏÊöÏÖÏóºÍÎÊÌâ,¿ÉÔÚ±íµ¥Form_Resize()¹ý³Ì±à³Ì£¬Í¨¹ý¶¨Òå±íµ¥µÄScaleModeÊôÐÔºÍ±íµ¥ÖпؼþµÄHeight¡¢Width¡¢Top¡¢LeftÊôÐÔÀ´½â¾öÕâ¸öÎÊÌâ¡£¾ßÌåʵÏÖ·½·¨ÈçÏ£º
ÓÃ±íµ¥µÄHeight¡¢Width¡¢Top¡¢LeftÊôÐÔÉè¼Æ±íµ¥ÔÚÆÁÄ»ÖеÄλÖúʹóС¡£½«±íµ¥ÖеĿؼþ´óСºÍλÖõ÷ÕûºÃ£¬Ö±µ½µÃµ½ÂúÒâµÄ½çÃæ¡£
Ñ¡Ôñ±íµ¥µÄScaleModeÊôÐÔΪuser£»É趨ScaleHeight¡¢ScaleWidthµÄÖµ£¬Èç¿É½«ÕâÁ©¸öÖµÉ趨Ϊ100»ò1000»òÆäËûµÄÊýÖµ£¬Ò²¿ÉʹÕâÁ©¸öÖµ²»µÈ£¬ÊÓ¸öÈ˵ÄÏ°¹ß¶ø¶¨£¬ÕâÀïÎÒÃǽ«ÆäÉèΪ1000£»Ê¹ScaleTop£½0¡¢ScaleLeft£½0¡£
---- ScaleModeÊôÐÔ¾ö¶¨ÁË±íµ¥µÄScaleHeight¡¢ScaleWidth¡¢ScaleTop¡¢ScaleLeftÊôÐÔÖµºÍ±íµ¥ÖпؼþµÄHeight¡¢Width¡¢Top¡¢LeftÊôÐÔÖµµÄ¶ÈÁ¿µ¥Î»£¨Óû§×Ô¶¨Ò塢羡¢µã¡¢ÏñËØ¡¢×Ö·û¡¢Ó¢´ç¡¢ºÁÃס¢ÀåÃ׵ȣ©¡£Ò»°ãʹScaletopºÍScaleLeftµÈÓÚÁã¡£ScaleHeight¡¢ScaleWidthÊôÐÔÖµ±íʾÒÔScaleModeֵΪ¶ÈÁ¿µ¥Î»µÄ±íµ¥µÄ¸ßºÍ¿í£¬ËüÃǵĸı䲻»áʹ±íµ¥µÄ´óСºÍλÖ÷¢Éú±ä»¯¡£¸Ä±äScaleModeµÄÖµ²»»áÓ°Ïì±íµ¥ºÍ±íµ¥ÖпؼþµÄλÖúʹóС£¬Ö»ÊÇ±íµ¥µÄScaleHeight¡¢ScaleWidthÊôÐÔÖµºÍ±íµ¥ÖпؼþµÄHeight¡¢Width¡¢Top¡¢LeftÊôÐÔÖµÒª¸ù¾ÝеĶÈÁ¿µ¥Î»×Ô¶¯·¢Éú±ä»¯¡£ÓÉÓÚ±íµ¥µÄ´óС¡¢±íµ¥ÖпؼþµÄλÖúʹóСÒѾÉ趨£¬³ýÁË"Óû§×Ô¶¨Òå"¶ÈÁ¿µ¥Î»Í⣬±íµ¥µÄScaleHeight¡¢ScaleWidth¡¢ScaleTop¡¢ScaleLeftÊôÐÔÖµÊÇÒ»¶¨µÄ¡£Ö»ÒªÊÖ¹¤¸Ä±ä±íµ¥µÄScaleHeight¡¢ScaleWidth¡¢ScaleTop¡¢ScaleLeftÈÎÒ»ÊôÐÔÖµ£¬ScaleModeµÄÖµ¾Í±ä³ÉÁË"Óû§×Ô¶¨Òå"¡£
---- Óû§×Ô¶¨ÒåScaleHeightÖµ±íʾ½«±íµ¥µÄ¸ß¶ÈµÈ·ÖÁËScaleHeightµÈ·Ý£¬±íµ¥ÖпؼþµÄHeightÊôÐÔÖµÊÇÒÔ±íµ¥¸ß¶ÈµÈ·ÖÁËScaleHeightµÈ·ÝµÄÒ»·ÝΪµ¥Î»¡£Óû§×Ô¶¨ÒåScaleWidthÖµ±íʾ½«±íµ¥µÄ¿í¶ÈµÈ·ÖÁËScaleWidthµÈ·Ý£¬±íµ¥ÖпؼþµÄWidthÊôÐÔÖµÊÇÒÔ±íµ¥¿í¶ÈµÈ·ÖÁËScaleWidthµÈ·ÝµÄÒ»·ÝΪµ¥Î»¡£
---- ÀýÈ磺ÓÐÒ»¸ö±íµ¥form1£¬form1ÖÐÓÐÒ»¸ö¿Ø¼þCammand1£¬Cammand1µÄλÖúʹóСÒѾÉè¼ÆºÃ
form1.ScaleMode=user
form1.Height=6800
form1.ScaleHeight=1000
ÕâʱCammand1.HeightµÄÖµÊÇÒÔ6800/1000=6.8Ϊµ¥Î»µÄ£¬
¼´Îª±íµ¥¸ß¶ÈµÄǧ·ÖÖ®Áùµã°ËΪµ¥Î»¡£
¼ÇÏÂ±íµ¥ÖÐÿһ¸öÏ£ÍûÓë±íµ¥´óС±ä»¯¶ø³É±ÈÀý±ä»¯µÄ¿Ø¼þµÄHeight¡¢Width¡¢Top¡¢LeftÖµ¡£
ÓÃÊó±êË«»÷±íµ¥Ã»ÓпؼþµÄµØ·½£¬µã³ö±à³Ì½çÃæÓÒÉÏ·½µÄ±íµ¥¹ý³ÌÃû±í£¬Ñ¡ÔñForm_Resize¹ý³Ì£¬ÔÚForm_Resize¹ý³Ì±à³ÌÈçÏ£º
Private Sub Form_Resize()
ScaleHeight = 1000
ScaleWidth = 1000
±íµ¥ÖпؼþÃû1.top=²½Öè3¼ÇϵÄÖµ
±íµ¥ÖпؼþÃû1.Width=²½Öè3¼ÇϵÄÖµ
±íµ¥ÖпؼþÃû1.Left=²½Öè3¼ÇϵÄÖµ
±íµ¥ÖпؼþÃû2.Height=²½Öè3¼ÇϵÄÖµ
±íµ¥ÖпؼþÃû2.top=²½Öè3¼ÇϵÄÖµ
±íµ¥ÖпؼþÃû2.Width=²½Öè3¼ÇϵÄÖµ
±íµ¥ÖпؼþÃû2.Left=²½Öè3¼ÇϵÄÖµ
±íµ¥ÖпؼþÃû2.Height=²½Öè3¼ÇϵÄÖµ
... ...
End sub
---- ×ÜÖ®, ͨ¹ýÒÔÉÏ4²½¾Í¿ÉʵÏÖÈÿؼþ´óСºÍλÖÃËæ×Å±íµ¥µÄ´óС±ä»¯¶ø³É±ÈÀý±ä»¯£¬´Ó¶ø½â¾ö½çÃæÒò±íµ¥´óСµÄ¸Ä±ä¶ø±äµÃ²»¾ùÔȵÄÎÊÌâ¡£