YTFUNLOVE的BLOG

当我们要打印报表时，如果打印机是本机的打印机的话，当然马上就会将报表打印出来，反正打印机就只有您一个人在使用而已！但是如果是在一个人数很多的公司或企业时，往往就必须很多人来分享某一部打印机了，而且打印机也不一定就放在举目可及之处！当您将报表丢到网络打印机之后，由于不一定看得到打印机，您必须特别到摆放打印机的地方去拿报表，这时候您最关心的，就是报表印了没有，如果还没有的话，那还有几份还没打印

先让大家看一下我要实现的窗体效果： 该窗体的背景色、圆角半径(下面代码中将圆角半径等于边框宽度，此为为般化处理，参考者可视具体需要而对代码略作修改，使二者具有不同的值，以获得不同的效果）由用户根据需要改变。上、左边框的色彩为白色(其实为DrawEdge过程中colTopLef决定，可设为其他值)到窗体背景色的渐变，下、右边框的色彩为RGB(132, 132, 132)(其实为DrawEdge过程中

用最简单的代码获取系统信息包括（系统盘符，系统目录，用户名，系统引导等26项配置信息！！）Option Explicit设置Text1的MultiLine属性为True设置Text1的ScrollBars属性为 2 - VerticalPrivate Sub Form_Load()Dim i As IntegerDim txt As String    For i = 1 To 100