Command.AddControl أسلوب
قم بإنشاء شريط الأوامر دائمة عنصر تحكم للأمر.
مساحة الاسم: EnvDTE
التجميع: EnvDTE (في EnvDTE.dll)
بناء الجملة
'إقرار
Function AddControl ( _
Owner As Object, _
Position As Integer _
) As Object
Object AddControl(
Object Owner,
int Position
)
Object^ AddControl(
[InAttribute] Object^ Owner,
[InAttribute] int Position
)
abstract AddControl :
Owner:Object *
Position:int -> Object
function AddControl(
Owner : Object,
Position : int
) : Object
المعلمات
- Owner
النوع: System.Object
مطلوبة.CommandBarكائن التحكم شريط الأوامر الجديد هو المراد إضافتها.
- Position
النوع: System.Int32
اختياري.موقع الفهرس، بدءاً من واحد في شريط الأوامر لوضع جديدة عنصر تحكم.
القيمة المُرجعة
النوع: System.Object
كائن CommandBarControl .
ملاحظات
حفظ بيئة عنصر التحكم وموضع الخاص به، وتوفيرها وفقا للأمر ContextUIGUIDsأو الردود عليه إلى QueryStatus Methodخلال كل جلسة عمل جديدة للبيئة، بغض النظر عن ما إذا كان يجب الوظيفة الإضافية هو تم تحميله.
أمثلة
' Macro code.
Imports Microsoft.Office.Core
Sub AddControlExample()
' Before running, you must add a reference to
' Microsoft.VisualStudio.CommandBars. Also,
' for this example to work correctly, there should be an add-in
' available in the Visual Studio environment.
Dim cmds As Commands
Dim cmdobj As Command
Dim customin, customout As Object
Dim cmdbarobj As CommandBar
Dim colAddins As AddIns
' Set references.
colAddins = DTE.AddIns()
cmds = DTE.Commands
cmdobj = cmds.Item("File.NewFile")
' Create a toolbar and add the File.NewFile command to it.
cmdbarobj = cmds.AddCommandBar("MyCmdBar", vsCommandBarType.vsCommandBarTypeToolbar)
MsgBox("Commandbar name: " & cmdbarobj.Name)
cmdobj.AddControl(cmdbarobj)
cmds.AddNamedCommand(colAddins.Item(1), "MyCommand", "Button Text", "Some tooltip", True)
End Sub
أمن NET Framework.
- الثقة الكاملة للمتصل الفوري. يتعذر استخدام هذا العضو بواسطة التعليمات البرمجية الموثوق بها جزئيًا. لمزيد من المعلومات، راجع باستخدام مكتبات من تعليمات برمجية موثوق بها جزئي.