Office 2007開發系列(11)
整合Windows Form控制項與VSTO
文／沈炳宏

==========程式=========
程式1
Dim btn As New 
System.Windows.Forms.Button()
Dim oleObject as 
Microsoft.Office.Tools.Excel.OLEObject
oleObject = 
Me.Controls.Add(btn, 100, 100, 150, 100, "button1")
oleObject.Left = 100

==========程式=========

==========程式=========
程式2
Dim btn As 
Microsoft.Office.Tools.Excel.Controls.Button
btn = Me.Controls.AddButton(
100, 100, 150, 100, "button1")
btn.Left = 100


==========程式=========

==========程式=========
程式3
Dim myobj As 
Microsoft.Office.Interop.Excel.OLEObject
myobj = Controls.AddControl(
New UserControl1(), _
Me.Range("A10"), "UserControl")
myobj.Top = Me.Range("B15").Top

==========程式=========