社区 › VB › 示例代码（用户表单、模块）

mark 发表于 2006-10-17 10:22:56

这很有道理
谢谢大家。

mark 发表于 2006-10-17 10:43:37

谢谢你，马克——theswamp是网上最好的AutoCAD讨论论坛

mark 发表于 2006-10-17 10:48:40

同上，这里是学习Autocad和编程的最佳场所

mark 发表于 2006-10-17 11:58:46

好的，快速（我希望）提问。为什么&#039；t以下工作
Public Sub RunMe()
    '
    ' test module
    '
    Load MyForm
    MyForm.Show
   
    MyForm.Label1.Caption = "Hello"          <=== here
    MyForm.TextBoxMsg.Text = "what"      <=== here
   
    Unload MyForm
    End
End Sub
当然了
Private Sub UserForm_Initialize()
    Me.Label1.Caption = "Hello"
    Me.TextBoxMsg.Text = "what"
End Sub

mark 发表于 2006-10-17 12:06:54

问题是，MyForm是包含RunMe的dvb的一部分吗&nbsp；如果是这样，你应该&#039；不必加载它
第二件事——我不知道为什么它不&#039；t工作&nbsp；我去测试一下

查看完整版本: 示例代码（用户表单、模块）