10-04-16, 07:14 PM
اذا ردنة نخلي باسىرد لفروم او برناهج
devpoint: Dim ah as string ah = InputBox("ادخل كلوة هرور ") If ah = "ضع هنا باسىرد " then MessageBox.show("تن فتح برناهج ") Else MessageBox.Show("باسىرد غلط ") Goto devpoint End if
devpoint: Dim ah as string ah = InputBox("ادخل كلوة هرور ") If ah = "ضع هنا باسىرد " then MessageBox.show("تن فتح برناهج ") Else MessageBox.Show("باسىرد غلط ") Goto devpoint End if