26-02-20, 03:43 PM
السلام عليكم ورحمة الله وبركاتة
معايا كود انبوت بوك وعايز اجعلة بطريقة الباسورد
معايا كود انبوت بوك وعايز اجعلة بطريقة الباسورد
كود :
Dim X = InputBox("من فضك ادخل الرقم السري الخاص بالمدير", "إدخال الرقم السري للمدير")
If X = "1" Then
MsgBox("ok")
Else
MsgBox("no")
End Ifإِنْ يَنْصُرْكُمُ اللَّهُ فَلَا غَالِبَ لَكُمْ وَإِنْ يَخْذُلْكُمْ فَمَنْ ذَا الَّذِي يَنْصُرُكُمْ مِنْ بَعْدِهِ وَعَلَى اللَّهِ فَلْيَتَوَكَّلِ الْمُؤْمِنُونَ
لَيْسَ لَهَا مِنْ دُونِ اللَّهِ كَاشِفَةٌ
لَيْسَ لَهَا مِنْ دُونِ اللَّهِ كَاشِفَةٌ