[VB6] Codice per le finestre transparenti

[Longhorn]

Dato che abbiamo risolto adesso passo ad un altra cosa.
Applicare le impostazioni. Per esempio voglio appicare le trasparenze secondo un valore di una textbox in un altro form:
Trasp Me.hwnd 98 Text1 = GetSetting("MyApp", "Startup", "User")
Direi di eliminare Tetx1,ma poi come faccio a dire a l'handel hwnd di guardare invece che al numero di guardare alla cifra della text2 compresa tra zero e 100?