本人刚刚学VB现编些了一个测量程序，计算后输出给WORD进行打印
所有数值均为变量格式如下
A[214]5                                           322.3550
A[219]4  270.5629   90.5632  -3  155.010                            508743.827   309654.543
                                 155.010  90.0000  53.3222  155.006
A1       166.4626  346.4627   1  210.265                            508868.494   309746.656
                                 210.265  90.0000  40.1852  210.261
A2       180.0255    0.0255   2  260.998                            509004.529   309906.979
                                 260.998  90.0000  40.2151  260.993
A3       179.5151  359.5150  -1  202.534                            509173.561   310105.838
                                 202.534  90.0000  40.1345  202.530
A4       180.1610    0.1609  -1  127.115                            509304.365   310260.461
                                 127.115  90.0000  40.2957  127.110
A5         7.0732  187.0733   3  188.250                            509386.916   310357.116
                                 188.250  90.0000  227.3734 188.253