Commands.AddCommandBar أسلوب

إنشاء شريط الأوامر هو محفوظة ومتوفرة في المرة القادمة في بيئة هو بدأ.

مساحة الاسم:  EnvDTE
التجميع:  EnvDTE (في EnvDTE.dll)

بناء الجملة

'إقرار
Function AddCommandBar ( _
    Name As String, _
    Type As vsCommandBarType, _
    CommandBarParent As Object, _
    Position As Integer _
) As Object

Object AddCommandBar(
    string Name,
    vsCommandBarType Type,
    Object CommandBarParent,
    int Position
)

Object^ AddCommandBar(
    [InAttribute] String^ Name, 
    [InAttribute] vsCommandBarType Type, 
    [InAttribute] Object^ CommandBarParent, 
    [InAttribute] int Position
)

abstract AddCommandBar : 
        Name:string * 
        Type:vsCommandBarType * 
        CommandBarParent:Object * 
        Position:int -> Object 

function AddCommandBar(
    Name : String, 
    Type : vsCommandBarType, 
    CommandBarParent : Object, 
    Position : int
) : Object

المعلمات

• Name
  النوع: System.String
  مطلوبة.أ اسم لشريط الأوامر الجديد.

• Type
  النوع: EnvDTE.vsCommandBarType
  مطلوبة.vsCommandBarTypeالثابت الذي يحدد النوع الأمر شريط:

• CommandBarParent
  النوع: System.Object
  اختياري.المكتب CommandBarالكائن الذي شريط الأوامر الجديد هو المراد إضافتها.(Th هو هو المطلوبة، على الرغم من ذلك، إذا Typeهو vsCommandBarTypeMenu.)

• Position
  النوع: System.Int32
  اختياري.موقع الفهرس، بدءاً من واحد في شريط الأوامر إلى قم بوضع شريط الأوامر الجديد.

القيمة المُرجعة

النوع: System.Object
كائن CommandBar .

ملاحظات

شريط الأوامر الجديد هو متوفراً خلال كل جلسة عمل جديدة لبيئة بغض النظر عن ما إذا كان يجب الوظيفة الإضافية هو تحميل.

CommandBarالكائن هو عضوا طراز كائن Microsoft المكتب 2010 Suite.

أمثلة

' Macro code.
Imports Microsoft.VisualStudio.CommandBars
Sub AddCommandBarExample()
   ' Before running, you must add a reference to the Office 
   ' typelib to gain access to the CommandBar object. 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 = cmds.AddNamedCommand(colAddins.Item(1), "mycommand", _
   "mycommand", "tooltip for mycommand", True)
End Sub

أمن NET Framework.

• الثقة الكاملة للمتصل الفوري. يتعذر استخدام هذا العضو بواسطة التعليمات البرمجية الموثوق بها جزئيًا. لمزيد من المعلومات، راجع باستخدام مكتبات من تعليمات برمجية موثوق بها جزئي.

راجع أيضًَا

المرجع

Commands واجهة

Commands الأعضاء

EnvDTE مساحة الاسم