التخطي إلى المحتوى الرئيسي
nmap -v -A www.google.com Starting Nmap 7.70 ( https://nmap.org ) at 2019-05-27 04:44 C????I?E - C?E???E C????? NSE: Loaded 148 scripts for scanning. NSE: Script Pre-scanning. Initiating NSE at 04:44 Completed NSE at 04:44, 0.00s elapsed Initiating NSE at 04:44 Completed NSE at 04:44, 0.00s elapsed Initiating Ping Scan at 04:44 Scanning www.google.com (172.217.170.68) [4 ports] Completed Ping Scan at 04:44, 0.16s elapsed (1 total hosts) Initiating Parallel DNS resolution of 1 host. at 04:44 Completed Parallel DNS resolution of 1 host. at 04:44, 0.14s elapsed Initiating SYN Stealth Scan at 04:44 Scanning www.google.com (172.217.170.68) [1000 ports] Discovered open port 80/tcp on 172.217.170.68 Discovered open port 443/tcp on 172.217.170.68 Completed SYN Stealth Scan at 04:45, 21.16s elapsed (1000 total ports) Initiating Service scan at 04:45 Scanning 2 services on www.google.com (172.217.170.68) Service scan Timing: About 50.00% done; ETC: 04:46 (0:00:32 remaining)

           تصميم بنامج اله حاسبه بسيطة بالفيجوال بيسك 2010

اليوم سوف نشرح كيفية تصميم برنامج اله حاسبه بسيطه بالفيجوال بيسك الرشرح المرئي سوف تجده على قناتي في اليوتيوب
الاكواد هو :

​Public Class Form1

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        End
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox3.Text = ""

    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        TextBox3.Text = Val(TextBox1.Text) * (TextBox2.Text)
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        TextBox3.Text = Val(TextBox1.Text) / (TextBox2.Text)
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        TextBox3.Text = Val(TextBox1.Text) - (TextBox2.Text)
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox3.Text = Val(TextBox1.Text) + (TextBox2.Text)
    End Sub
End Class

تعليقات

  1. ممكن تسويلنا شرح تصميم برنامج شات ارجو الرد بسرعه

    ردحذف
    الردود
    1. بأذ الله بسوي فيديو على اليوتيوب وفي المدونة

      حذف
  2. أزال المؤلف هذا التعليق.

    ردحذف

إرسال تعليق

المشاركات الشائعة من هذه المدونة

           كيفية الحصول على نت مجانا للاندرويد 2017 الكثيرون يبحثون عن طريقة الحصول على انترنت مجانا ولاكن لايدون طريقه انا الان ساخبركم بطريقت الحصول على الانترنت مجانا. اولا : سوف نحمل تطبيق yor freedom  هو تطبيق VPN يستخدم للحصول لاخفاء عنوان شبكة IP والهوية، إلغاء وتجاوز حظر الموقع والتطبيقات، إزالة القيود، تشفير وتأمين البيانات، الاتصال بالانترنيت مجانا.   يعتبر برنامج your freedom android للانترنيت المجانية برنامج عملاق يوفر لكم الانترنيت مجانا بالاظافة الى عدة مزايا يقوم بهم التطبيق لتوصيل الانترنت بكل سهوله.  كل ما عليك هو التسجيل في الموقع الخاص به وعمل حساب فى فريدوم ثم تقوم بالدخول الى الايميل الذي ستقوم بالتسجيل به وتاكيد الاشتراك وتفعيله . رابط تحميل من متجر قوقل بلاي https://play.google.com/store/apps/details?id=de.resolution.yf_android   بعد التحميل وتثبيت التطبيق على جهازك، افتح التطبيق المثبت واضغط ok لاغلاق النافذة الاعلانية      الان سنقوم باعداد التطبيق، ادخل الى Configure كما في الصورة:    اختر من القائمة