لديّ مشكلة في طريقة إظهار نتائج التنفيذ WinAppl

السلام عليكم

غير الإختيار Sub Main إلى اسم النموذج Form Name

أما عن الـ Console إستخدام السلوك Read() في أخر سطر تريد أن يقف عنده .

كذلك لا تنسى عملية الإحضار Import Statement يعني نفس هذا الكود بالضبط

Imports System.Console
Module Module1

    Sub Main()
        Dim x, y As Double

        Write("Please Enter First Number: ")
        x = ReadLine()

        Write("Please Enter Second Number: ")
        y = ReadLine()

        Write("Your Final answer is: ")
        WriteLine(x + y)
        Read()


    End Sub

End Module

السلام عليكم

أهلا عزيزي الغملاسي ،، أشكرك والله على هذه المعلومة التي أفادتني واستطعت اجراء التنفيذ في موجه الدوس بدون مشاكل

لكن بالنسبة لتنفيذ البرنامج في صندوق حوار خاص فهذا الذي لم أتمكن من إجرائه ،،، علماً أنني كنت سابقا أستطيع ذلك .

عموماً أشكرك والله من كل قلبي على مساعدتك ،،، ولا تنسانا من دعواتك :rolleyes:

لدي طلب آخر بسيط وهو كيف أجعل البرنامج ينتقل في عملية التنفيذ إلى السطر

C++ الذي يرادفه في لغة الـ :

cout>>endl;

السلام عليكم

الله يبارك فيك وشكراً جزيلاً

ربما تكون المشكلة أنك لم تختار WindowsApplication عندما قمت بإدراج مشروع جديد New Project

إذا لم يكن النموذج موجود معنى ذلك أنك أخترت Class Library أو غير ذلك

على كل حال إذا ما ضبطت معاك ضع المشروع و إن شاء الله الأخوة و أنا يمكن نفيدك

السلام عليكم

طيب بارك الله فيك ذكرنا شو يعمل هالكود cout و endl ترى ما تعلمناها إلى في الجامعة قبل 5 سنوات ولا أذكر شيء عن السي و السي بلس بلس

السلام عليكم

بارك الله فيك عزيزي الغملاسي على متابعتك واجتهادك

لكن بسيطة مو مشكلة WindowsApplication بالنسبة لوضع الاخراج أنا متأكد أني ضبطته على وضع

======================================

cout = WriteLine اللي هو أمر الكتابة

======================================

endl بالنسبة لـ :

في السي بلس بلس مثلا هذا امر طباعة قيمة x ,y

cout>>x;

cout>>y;

لكن الطباعة راح تتم في نفس السطر ،،، وأنا ابغى الطباعة تكون كل قيمة في سطر لوحده يعني راح أكتب

cout>>x>>endl;

cout>>y;

(endl = end line ) أي انهاء الكتابة في السطر الحالي والانتقال لسطر جديد

طبعا المعامل (>>) هو نفس استخدام المعامل &

الله يعينك على شرحي ،، أتمنى وصل المعنى

السلام عليكم

للإنتقال لسطر جديد في VB.NET أكتب التالي vbCrLf

مثلاً

 txt2.Text = "Hi Sir How are you" & vbCrLf & _
"How is Everything going with you"

ألف شكر لك عزيزي الغملاسي على جهدك ومتابعتك لي ،،،،،

بارك الله فيك وسدد إلى الخير خطاك

وفيك بارك و خطاك سدد .