moduli in vb6

[Grumpy]

Trasforma la routine in una Sub pubblica che riceve come argomento il form.

Public Sub RtbTrasp(objForm As Form)
    ....
    For Each Control In objForm.Controls
    ....
End Sub

Nel Form_Load di ciascun form richiama la routine passandogli come parametro il form stesso, cioè l'oggetto Me.
Naturalmente anche la dichiarazione della SetWindowLong con le sue costanti va spostata nel modulo.