用VBA在word中能不能画点或者画线?

用VBA在word中能不能画点或者线?比如用很多点画一个圆,或者画一直线,是以坐标来定位的,不知在word里能不能实现,请高手们给点建议,谢谢!

解决方案 »

  1.   

    画圆：ActiveDocument.Shapes.AddShape Type:=msoShapeOval, Left:=25, Top:=25, Width:=150, Height:=150画线：ActiveDocument.Shapes.AddLine BeginX:=25,BeginY:=25,EndX:=150,EndY:=150如果你要用很多点画一个圆，可以用Shapes.AddCurve方法。如果你要把点在圆或线上标出来，可以考虑画一个有填充色的小圆、方块、菱形等等。详见Word VBA 联机帮助中关于AddShape,AddLine,AddCurve的说明。
      

  2.   

    又是tech兄帮了我,还有飞老大,遇到你们两真是幸运,呵呵,以后还请二位大狭多多帮忙呀,谢谢!