Sinceramente quello ke ha detto dops non l'ho proprio capito... io ho provato a metterli uno dentro l'altro ma nn va... me ne esegue uno solo... cerco di spiegarvi il mio caso: io devo creare un rettangolo ke dalla larghezzza massima si va a chiudere fino a coprire tutto lo schermo...

una cosa del genere:

codice:
Dim X As Integer
Dim Y As Integer
    
DrawWidth = 10
    
For Y = 0 To (Screen.Height / 2)
For X = 0 To (Screen.Width / 2)
    Line (X, Y)-(Screen.Width - X, Screen.Height - Y), , B
Next X
Next Y