زيزو زيزو

كلام الأخ Fikou-sama صحيح جزاء الله خير

Dim con As New SqlConnection("your Connection string") Dim ds As New DataSet '/////////////////////////////// Dim bind As New BindingSource '/////////////////////////////// Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Hand…

أخى العزيز مشكلة الأساسية لو كنت بتستخدم BindingSource المشكلة عندك في هذا الكائن أى الـ BindingSource أما من ناحية ترتيب صفوف الـ DataSet هى أصلا جاية من الـ DataSource مترتبة عموماً لو فإمكان أرفع الكود وأنا بإذن الله أحاول فيه دا بعد أذن طبعاً ممكن ترسل الم…

OleDbConnection con = new OleDbConnection("Myconnection"); DataSet ds = new DataSet(); OleDbDataAdapter da ; public void MyLoadData() { da = new OleDbDataAdapter("select * From yourTable", con); ds.EnforceConstraints = false; if (con.State == ConnectionState.O…

بس يا اخى عندك مثلاً Constructor بتاع ListIViewItem ListViewItem lv = new ListViewItem(new String[] {"العنصر الرئيسى","العنصر الفرعى الأول","العنصر الفرعى الثانى" .......} طبعاً ListView خاصية View = Details

الله اكبر كلمتين وبس تعقيب على ما ذكر وطعباً هو كفاية ضعف اللغة ليست معناه ضعف المبرمج وضعف المبرمج معناه ضعف المبرمج

بسم الله الرحمن الرحيم مثلاً أنشى TextObject في كريستال ريبورت Right Click على كريستال ريبورت Insert ثم TextObject بعد ما ينزل TextObject على الكريستال ريبورت Right Click عليه ثم أختر Foramating تقدر تعرف منها اسم TextObject دا يعنى تعرف اسمه علشان تقدر تتعامل…

بسم الله الرحمن الرحيم اخى مثلاً بالنسبة TextBox وخصوصاً لو كانت هذه التيكست تستخدم للعمليات الحسابية في حدث TextBox_TextChange وهو الحدث الأفتراضى للإداة علشان اخلى التكست دائما بها صفر If TextBox1.Txt = "" TextBox.Text = 0 End IF وبكدا لا يمكن يخرج الماوس من…

بسم الله الرحمن الرحيم اخى مثلا عند أختيار Tabpage2 If TabControlNam.SelectedTab= Tabpeg2 Then Msgbox("waled") End IF

بسم الله الرحمن الرحيم بالنسبة لموضوع Constructor يعنى أيه بمعنى لو فرضنا حضرتك عملت Class وأول ما تعمل Object من الـــ Class يعنى تعمل منه نسخة تستخدمها أول ما تقوم بعمل نسخة لهذا الــ Class يتم تنفيذ هذا الــ Constructor مثال Class Test Public Con as New Sql…

بسم الله الرحمن الرحيم السبب أنه Cursors معرفة بهذا الشكل داخل الكلاس بتاعها Public Shared Funcation Cursors هنا الكود بتاعها End Function هذا والله أعلم

بص يا سيدى استخدم الكلاس ControlChars بص خلاص MsgBox ("waleeeeeeeeeeeeeeeeed"+ ControlChars.NewLine")

Imports system.Management Dim x As New ManagementObjectSearcher("select * from win32_physicalmedia") Dim h As ManagementObject For Each h In x.Get Me.TextBox1.Text = h("serialnumber").ToString Next Imports system.Management Dim x As New ManagementObjectSearche…

بص يا سيدى بخصوص السيريل نمر بتاع الهارد Imports system.mangmaent وبعدين تعرف object من dim x as new MangmaentObjectSarcher("select * from win32_phiscalMedia") dim f as MangmaentObject For Each f in x.get TextBox1.Text = f("serialNumber") next خد الكود لحد ما …

شكراً جدا على الكتاب