[RISOLTO][Aiuto] .X e .Y Random in un Panel

[Luca360]

io avrei fatto una cosa del genere...

    VBNET Programming

' dimensione del panel : 307;208
        Dim a As New Random
        Dim b As New Random
        Dim x As Integer = a.Next(1, 307) 
        Dim y As Integer = b.Next(1, 20<img src="https://hackmix.altervista.org/images/smilies/cool.png" alt="Cool" title="Cool" class="smilie smilie_56" />
        PictureBox1.Location = New Point(x, y)

Se vogliam fare le cose fatte per bene :

    VBNET Programming

sub randomPic(height as integer, width as integer)
        Dim a As New Random
        Dim b As New Random
        Dim x As Integer = a.Next(1, width) 
        Dim y As Integer = b.Next(1, height)
        PictureBox1.Location = New Point(x, y)
end sub
'Usandola : randompic(208,307)