ليس المطلوب اخي
شكرا لكم تم حل المعادله
كود :
Dim v
v = Val("&h" & Text1.Text)
a.Caption = ("&H" & Text1.Text) * 50
a.Caption = a.Caption / 32