用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中的 ......
我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好，用instance不是就可以了&# ......
要用vb打印一条线，长度是100毫米怎么写？
关注
VB code:
Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)
Printer.ScaleMode = vbMillimeters
Print ......
用VB怎么只针对windows自带的文件的右键添加菜单 如（.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......
在vb中怎么判断，插入到数据库中的值是重复的，本人才刚接触VB语言，甚是有好多地方还不懂，还请各位大侠们给出代码，谢谢了呀！！！
插入之前select一下阿。
或者写一个组合SQL插入语句，例如
IF not Exist(
& ......
