SJ Kay - шаблон joomla Joomla
Thursday, 18 May 2017 00:00

Penerapan Enum pada VB.net (part 01)

Written by 

Penerapan Enum pada VB.net (part 01)

Enum digunakan untuk menyimpan konstan value yang digunakan dalam program. Mari kita gunakan Select-Case dan juga IF-Else dalam penerapannya.

Module Module1

    ''' <summary>
    ''' Levels of importance.
    ''' </summary>
    Enum Importance
        None = 0
        Trivial = 1
        Regular = 2
        Important = 3
        Critical = 4
    End Enum

    Sub Main()
        Dim value As Importance = Importance.Critical
        ' Select the enum and print a value.
        Select Case value
            Case Importance.Trivial
                Console.WriteLine("Not true")
                Return
            Case Importance.Critical
                Console.WriteLine("True")
                Exit Select
        End Select
    End Sub

End Module

Lihatlah disini bagian yang memeriksa beberapa nilai Enum dengan beberapa kondisi tertentu. Sebuah variable Dim dicheck dengan kontan value dari Enum.

Contohnya kita menggunakan HTML markup, lalu dalam konsepnya kita terapkan pada Enum. Kemudian kita periksa bagian tags tertentu dengan IF-ELSE statement.

Module Module1

    ''' <summary>
    ''' Represents tag type.
    ''' </summary>
    Enum TagType
        None = 0
        BoldTag = 1
        ItalicsTag = 2
        HyperlinkTag = 3
    End Enum

    Sub Main()
        ' Create enum type variable.
        Dim value As TagType = TagType.HyperlinkTag
        ' Use enum in If-statement.
        ' ... Also use ElseIf statement.
        If value = TagType.BoldTag Then
            Console.WriteLine("Bold")
        ElseIf value = TagType.HyperlinkTag Then
            Console.WriteLine("Not true")
        End If
    End Sub

End Module

 

-----

Ayo daftarkan segera menjadi peserta training / kursus Pemprograman VB.net bersama kami disini.

Pendaftaran Kursus Vb.net Programming FGroupIndonesia.com

Read 160 times Last modified on Thursday, 18 May 2017 04:55
Gumuruh S

Lulusan S1 Soft. Engineering, Universiti Utara Malaysia (UUM). Masih aktif sebagai praktisi teknologi dalam Pembuatan Software, Desain Grafis, sekaligus Bahasa Inggris dan juga sedang mendalami bahasa arab di Ma'had Al-Imarat, Bandung.

Media Sosial

Salah satu cara memudahkan komunikasi menjadi lebih transparan.

Kontak

Jl. Parahyangan no.18,
Komp. Panghegar Permai I,
Ujung Berung, Bandung 40614
Tel: (022) 92800-446 / (022) 95244-964
WA: 0857-95569337 / 0857-21261437
BBM: 7DF95683 / 7CD59179

Email: This email address is being protected from spambots. You need JavaScript enabled to view it. / This email address is being protected from spambots. You need JavaScript enabled to view it. / This email address is being protected from spambots. You need JavaScript enabled to view it.
Top
Direktori Web Indonesia | Active Search Results [Social Submit this] HTTP://WWW.SITUS.WEB.ID Essential SSL