Difference between revisions of "A 'hello world' VB.NET program"

Imports LogismiX.Interop.DynamicRibbonX

Imports LogismiX.DynamicRibbonX.Core

Public Class MyCustomUI

    Dim _customUI As rxCustomUI

    Public Sub New()

        ' Instantiate a new rxCustomUI in context 'my_vb_context'

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

        ' Cache a reference to the customUI's ribbon

        Dim myRibbon As rxRibbon = _customUI.ribbon

        ' Create a new tab and label it 'My VB Tab'

        Dim myTab As rxTab = New rxTab()

        myTab.label = "My VB Tab"

        ' Add the tab to myRibbon's tabs

        myRibbon.tabs.add(myTab)

        ' Render the UI

        _customUI.refresh()

    End Sub

End Class

Public Class ThisAddIn

    Private _myCustomUI As MyCustomUI

    Private Sub ThisAddIn_Startup() Handles Me.Startup

        _myCustomUI = New MyCustomUI()

    End Sub

    Private Sub ThisAddIn_Shutdown() Handles Me.Shutdown

    End Sub

End Class