Keskustelu: Ohjelmointikysymykset: VB6: Picturebox scrollin kera

Elikkäs tein picturebox objektin, johon latasin kuvan pienellä koodinpätkällä. Nyt olisi sitten tarkoitus saada sekä Vertical, että Horizontal scroll barit, jotka siirtäisivät kuvaa edestakaisin. Lisäksi zoom napit lisäsin, joita painelemalla pitäisi kuvan koon vaihtua. Tuohon jälkimmäiseen ongelmaan varmaan helpoin ratkaisu on tehdä samasta kuvasta erikokoisia versioita ja sitten ladata niitä nappeja painelemalla.

Tuli muuten vielä ihan off- topiccina mieleen, että miten käytännössä voin pistää textboxiin tulevat luvut tulemaan esim integerinä. Kun pistän ohjelman alkuun dim textbox as integer aivan normaalisti, niin käynnistäessäni ohjelma alkaa vitistä, että "Member already exists in the object module this object derives."

scrollaus onnistuu seuraavalla tavalla:

private Sub hscroll1_scroll()
    hscroll1.max = picture1.width
    hscroll1.LargeChange = hscroll1.max / 10
    picture1.left = 0 - hscroll1.value
end Sub

private Sub vscroll1_scroll()
    vscroll1.max = picture1.height
    vscroll1.largechange = vscroll1.max / 10
    picture1.top = 0 - vscroll1.value
end Sub

Yllä olevasta koodista en ole varma toimiiko.
Jotain tohon suuntaan kummiskin...

Tarkista alla oleva linkki, siinä vinkkiä zoomaukseen.
https://www.ohjelmointiputka.net/koodivinkit/24429-vb6-stretchblt

...Jos textboksissa on pelkästään numeroita niin eiköhän asia hoitune jotenkin näin:

dim luku as integer
luku = text1.text

Textboxi on laskemisen kohde, joten se heittää virheen, invalid outside procedure?