Visual Basic programmeringsspråk fra Microsoft gjør det lett å gjøre mange ting , spesielt når det gjelder tid til å designe et brukergrensesnitt ved hjelp av sin dra-og -slipp- komponenter. Men noen oppgaver er ikke så intuitivt , slik som å endre størrelse på et bilde. Det synes opplagt for den innebygde Image-klassen til å ha en resize metoden, men ingen slike hell . Men , er oppgaven ikke umulig , det bare krever litt bakvendt bruk av DrawImage metoden i Graphics -klassen. Instruksjoner
en

Åpne Visual Basic-prosjektet og dra en PictureBox fra Toolbox inn skjemaet. Mens det fortsatt er valgt , går du til Egenskaper-vinduet nederst i høyre og finne den "Image " eiendom . Klikk på listeboksen og velg et bilde fra harddisken din som du ønsker å endre størrelsen .
2

Dra en knapp kontroll fra verktøykassa inn skjemaet . I Egenskaper-vinduet , endre navn egenskapen til " endre størrelse . "
3

Dobbeltklikk på knappen du har lagt i trinn to. Dette vil skape en hendelse metode og flytte markøren til den automatisk . Lim inn følgende inni den : en

Private Sub button1_click ( ByVal avsenderen som System.Object , ByVal e Som System.EventArgs ) Håndtak Button1.Click

Dim kilde Som Bitmap = PictureBox1.Image

Dim dest_image som ny Bitmap ( 200 , 200 )

Dim g Som Graphics = Graphics.FromImage ( dest_image )

g.DrawImage ( kilde , 0 , 0 , dest_image.Width + 1 , dest_image.Height + 1 )

PictureBox1.Image = dest_image

End Sub

normalt ville du bruke en grafikk objekt til å tegne et bilde til skjermen, men denne metoden tar en litt annen tilnærming . I stedet tar det bildet fra PictureBox og trekker en kopi av den på et annet bilde , oppkalt dest_image , som vi initialisert til en mindre størrelse . Etter det , faller det gamle bildet og forteller picturebox å vise den nye , mindre bilde i stedet.