05-09-15, 08:46 PM
اعتذر
شفت كلمة بسرعة
كتبت هذا ولم انتبه لمكان المشاركة انها في vb6
بالنسبة في vb6 جرب
Private Sub Command1_Click()
Name App.Path & "\3OF9_NEW.TTF" As "c:\windows\fonts\3OF9_NEW.TTF"
End Sub
---------
الصورة والمثال ليست ضرورية
شفت كلمة بسرعة
كتبت هذا ولم انتبه لمكان المشاركة انها في vb6
بالنسبة في vb6 جرب
Private Sub Command1_Click()
Name App.Path & "\3OF9_NEW.TTF" As "c:\windows\fonts\3OF9_NEW.TTF"
End Sub
---------
الصورة والمثال ليست ضرورية
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات