tfod2000 发表于 2004-11-19 08:55:00

vb和vba问题

老师vba中有的关于thisdrawing模块中的东西在vb中我不知道是否也有。例如象在vba中有Private Sub AcadDocument_ObjectModified(ByVal Object As Object) 但是在vb中能用什么方法实现呢？

雪山飞狐_lzh 发表于 2004-11-19 09:04:00

把你的问题一次性提出来吧，不要像挤牙膏一样的一点一点提出来，也许这样方便解决

tfod2000 发表于 2004-11-19 09:37:00

我现在的问题是1：在vba中或vb中怎么用grid控件。我的vb或vba则么都没有类似这些的语句


<FONT size=2>Grid1.ColWidth(0) = 540<BR>Grid1.RowHeight(0) = 216 '单元格的宽和高<BR><BR>inputcolnum = 13<BR>inputrownum = 15 '表中显示的列、行数<BR><BR>Grid1.Cols = 20<BR>Grid1.Rows = 20 '表中总的列、行数<BR><BR>HScroll1.Height = 300<BR>VScroll1.Width = 300 '水平和垂直滚动条的高、宽度<BR><BR>Grid1.Height = (inputrownum + 1) *<BR>(Grid1.RowHeight(0) + Grid1.GridLineWidth * 12) <BR>+ 12 + HScroll1.Height<BR>'800×600象素时为12；640×480为15<BR>Grid1.Width = (inputcolnum + 1) * <BR>(Grid1.ColWidth(0) + Grid1.GridLineWidth * 12) <BR>+ 12 + VScroll1.Width<BR>'表的高、宽度</FONT><BR>


2：就是象我上面说的对于vba中提供的 如：Private Sub AcadDocument_BeginDoubleClick(ByVal PickPoint As Variant) 和Private Sub AcadDocument_ObjectModified(ByVal Object As Object) vb如何实现


现在的问题就是这些了。老大教教吧。

雪山飞狐_lzh 发表于 2004-11-19 09:49:00

如果是事件的话，VB的实现不如VBA，帮助里面有这样的例子

tfod2000 发表于 2004-11-19 09:52:00

那么grid你用过没有。教教我吧。boss催呢？

雪山飞狐_lzh 发表于 2004-11-19 09:59:00

grid倒没怎么用过，你可以到网上找找MSDN看看

tfod2000 发表于 2004-11-19 10:04:00

谢谢斑竹，看来有需要一阵的狂找了。无奈

wmz 发表于 2004-11-20 14:52:00

grid控件在CAD的VBA里可直接在"附加控件"里引用.
页: [1]
查看完整版本: vb和vba问题