Dim instance As StdFunc = New StdFunc()
Dim value As String
Dim returnValue As Integer

returnValue = instance.IntVal(value)

'StdFuncクラス IntValメソッド

Imports System.Windows.Forms

Public Class AddIn

	Private stdf As StdFunc

	Public Sub New()
		stdf = New StdFunc()
		Dim num1 As Integer = stdf.IntVal("-456")
		Dim num2 As Integer = stdf.IntVal("12")
		MessageBox.Show((num1 * num2).ToString)
	End Sub

End Class