vba做的USERFORM怎样堪套进CAD右边？

Allblus 2004-09-10 10:26:01

请问我用vba做的一个长长的类似菜单的东西可以堪套进CAD右边不？就是双击上面的状态栏就堪套进去。怎样做啊？就是跟很多开发工具相似的功能。

...全文

169 9 打赏收藏转发到动态举报

写回复

9 条回复

切换为时间正序

请发表友善的回复…

发表回复

aijie099 2004-11-28

打赏
举报

回复

你可以算出，窗口右边，你要停留的位置，然后就可，把窗口Move过去。

jam021 2004-09-21

打赏
举报

回复

关注,帮你顶一下

Allblus 2004-09-21

打赏
举报

回复

没看懂我的意思的可看这里：http://www.mjtd.com/bbs/dispbbs.asp?boardID=4&ID=26208&page=1

现在有一个用vb做的窗体停靠的例子http://www.mjtd.com/mcdown/list.asp?id=367 可也不知道怎样用。更不知道怎样用到vba中，因为vba的userform没有hWnd属性。

请高人指点啊！！！

cashmore 2004-09-10

打赏
举报

回复

帮顶！！！

Allblus 2004-09-10

打赏
举报

回复

有人嗎，自己頂先！

Allblus 2004-09-10

打赏
举报

回复

怎麽我在vba找不到我的貼阿。

Allblus 2004-09-10

打赏
举报

回复

兄弟你有沒？指點下。

yijiansong 2004-09-10

打赏
举报

回复

看看CAD二次开发的例子！

Allblus 2004-09-10

打赏
举报

回复

不會吧，搞vba的人這麽少，頂都沒人頂啊

UserForm1.Show 'If QXAN = 1 Then Exit Sub lx = JSLX Select Case BZJD Case "0" jd = 0 Case "0.0" jd = 1 Case "0.00" jd = 2 Case "0.000" jd = 3 Case "0.0000" jd = 4 End Select 'If QXAN = 1 Then Exit ...

CAD vba窗体文本框中无法右键弹出“复制”、“粘贴”等功能，可借助如下代码实现“粘贴功能”，原理为模拟按下键盘发送命令。

如果你是小白，是否困惑过找到VBA代码之后怎么去使用呢？下面就跟着我一起看看，怎么去使用在网络上找到的VBA代码 VBA是什么? VBA其实一点也不神秘，它来自于微软的VB语言，语法基本上相同，但是对应办公组件的VBA...

Private Sub CommandButton1_Click() UserForm1.hide Dim p1 As Variant Dim p2 As Variant Dim pline As AcadLine Dim m As Integer m = Val(TextBox1.text) For i = 1 To m p1 = ThisDrawing.Utility.GetPoint(, ...

如图，利用VBA进行可视化交互界面的设计，在界面中我们用到了label，button，text，title等多个工具，在进行框图效果的逐一实现后可进行相应的操作和效果实现。VBA（Visual Basic for Applications）是一种用于编写...

2,462

社区成员

10,807

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章