ヘッダー
Visual Basic サンプル集
VB2005対応 VB2008対応 VB2010対応 VB2012対応 VB2013対応 VB2015対応 VB2017対応 VB2019対応

構造体の宣言

2021/4/18

→ C# のサンプルに切り替える

 

一般的な構造体

VB.NET2002対応 VB.NET2003対応 VB2005対応 VB2008対応 VB2010対応 VB2012対応 VB2013対応 VB2015対応 VB2017対応 VB2019対応

Public Structure SampleStruct

    Public Field1 As String 'フィールド
    Public Property Prop1 As Integer 'プロパティ。 この構文でプロパティを宣言できるのはVB2010以上。

    'コンストラクター
    Public Sub New(initValue As String)
        Field1 = initValue
    End Sub

    'メソッド
    Public Function Add(x As Integer, y As Integer) As Integer
        Return x + y
    End Function

End Structure

 

 

型パラメーターを持つ構造体(ジェネリック)

VB2005対応 VB2008対応 VB2010対応 VB2012対応 VB2013対応 VB2015対応 VB2017対応 VB2019対応

Public Structure SampleStruct(Of T)

    Public X As T
    Public Y As T
    Public Z As T

End Structure

使用例

VB2005対応 VB2008対応 VB2010対応 VB2012対応 VB2013対応 VB2015対応 VB2017対応 VB2019対応

Dim s1 As SampleStruct(Of Decimal)
s1.X = 100
s1.Y = 200

Dim s2 As SampleStruct(Of String)
s2.X = "AAA"
s2.Y = "BBB"

 

 

型パラメーターを2つ持つ構造体(ジェネリック)

VB2005対応 VB2008対応 VB2010対応 VB2012対応 VB2013対応 VB2015対応 VB2017対応 VB2019対応

Public Structure SampleStruct(Of T1, T2)

    Public X As T1
    Public Y As T2

End Structure

使用例

VB2005対応 VB2008対応 VB2010対応 VB2012対応 VB2013対応 VB2015対応 VB2017対応 VB2019対応

Dim s1 As SampleStruct(Of Decimal, String)
s1.X = 100
s1.Y = "AAA"

Dim s2 As SampleStruct(Of Boolean, Date)
s2.X = True
s2.Y = #6/27/2024#

 

 

参考

構造体 - Visual Basic | Microsoft Docs

Structure ステートメント - Visual Basic | Microsoft Docs

構造体とクラス - Visual Basic | Microsoft Docs

 


VB6対応 VB6では Type を使って通称「構造体」(正式名 ユーザー定義型)を作成できます。