Program VB.NET Mengambil Nilai RGB Citra

Sabtu, 16 Februari 2013 | 00:09 WIB | Dibaca : 2855 kali | Kategori : Prog VB.NET
Program VB.NET Mengambil Nilai RGB Citra

pada artikel sebelumnya saya sudah membahas pemahaman red green blue pada citra . Nah di artikel ini saya memberikan program menggunakan Visual Basic.Net 2008 untuk mengambil nilai nilai red green blue citra

Berikut Program VB.NET Mengambil Nilai RGB Citra

Design Form berikut



Setting Propertis Komponen
Picturebox1 Name  : pic1

TextBox1 Name : NilaiRGB, Multiline : True, Scrolbar : Vertical
Untuk Button1 dan Button2 tidak perlu dirubah namanya

Tambahkan juga KOMPONEN OPEN FILE DIALOG rubah dengan Name : OFD

Listing Program

Public Class Form1
    'mendefinisikan gambar sebagai suatu gambar jenis bitmap
    Dim gambar As Bitmap
    'mendefinisikan variabel untuk RGB
    Dim vR, vG, vB As Double
    
    'untuk membuka gambar
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        OFD.Filter = "BMP|*.bmp|JPG|*.Jpg"
        OFD.ShowDialog()

        If OFD.FileName = "" Then Exit Sub
        Pic1.Image = Image.FromFile(OFD.FileName)
        gambar = New Bitmap(Pic1.Image)
        Me.Text = "Ukuran gambar " & gambar.Width & "x" & gambar.Height
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    'melakukan perulangan pada media gambar
        For Pc = 0 To gambar.Height - 1
            For Pb = 0 To gambar.Width - 1

             'mengambil nilai RGB
                vR = gambar.GetPixel(Pb, Pc).R
                vG = gambar.GetPixel(Pb, Pc).G
                vB = gambar.GetPixel(Pb, Pc).B

        'memasukkan nilai RGB ke textbox
                NilaiRGB.Text = NilaiRGB.Text & vR & " " & vG & " " & vB & vbCrLf

        'merefresh komponen textbox
                NilaiRGB.Refresh()
            Next Pb
        Next Pc
    End Sub
End Class


Demikianlah artikel program vb.net mengambil nilai RGB citra ini semoga bermanfaat.

Mari kita sama sama belajar bahasa pemrograman.

Tag : Program VB.NET Mengambil Nilai RGB Citra, Citra RGB, belajar bahasa pemrograman, bahasa pemrograman, bahasa pemrograman visual basic net, tempat download program


Bila berita ini bermanfaat silahkan share Program VB.NET Mengambil Nilai RGB Citra ini dengan teman anda, Terima kasih sebelumnya

Berikan Komentar Anda Pada Berita Program VB.NET Mengambil Nilai RGB Citra

Anda berada di halaman Program VB.NET Mengambil Nilai RGB Citra, dan telah membaca artikel Program VB.NET Mengambil Nilai RGB Citra. Artikel Program VB.NET Mengambil Nilai RGB Citra bisa anda peroleh pada halaman http://www.mesran.web.id/berita-554-program-vbnet-mengambil-nilai-rgb-citra.html . Anda bisa meng-COPY/PASTE artikel ini dengan meletakkan link Program VB.NET Mengambil Nilai RGB Citra sebagai sumbernya.
Web Rekomendasi
Publikasi Ilmiah
 Copyright (c) 2011 - 2018 mesran.web.id