タイトル : Re: 構造体の配列の検索 投稿日 : 2010/12/07(Tue) 14:32 投稿者 : shu
Public Structure Kozotai Public ID As Integer Public NAME As String Public Overrides Function Equals(ByVal obj As Object) As Boolean If TypeOf obj Is String Then Dim strName = DirectCast(obj, String) Return (NAME = strName) ElseIf TypeOf obj Is Kozotai Then Dim objDes As Kozotai = DirectCast(obj, Kozotai) Return (NAME = objDes.NAME) Else Return False End If End Function End Structure こんな感じに構造体を定義すると Array.IndexOf(test, "ジャイアン")の戻り値が2になります。 |