すいません、VB4しかやってないんです、VBAはやったけど(ぼそ) チラシの裏だって立派な書き込み空間なんだからねっ!資源の有効活用なんだからねっ!とか偉そうに言ってるけど、実は色々と書き残したいだけ

だからなに? どうしろと? くるみサイズの脳みそしかないあやしいジャンガリアンベムスターがさすらう贖罪蹂躙(ゴシックペナルティ)

ホーム 連絡をする 同期する ( RSS 2.0 ) Login
投稿数  632  : 記事  35  : コメント  18479  : トラックバック  143

ニュース


片桐 継 は
こんなやつ

かたぎり つぐ ってよむの

大阪生まれ河内育ちなんだけど
関東に住みついちゃったの
和装着付師だったりするの
エセモノカキやってたりするの
VBが得意だったりするの
SQL文が大好きだったりするの
囲碁修行中だったりするの
ボトゲ好きだったりするの
F#かわいいよF#

正体は会った人だけ知ってるの

空気読まなくてごめんなさいなの


わんくまリンク

C#, VB.NET 掲示板
C# VB.NET掲示板

わんくま同盟
わんくま同盟Blog


WindowsでGo言語
WindowsでGo言語


ネット活動


SNSは疲れました

記事カテゴリ

書庫

日記カテゴリ

ギャラリ

イベント活動

プログラムの活動

ループしなくても、できるよ、ってお話。

Module Module1

    'にゃんこクラス
    Public Class Cat
        Private _name As String
        Property Name() As String
            Get
                Return _name
            End Get
            Set(ByVal value As String)
                _name = value
            End Set
        End Property

        Private _type As String
        Property Type() As String
            Get
                Return _Type
            End Get
            Set(ByVal value As String)
                _Type = value
            End Set
        End Property
    End Class

    Sub Main()

        Dim Nyans As New List(Of Cat)

        'にゃんこが集合
        Nyans.Add(New Cat With {.Name = "しゅうたん", .Type = "アメショ"})
        Nyans.Add(New Cat With {.Name = "ろり", .Type = "アメショ"})
        Nyans.Add(New Cat With {.Name = "みずきちゃん", .Type = "スコティ"})
        Nyans.Add(New Cat With {.Name = "マグさん", .Type = "ほげ"})

        '怪しい「ほげ」猫さんは除外
        Nyans = (From x In Nyans Where x.Type IsNot "ほげ").ToList

        For Each nyan In Nyans

            Console.WriteLine("{0}は{1}", nyan.Name, nyan.Type)

        Next

        Stop

    End Sub

End Module

Typeのあやしい「ほげ」猫さんを除きたい=「ほげ」猫以外をリストにすればいい、って発想だったりするん。

image

こんな感じ。

投稿日時 : 2010年5月26日 18:37

コメント

# re: GenericList(of Class) から一定条件の要素を取り除く 2010/05/26 18:55 りょーいち
あぁ、夢の共演だ。。

# re: GenericList(of Class) から一定条件の要素を取り除く 2010/05/26 19:59 かたぎり
全米が泣くよ!


# re: GenericList(of Class) から一定条件の要素を取り除く 2010/05/26 22:25 まさる
個人的には

Nyans = Nyans.Where(Function(x) x.Type IsNot "ほげ").ToList()

の方が好き。

# [Perl] 祭りっぽいので乗ってみる 2010/05/26 23:17 雑記 - otherwise
……わんくまの祭りなのに相変わらずはてダで反応する人。>自分 GenericList(of Class) から一定条件の要素を取り除く (すいません、VB4しかやってないんです、VBAはやったけど(ぼそ)) 夢の競演 (東方算程譚) 夢の競演みたび (まさる blog ) VB, C++, C# と既に揃

# [写真] 祭りといえば 2010/05/27 0:19 りょーいち Blog
[写真] 祭りといえば

# にゃんこ夢の共演まつり会場・勝手口 2010/05/27 21:06 すいません、VB4しかやってないんです、VBAはやったけど(ぼそ)
にゃんこ夢の共演まつり会場・勝手口

過去の祭り、リターンズ

Post Feedback

タイトル
名前
Url:
コメント