dim Cargado as boolean private sub Form_Rezise() if not Cargado then Webb.W... Webb.H... Cargado = True end ifend sub