Bonito code gracias muy util.

me dices a que se refiere esto "&HFF".

Gracias por la Aclaración RHL. saludos

ok gracias por responder. me quedo una dudita

y ese ",0" como para que?

Hola, Podría alguien explicarme la parte esta parte "sSave = String(255, 0)" del código que coloco abajo.

Private Declare Function GetCurrentDirectory Lib "kernel32" Alias "GetCurrentDirectoryA" (ByVal nBufferLength _ As Long, ByVal lpBuffer As String) As Long
 
Private Sub Form_Paint()
Dim sSave As String
 
sSave = String(255, 0)
 
GetCurrentDirectory 255, sSave
MsgBox sSave
End Sub
 

disculpen lo directo de la pregunta pero no tengo mas nada que decir