Dim instance As TabBrowser = New TabBrowser()
Dim num As Integer		'0 から 20 の範囲
Dim value As Integer

instance.StrageInteger(num) = value
value = instance.StrageInteger(num)

'TabBrowserクラス StrageIntegerプロパティ

Imports System.Windows.Forms

Public Class AddIn

    Private tabb As TabBrowser

    Public Sub New()
        tabb = New TabBrowser()
		tabb.StrageInteger(5) = 100
    End Sub

    Public Sub AddIn_Start()
        MessageBox.Show(tabb.StrageInteger(5).ToString)
		tabb.StrageInteger(5) += 50
        MessageBox.Show(tabb.StrageInteger(5).ToString)
    End Sub

End Class