Ako čítať Pixely z obrázku boxy vo VB6

Čítanie individuálny pixel z obrázku nie je ťažké . V skutočnosti , VB ( Visual Basic ) má špecifické funkcie vstavané v tom , že umožňujú programátorovi rýchlo a ľahko prezerať a editovať pixelov . Existujú aj ďalšie pokročilé API ( Application Programming Interface ) funkcie , ktoré využívajú pokročilé programátorov , ktoré sú rýchlejšie a efektívnejšie . Naučiť sa , ako zobraziť pixel a extrahovať jednotlivé farby médiá z tohto pixelu sú len prvé kroky , ako sa stať VB guru . Pokyny dovolená 1

Spustite aplikáciu VB6 . Prejsť na formulár , kde budete mať obrázok , ktorý chcete prijímať dáta .
2

Otvorte formulár v návrhovom zobrazení .
3

Vytvorte tri funkcie že bude čítať pixel po načítaní it.Public funkcie ExtractRed ( byVal CurrentColor As Long ) Ako ByteExtractRed = CurrentColor A 255End FunctionPublic funkcia ExtractGreen ( byVal CurrentColor As Long ) Ako ByteExtractGreen = ( CurrentColor \\ 256 ) A 255End FunctionPublic funkcia ExtractBlue ( byval CurrentColor As Long ) ako ByteExtractBlue = ( CurrentColor \\ 65536 ) A 255End funkcie
4

Dim svoje objekty takto : Dim PixelColor ako LongDim ColorRed ako Byte , ColorGreen ako Byte , ColorBlue ako ByteDim pôvodne kandidoval na rozmer a jeho použitie je tu ako sloveso . PixelColor , ColorRed , ColorGreen a ColorBlue sú všetky premenné , ktoré čakajú na vstup dát
5

Zadajte nasledujúci kód pod vašou Dim vyhlásenie : . PixelColor = PictureBox.Point ( x , y ) Teraz kód vyzerá takto : Dim PixelColor ako LongDim ColorRed ako Byte , ColorGreen ako Byte , ColorBlue ako BytePixelColor = PictureBox.Point ( x , y ) PictureBox je názov PictureBox váš obrázok je dovnútra súradníc ( x , y ) sú súradnice špecifické pixel chcete dáta z Dáta z obrazového bodu je teraz uložený v premennej PixelColor . Ďalším krokom je získať jednotlivé farby zo spektra RGB
6

Zadajte nasledujúci kód pod vami posledný vyhlásenie : . ColorRed = ExtractRed ( farebná ) ColorGreen = ExtractGreen ( farebná ) ColorBlue = ExtractBlue ( Color ) Teraz kód vyzerá takto : Dim PixelColor ako LongDim ColorRed ako Byte , ColorGreen ako Byte , ColorBlue ako BytePixelColor = PictureBox.Point ( x , y ) = ColorRed ExtractRed ( PixelColor ) ColorGreen = ExtractGreen ( PixelColor ) ColorBlue = ExtractBlue ( PixelColor ) teraz každý z premenných ColorRed , ColorGreen a ColorBlue bude mať číslo od nuly do 255 uložené v nich . Úspešne ste chytil pixel a pokazil konkrétne poradí farieb .

• Predchádzajúca strana: VBA návod pre Word 
• Ďalšia strana: Ako prehrávať audio skladieb pomocou jazyka Visual Basic