The Visual Basic 2008 programmeringsspråk fra Microsoft gjør en rekke utviklingsoppgaver ekstremt lett. Du kan laste og vise bildene ved hjelp av intuitive PictureBox kontroll, for eksempel. Ikke alle funksjoner kan komme med et enkelt grafisk brukergrensesnitt ( GUI ) verktøy, men . En Visual Basic -funksjon uten et brukervennlig grensesnitt , er muligheten til å endre størrelsen på importerte bilder i PictureBox kontroll. Faktisk utfører denne operasjonen krever et triks som virker positivt hackerish : Du må opprette et nytt bilde av ønsket størrelse og tegne det forrige bildet på den, som om til en skjerm . Instruksjoner
en

Opprett en ny Visual Basic-prosjekt , og gi den navnet " ImageResizer . "
2

Dobbeltklikk på " PictureBox " og " Button " komponenter i " verktøykasse " for å legge disse funksjonene til din grafiske brukergrensesnittet ( GUI ) . ( Som standard vil denne listen åpner umiddelbart når Visual Basic oppretter et nytt prosjekt . ) Lukk Toolbox og høyreklikk PictureBox --- en GUI komponent som viser et bilde . Klikk på "Egenskaper" på drop- down menyen for å åpne "Properties "-listen . Finn " Image" eiendom, og klikk på Liste- som vises ved siden av det å velge et bilde fra harddisken din som du ønsker å endre størrelsen . Denne komponenten presenterer en knapp for deg å klikke fordi den ligner på en vanlig Windows -knappen
3

Dobbeltklikk på knappen du nettopp la til ; . Denne handlingen vil åpne kildekoden redaktør for endre størrelse kode som skal aktivere så snart brukeren av programmet klikker på knappen . Lim inn følgende inni den : en

Dim sourceImage som Bitmap = PictureBox1.Image

Dim newImage som New Bitmap ( 200200 )

Dim renderer som grafikk = Graphics.FromImage ( newImage )

renderer.drawImage ( sourceImage , 0,0, 1 newImage.Width , en newImage.Height )

PictureBox1.Image = newImage

Endre opprinnelig størrelse ( " 200200 " i koden ) av det nye bildet til ønsket størrelse ønsker du å bruke.