Dim instance As Std = New Std() Dim returnValue As String returnValue = instance.Platform()
'Stdクラス プロパティ Platform Imports System.Windows.Forms Public Class AddIn Public Sub New() Dim std As Std = New Std() MessageBox.Show(std.Platform()) End Sub End Class
'Stdクラス プロパティ Platform Imports System.Windows.Forms Public Class AddIn Private std As Std = New Std() Public Sub New() std = New Std() End Sub Public Sub AddIn_Start() MessageBox.Show(std.Platform()) End Sub End Class
'Stdクラス プロパティ Platform Imports System.Windows.Forms Public Class AddIn Private std As Std = New Std() Public Sub AddIn_Start() std = New Std() MessageBox.Show(std.Platform()) End Sub Public Sub AddIn_Stop() std = Nothing End Sub End Class
このページのQRコード
便利ウェブサイト
便利 Android アプリ
便利 iOS(iPhone,iPad) アプリ