Creating our first button in VB.NET

Prerequisites

We recommend you go through A 'hello world' VB.NET program before going into this example.

Creating a button

• Add a new class to your project and name it MyCustomUI2
• Add the following code to your class

1. Imports LogismiX.Interop.DynamicRibbonX

2. Imports LogismiX.DynamicRibbonX.Core

4. Public Class MyCustomUI2

5.     Dim _customUI As rxCustomUI

7.     Public Sub New()

8.         ' Instantiate a new rxCustomUI in context 'my_vb_context'

9.         _customUI = rxCustomUI.create("my_vb_context", "My VB.NET context!")

11.         With _customUI

12.             ' Clear old state in the context

13.             .clear()

15.             ' Add a new tab and label it 

16.             With .ribbon.tabs.add(New rxTab())

17.                 .label = "My VB Tab"

19.                 ' Add a new group and label it

20.                 With .groups.add(New rxGroup())

21.                     .label = "My VB Group"

23.                     'Add a new button an label it

24.                     With .buttons.add(New rxButton())

25.                         .label = "My VB Button"

26.                     End With

28.                 End With

29.             End With

31.             ' Render the UI

32.             .refresh()

33.         End With

34.     End Sub

36. End Class

• Modify class ThisAddin in ThisAddin.vb as follows

1. Public Class ThisAddIn

3.     Private _myCustomUI As MyCustomUI2

5.     Private Sub ThisAddIn_Startup() Handles Me.Startup

6.         _myCustomUI = New MyCustomUI2()

7.     End Sub

9.     Private Sub ThisAddIn_Shutdown() Handles Me.Shutdown

11.     End Sub

13. End Class

• Run the add-in. If everything went according to plan a new tab labeled 'My VB Tab' will appear when the application starts and it will contain a button labeled 'My VB Button' in a group labeled 'My VB Group'

  

Code Analysis I

1. ' Add a new group and label it

2. With .groups.add(New rxGroup())

3.     .label = "My VB Group"

Each rxTab object has a collection of rxGroup objects (accessible through its groups property). Here we add a new group to our tab's groups and label it 'My VB Group'

1. 'Add a new button an label it

2. With .buttons.add(New rxButton())

3.     .label = "My VB Button"

Each rxGroup object has a collection of rxButton objects (accessible through its buttons property). Here we add a new button to our group and label it 'My VB Button'