VB给文字加装饰边框

给文字加装饰边框

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件     152848  2004-03-09 16:45  COMDLG32.OCX

    .......     22443  2020-10-06 14:29  Form1.frm

    .......       782  2020-10-06 14:29  Form1.frx

    .......      3846  2020-10-06 14:29  Form2.frm

    .......         4  2020-10-06 14:29  Form2.frx

    .......     11915  2020-10-06 14:29  Module1.bas

    .......      2028  2020-10-06 14:29  Module2.bas

    .......       192  2020-10-06 14:29  MSSCCPRJ.SCC

     文件         10  2020-10-06 14:35  myTxt.txt

    .......       843  2020-10-06 14:29  PicText.vbp

    .......       162  2020-10-06 14:29  PicText.vbw

    .......     57344  2020-10-06 14:29  文字加边框.exe

    .......    134006  2020-10-06 14:29  图片示例\图201607091819.bmp

    .......    137514  2020-10-06 14:29  图片示例\图201607091821.bmp

    .......     87750  2020-10-06 14:29  图片示例\图201607091827.bmp

    .......    168662  2020-10-06 14:29  图片示例\图201607091829.bmp

    .......    137514  2020-10-06 14:29  图片示例\图201607091832.bmp

    .......    111098  2020-10-06 14:29  图片示例\图201607091834.bmp

    .......    204906  2020-10-06 14:29  图片示例\图201608282044.bmp

    .......    134006  2020-10-06 14:29  图片示例\图201608282045.bmp

    .......    157350  2020-10-06 14:29  图片示例\图201608282046.bmp

    .......    157350  2020-10-06 14:29  图片示例\图201608282109.bmp

    .......      6148  2020-10-06 14:29  .DS_Store

     目录          0  2020-10-06 14:29  图片示例

----------- ---------  ---------- -----  ----

              1688721                    24