用VB如何在word中画出一个矩形啊?
如题 求救 谢谢
你可以参考word中的vba代码：
VB code:
Sub InsertShape()
ActiveDocument.Shapes.AddShape(msoShapeRectangle, 98.25, 215.25,72#,72#).Select
'添加，并选中
'以下为处理
Selection.ShapeRange.ScaleWidth 1.6, msoFalse, msoScalefromTopLeft
Selection.ShapeRange.ScaleHeight 1.11, msoFalse, msoScalefromBottomRight
Selection.ShapeRange.Fill.ForeColor.ObjectThemeColor = wdThemeColorAccent6
Selection.ShapeRange.Fill.ForeColor.TintAndShade = 0.6
Selection.ShapeRange.Fill.Visible = msoTrue
End Sub
ActiveDocument.Shapes.AddShape
相关问答：
为什么C写的DLL文件C、PB能调用VB不能调用？
VB里为什么有的DLL直接通过引用可以使用？有的需要通过declare申明外部函数？这些DLL有什么差别？
1、为什么PB能通过DECLARE声明而VB不行？
2、如果这个dll中的 ......
我有厂家做的ASP的监控录像（DVR）的局域网播放的源程序与控件，想要用ASP.net做一个视频回放的程序（利用他的控件）但不知如下去做，望各位指点。
先搞清楚他们的控件是怎么用的,
然后就直接用好了.
不过,如 ......
请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
怎么优化查询的效率，比如我想从100万条记录中每次只查询100条记录的话，那么这条sql语句该怎么实现，注意：语言是VBScript的，
http://www.cnblogs.com/anjou/archive/2007/10/17/926944.html
涉及到算法，goog ......
