Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
会不会是你的按钮名和显示文本搞错了?看看我的代码
Dim btn As WinForm.Button
btn = e.Form.CreateControl("btnPrev", ControlTypeEnum.Button)
btn.Text = "上一条"
btn.Left = 100
btn.Top = 100
e.Form.AddControl(btn)
已解决,自己糊涂了。
原窗口A的代码:
Dim btn As WinForm.Button
btn = e.Form.CreateControl("btn", ControlTypeEnum.Button)
Forms("窗口B").AddControl(btn)
改成:
Dim btn As WinForm.Button
btn = Forms("窗口B").CreateControl("btn", ControlTypeEnum.Button)
Forms("窗口B").AddControl(btn)
就行了。谢谢各位!!!!