请教，Form怎么调用thisdrawing里面的数据？

月牙湾

我在thisdrawing 里面这样写代码:
  dim a as variant
  Sub dd()
    a = 1
  End Sub

在userform1里面这样写：
Private Sub CommandButton1_Click()
TextBox1.Text =Thisdrawing.ModelSpace.a
End Sub

然后我运行后点击commandbutton1就出现错误：



那我想用form怎么调用thisdrawing里面的数据呢？？





--------------

woaishuijia

1. dim a as variant

复制代码

改为

1. public a as variant

复制代码

1. TextBox1.Text =Thisdrawing.ModelSpace.a

复制代码

改为

1. TextBox1.Text =Thisdrawing.a
   

复制代码

月牙湾

woaishuijia 发表于 2013-12-4 07:54
改为改为

感谢高手，原来thisdrawing相当于一个宏