[wolf1120]

السلام عليكم ورحمة الله وبركته


اريد التعديل علا المثال المرفق


بحيث برنامج صغير ندخل له قيمة يحولها الى الهيكس ديسمال  ب 4 بايت وليس ب2 بايت كما في الصورة

المثال في المرفقات

وشكر لمساعدتم مسبقا !!

[wolf1120]

اين انتم ياعضاء المنتدى الاحترافين هل من مجيب

[wolf1120]

الرجاء المساعدة برنامج ضروري

[wolf1120]

شكر اخي Amir_alzubidy علا المتابعة لكن المثال لا يفي بالغرض

[wolf1120]

اين انتم ياعضاء المنتدا المحترفين

---

شكر لكم للتعاون تم تعديل المثال


Private Sub Command1_Click()
txtHex.Text = Hex(Label6.Caption)
End Sub

Private Sub txtASCII_Change()
Label6.Caption = txtASCII.Text
Label6.Caption = Label6.Caption + ("2")
End Sub