1、首先我们打开vb6.0软件进入到标准”工程1“界面，这些比较简单，就不一一上图了，在”form1“窗口上加载一个文本框”text1”如图。
3、点击属性界面的“height”设置文本框“text1”的高度为2000，再点击“width”设置文本框“text1”的宽度为2500如图。
5、然后把水平滚动条的最大位移量（largechange）设置为20最小位移量（smallchange）设置为2如图。
7、然后是给这个工程编写程序：
PrivateSubh1_Change()
Text1.Width=h1.Value（文本框的宽度等于水平滚动条的value值）
EndSub
PrivateSubv1_Change()
Text1.Height=v1.Value(文本框的高度等于垂直滚动条的value值）
EndSub
