[hafid33]

السلام عليكم

لن اطيل عليكم لدي 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 في دلك الفورم المهم كيف انفد اي كود من خلال دلك الزر وشكرا لكم

[hafid33]

(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()

[Taha Okla]

السلام عليكم ورحمة الله وبركاته

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

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

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

[hafid33]

شكرا علي الافاده و المعلومات
اخي ابراهيم ايبو
و اخي Taha Okla
الف شكر جزاكم الله خيرا