Kuidas Loe pikslit Pilt karbid VB6

lugemine üksikute pikslite pildil ei ole raske.Tegelikult VB (Visual Basic) on konkreetsed ülesanded sisseehitatud, mis võimaldavad programmeerija vaadata ja redigeerida pikslit kiiresti ja lihtsalt.On ka teisi arenenud API (Application Programming Interface) funktsioonid, mis arenenud programmeerijad kasutavad, mis on kiirem ja tõhusam.Õppimine, kuidas vaadata pixel ja väljavõtte üksikute värvi keskkondadesse sellest pixel on vaid esimesed sammud muutumas VB guru.

juhised

  1. Alusta VB6 taotluse.Mine kujul, kus teil on pilt, mida soovite saada andmeid.

  2. Avatud vorm kujundusvaates.

  3. Loo kolme funktsiooni, mis loeb piksli kui olete taastada aga selle.
    avalikke ülesandeid ExtractRed (ByVal currentcolor Nagu Long) Nagu bait
    ExtractRed = currentcolor 255
    End Function
    avalikke ülesandeid ExtractGreen (ByVal currentcolor Nagu Long) Nagu bait
    ExtractGreen = (currentcolor \ 256) 255
    End Function
    avalikke ülesandeid ExtractBlue(ByVal currentcolor Nagu Long) Nagu bait
    ExtractBlue = (currentcolor \ 65536) ja 255
    End Function

  4. Dim oma objektide järgmiselt:
    Dim PixelColor nagu Long
    Dim ColorRed kui bait, ColorGreen kui bait, ColorBlue kui bait
    Dim algselt seisis mõõde ja selle kasutamine siin on verb.PixelColor, ColorRed, ColorGreen ja ColorBlue on kõik näitajad ootab andmete sisestamist.

  5. Tippige järgmine kood allpool oma Dim avaldused:
    PixelColor = PictureBox.Point (x, y)
    Nüüd kood näeb välja selline:
    Dim PixelColor nagu Long
    Dim ColorRed kui bait, ColorGreen kui bait, ColorBlue kui bait
    PixelColor = PictureBox.Point (x, y)
    PictureBox on nimi picturebox oma pilt on. koordinaadid (x, y) on koordinaatide konkreetse piksli soovite andmeid.Andmeid piksli on nüüd salvestatud muutuja PixelColor.Järgmine samm on eraldada üksikuid värvid RGB spektri.

  6. Tippige järgmine kood all sa viimane avaldus:
    ColorRed = ExtractRed (Color)
    ColorGreen = ExtractGreen (Color)
    ColorBlue = ExtractBlue (Color)
    Nüüd kood näeb välja selline:
    Dim PixelColor nagu Long
    Dim ColorRedkui bait, ColorGreen kui bait, ColorBlue kui bait
    PixelColor = PictureBox.Point (x, y)
    ColorRed = ExtractRed (PixelColor)
    ColorGreen = ExtractGreen (PixelColor)
    ColorBlue = ExtractBlue (PixelColor)
    Nüüd iga muutuja ColorRed,ColorGreen ja ColorBlue on mitmeid nullist kuni 255 salvestatud neist.Olete edukalt haaras piksli ja lagunes konkreetset värvi jada.

671
0
2
Visual Basic Programmeerimine