forse non mi sono spiegato bene
io la scrollbar non la creo dinamicamente, creo dinamicamente solo il contenuto della picturbox che viene spostata dalla scrollbar. per fare questo volevo tradurre questo codice che ho trovato sul forum:
VB6
Per adesso sono riuscito a tradurlo cosìcodice:Private Sub Form_Load() VScrollBar1.Min = 0 VScrollBar1.Max = PictureInterna.ScaleHeight - PictureEsterna.ScaleHeight End Sub Private Sub VScrollBar1_Scroll() PictureInterna.Top = -VscrollBar1.Value End Sub Private Sub VScrollBar1_Change() Call VScrollBar1_Scroll End Sub
VB.Net
solo che mi da errore in Call VScrollBar_Scroll(sender, e): Impossibile eseguire il cast di oggetti di tipo 'System.EventArgs' sul tipo 'System.Windows.Forms.ScrollEventArgs'codice:Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load VScrollBar.Minimum = 0 VScrollBar.Maximum = (pbInt.Height - pbEst.Height) End Sub Private Sub VScrollBar_Scroll(ByVal sender As Object, ByVal e As System.Windows.Forms.ScrollEventArgs) Handles VScrollBar.Scroll pbInt.Top = -VScrollBar.Value End Sub Private Sub VScrollBar_ValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles VScrollBar.ValueChanged Call VScrollBar_Scroll(sender, e) End Sub
se non mi ero ben spiegato prima chiedo scusa

Rispondi quotando