al-mdar

اشكرك ياخوي وما قصت معاي بس لسا فيه خطا يطلع على اليست تضليل اصفر ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

السلام عليكم عندي برنامج فيجول بيسك اعطي لي على شكل واجب ولكن الكود فيه خطأ Private Sub Command1_Click() Dim n As String, m As String, i As Integer i = List1.ListIndex n = Text1.List(i) m = Combo1.Text If n = "ßÇãÑí" And m = "2000" Then Text1.Text = "42000" El…