Estoy migrando de VB6 a Visual . NET y tengo un Sub que utiliza el metodo PSET y no se como hacer lo mismo en .NET, dado que ese metodo no existe

Les paso el Sub de VB6.

Private Sub Dibujar_Click()
Dim Dato As Byte
Dim X As Integer
Dim Y As Integer
Dim Puntero As Long
Numarch = FreeFile
Open NombreArchivo For Random As #Numarch Len = 1
Puntero = 1
For Y = 199 To 0 Step -1 'Dibujo de Arriba hacia abajo
For X = 0 To 151
Get #Numarch, Puntero, Dato
Picture1.PSet (X, Y), RGB(Dato, Dato, Dato)
Puntero = Puntero + 1
Next
Next

Close Numarch
End Sub