منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كيفية تنفد كود من خلال زر في form ثانيه
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
لن اطيل عليكم لدي form1 و فيه button
عندما اضغط عليه يظهر form و فيه button
بهدا الكود
كود :
Public Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


       Dim frm As New Form()
       Dim frm1 As New Form()
       Dim btn As New Button()

       frm.StartPosition = FormStartPosition.CenterScreen
       frm.Controls.Add(btn)

       btn.Text = "نوع"
       btn.Location = New Point(140, 70)
       btn.Size = New Size(80, 50)

       frm.Show()

   End Sub


طيب السؤال هو كيف اظهر form اخري من خلال دلك الزر
وكيف انفد فيها اكواد مثال ان اضع فيها datagrid و املئها بالبيانات
او اظهر msgbox في دلك الفورم المهم كيف انفد اي كود من خلال دلك الزر وشكرا لكم
(28-02-22, 09:14 PM)warso كتب : [ -> ]
كود :
Public Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


       Dim frm As New Form()
       Dim frm1 As New Form()
       Dim btn As New Button()

       frm.StartPosition = FormStartPosition.CenterScreen
       frm.Controls.Add(btn)

       btn.Text = "نوع"
       btn.Location = New Point(140, 70)
       btn.Size = New Size(80, 50)

addhandler btn.click,addressof btn_click

       frm.Show()

   End Sub

sub btn_click(sender as object,e as eventargs)
msgbox("hi")
end sub

الف شكر اخي لكن ما اريده هو ان اظهر فورم من خلال دلك الزر ومثلا وسطه data grid


شكرا اخي سؤال ما هو الامر
AddHandler btn.click, AddressOf btn_click

Sub btn_click(ByVal sender As Object, ByVal e As EventArgs)
ممكن شرح بسيط ان امكن
السلام عليكم ورحمة الله وبركاته
اخي الكريم 
بالنسبة لسؤالك مامعنى
كود :
AddHandler btn.click, AddressOf btn_click


هو عملية اضافة حدث للبوتون الذي تم تعريفه افتراضيا
كود :
Dim btn As New Button()
السلام عليكم ورحمة الله وبركاته

أظن أنك تقصد كيف تنشىء فورم جديد وتضع عليه داتا جريد وأزرار وتكتب داخل هذه الازرار الاكواد المناسبة 
لملىء البيانات كما تستطيع ذلك في الفورم الاول

اذا كان كذلك، هناك أكثر من طريقة ولكن الابسط والاسرع هي :
من القوائم الموجودة أعلى النافذة الارئيسية لـ المشروع  VB.Net اضغط على :
 - القائمة : Project
- ثم اختر منها : ..Add Form(Windows Forms)
قتظهر نافذة أختر منها : Form(Windows Forms)
ثم اضغط على الزر اسفل النافذة : Add

عندها :
على اليسار في القسم : Solution Explorer
تجد انه تم اضافة فورم جديد .. اضغط عليه دبل كلك
فتظهر النافذة الجديدة أمامك 
بعدها قم باضافة الادوات الجديدة كما ترغب عليها من ToolBox  الموجودة على يسار النافذة الرئيسية
والتي هي كما طلبت أعلاه : DataGrideView  -- Button
شكرا علي الافاده و المعلومات
اخي ابراهيم ايبو
و اخي Taha Okla
الف شكر جزاكم الله خيرا