2013-05-07 明经AutoCAD.VBA编程(45054712) 群聊记录：请问，怎么样在 VBA中建立两个选择集？因为在第二个选择集实例化时，会删除第

明经快报

清风明月名字897 08:18:16

请问，怎么样在 VBA中建立两个选择集？因为在第二个选择集实例化时，会删除第一个选择集

回不去的旅人 08:18:50

可以吧，我都建立4个了

清风明月名字897 08:21:40

这个却不行

轻舞飞扬 08:22:28

不要两个都add。

轻舞飞扬 08:23:10

不同的选择集，add不同的名字

清风明月名字897 08:26:22

不懂，我是这样写的啊

轻舞飞扬 08:27:15

你add的都是

ss

清风明月名字897 08:28:50

给我改完整一下，好吗？

轻舞飞扬 08:29:11

ThisDrawing.SelectionSets.Add("XX")

另一个选择集，ss名字随便改成别的都行

一样做on error处理

两个变量分别set

清风明月名字897 08:31:29

谢谢您！已经改好了。

清风明月名字897 08:32:28

我还以为SS有特别含义呢，所以不敢改。我想SS不是变量，肯定有特别含义，结果我错了。
SS到底是表达什么意思？它又不是变量

轻舞飞扬 08:32:53

你叫A，我叫B，就这么简单

不能同时叫A

明经快报

[mccad]mccad 11:44:53

论坛推出明经快报机器人服务，你可以通过“#搜索 要搜索的内容”来搜索论坛帖子。

一缕阳光 11:45:54

山巅清泉 11:46:06

明经快报

狐偃 12:12:15

大家帮忙把这程序改一下
Private Sub CommandButton10_Click()
If OptionButtton1.Value = True Then
TextBox16.Text = Val(TextBox15.Text) + Val(TextBox3.Text) + Val(TextBox7.Text)
End If
If OptionButtton2.Value = True Then
TextBox16.Text = Val(TextBox14.Text)
End If
End Sub

小学生 12:13:49

我这个程序改成啥样啊

把这个程序改成啥样啊

轻舞飞扬 12:14:24

全删掉  完工

狐偃 12:14:30

改通就行

我运行时，说没定义

小学生 12:14:59

什么东东没定义

QQ2013 12:15:21

这里面也没有自定义的变量啊

狐偃 12:15:40

但是不能运行啊

一缕阳光 12:15:56

网上代码 可能这些按钮控件没有

轻舞飞扬 12:16:00

估计某个控件名字不对

小学生 12:16:07

你知道，这里都写了些什么吗？

一缕阳光 12:16:14

抄袭的

狐偃 12:16:18

我都检查了

自己弄的

一缕阳光 12:16:55

控件名称不对

小学生 12:16:57

提示你什么没定义？

轻舞飞扬 12:17:08

F8，错误停哪儿了。截图

没图说个JJ

狐偃 12:17:50

[qqimg]oldimg/{879340AB-6708-350E-E608-91EB4DFAA4D1}.jpg[/qqimg]

轻舞飞扬 12:18:09

报错？

你有OptionButtton1？

小学生 12:18:40

没有单选按钮

狐偃 12:18:47

[qqimg]oldimg/{911497CB-8560-478F-7761-80304677BCEC}.jpg[/qqimg]

狐偃 12:20:00

[qqimg]oldimg/{CAC3E05B-6A2E-1B79-0113-65608D0DCE39}.jpg[/qqimg]

就是要兴县这个功能

小学生 12:20:30

机械专业啊

狐偃 12:20:38

是的

大神们帮帮忙啊

小学生 12:20:52

做什么机械的？

狐偃 12:21:08

减速器的校核

轻舞飞扬 12:21:18

单选按钮确实叫OptionButtton1就没问题。不该报错的

狐偃 12:21:36

确实叫这个名字

轻舞飞扬 12:22:13

把OptionButtton1删了，重建一个OptionButtton1呢

馊主意……

狐偃 12:22:42

那有区别吗

轻舞飞扬 12:22:53

不知道

狐偃 12:24:27

谁能帮我啊

小学生 12:29:06

你把单选按钮的属性截个图

狐偃 12:29:52

[qqimg]oldimg/{D1252AFE-345E-A28B-E645-0B1FA11DECEF}.jpg[/qqimg]

小学生 12:30:37

看不出有毛病

小学生 12:31:12

你把dvb文件发过来，我看看

狐偃 12:32:56

你接受一下

小学生 12:38:22

I服了U

轻舞飞扬 12:38:50

啥情况

狐偃 12:38:54

怎么了，是不是犯了很低级的

小学生 12:39:09

你控件名称是自己一个一个敲的啊？

狐偃 12:39:25

是的

轻舞飞扬 12:39:28

小学生 12:39:50

你不觉得费劲啊？

你把控件名称复制过去试一下

狐偃 12:40:19

我就一小白

小学生 12:41:20

呵呵，一般是看不出的，我一调试就说没有控件，真奇怪，仔细一看多个t

狐偃 12:41:40

我靠，

我真没注意到

谢谢各位大神了

轻舞飞扬 12:42:08

输入me.

狐偃 12:42:37

什么意思

轻舞飞扬 12:43:04

跳出来好东西

狐偃 12:43:26

舍尔东东

轻舞飞扬 12:43:46

嚓，好东西能说么

狐偃 12:44:31

在程序你输吗

轻舞飞扬 12:44:44

窗体

狐偃 12:45:08

不会死机吧

轻舞飞扬 12:45:21

明经快报

狐偃 13:29:44

一个窗体中有两个组合框，窗体的初始化过程怎么编啊

一缕阳光 13:30:24

啥组合框?

狐偃 13:30:47

初始化子过程怎样才能没有二义性

一缕阳光 13:31:00

载入窗口 vb自动初始化

狐偃 13:31:04

[qqimg]oldimg/{520FC04A-0CA3-92F7-E8F2-111BB525DB80}.jpg[/qqimg]

狐偃 13:31:41

Private Sub UserForm_Initialize()

一缕阳光 13:31:55

不需要 自动的

狐偃 13:31:57

如果都用这个，肯定有二义性

一缕阳光 13:32:16

设计好就可以

狐偃 13:32:22

我点了，可是其每次出来的都是这个啊

狐偃 13:40:05

搞定了

明经快报

烂柯居士 16:42:57

[qqimg]oldimg/{8BCEEE7C-2287-12E4-AAE2-EC121977C84F}.jpg[/qqimg]

奇怪

怎样把字体设置为宋体呢？

提示name为只读

明经快报

就在那一天 17:04:29

见一个new font

烂柯居士 17:05:24

new font要怎么设置为宋体呢？

请赐教

为了学习VBA特地学的vb

明经快报

cad 2d 3d 19:29:14

哦一下也行

明经快报

雷噬天下v 21:12:30

vb 2012的多窗口界面
谁有源码可以提供来参考？