mohcool

طيب يا أخ undo ممكن توضح الطريقة لأني جربتها و ما نفعت معي

أشكرك يا أخ هارون على الإجابة ولقد وجدت الحل البديل لها و إشتغل معي 100% IP_ADDRESS(i - 1) = Asc(Mid(strIP,i,1))

نعم يا أخ undo عبارة عن IP ADDRESS وال lenip عبارة عن ip address length أنا ما شتغلت على vb يا ريت بس لو تحكولي إيش هو الناتج بعد الإنتهاء من جملة الفور على سبيل أن IP =192.168.10.92 و أنا بانتظار الإجابه على أحر من الجمر

تحويل من vb إلى vb.net السلام عليكم يا إخوان عندي كود vb و أردت أن أحوله حولت كله وبقي لي سطر واحد لم أفهمه يا رييت ممن لديه خبرة في ال vb وال vb.net يفسرلي هذا الكود أو يحولي إياه هذا هو الكود Dim IPAddress(10) As Byte For i = 1 To lenIP IPAddress(i - 1) = As…

جرب هذا موضوع عن socket برنامجين server /client إعملتو من زمان بس هوي على ال vb.net /index.ph...topic=47729&hl=

Dim Str As String = "select * from Pass_table where username='" & myusername & "' and password='" & mypassword & "'", con_str هذه الجملة فيها غلط أول شيئ إيش قصدك بوضع con_str عدلي الجمله إلى الشكل التالي للتأكدمن صحة إسم المستخدم وكلمة السر مع بعض Private Sub…

فعلاً الملف مضروب يا ريت يا أخت نسيم الربيع تجربي أن تضعي السطر الذي يظهر فيه الخطأ تحت جملة ال try مثال Try OleDbDataAdapter1.Fill(DataSet21, "ID") Catch ex As Exception msgbox(ex.message) End Try سوف يظهر لك رساله تطلعك على المشكلة يا ريت تكتبيه لنا كان عندي…

ماشي ممكن تبعتي قاعدة البيانات على الإميل هذا حتى أشوفها وأحاول صياغتها من جديد em3asel@hotmail.com و إن شاء الله نتمكن من المساعدة

للأسف قاعدة البيانات معمولة بطريقة غير صحيحة أنا آسف إني أحكيلك هذا الكلام ولكن إذا هذه القاعدة المستعملة في مشروعك فسوف تواجهين مشاكل كثيرة و أولها مع الكود يا ريت تحكيلي ما هو مشروعك بالظبط حتى أتمكن من المساعدة

شوف يا سيدي يوجد طريقة وهي عن طريق الريجستري أنا مجربها وشغال معي سوف أضع لك الكود هذا البروسيجر لجعل البرنامج يقلع مع الويندوز Private Sub InitReg() Dim Reg As Microsoft.Win32.RegistryKey Reg = CurrentUser.OpenSubKey("Software\Game_Network\GNETS", True) If Re…

طيب ما في أبسط منها بعد تنفيذ الكود الذي وضعته للكمبو والداتا قريد إعملي أربع أزرار (Next,previous,First,Last) و اكتبي التالي زر التالي If Me.ComboBox1.SelectedIndex <> Me.ComboBox1.Items.Count - 1 Then Me.ComboBox1.SelectedIndex += 1 End If زر السابق If Me.Co…

طبعاً هذه الأكواد للداتا ست والداتا أدابتر و الكنوكشن التي كتبتها في الكود السابق وهذه طريقة الربط العام ControlName.DataBindings.Add("Properties", DataSet.Tables("TableName Or Index"), "ColumnName") بالنسبة للأزرار يجب عمل الربط للأدوات قبل كتابة الكود الخاص …

نعم من غير ما تعمل شيء يدوياً هذا هو الكود ولكن هذه لقاعدة بيانات أكسس و إن شاء الله بالنسبة للأزرار ححط كودها اليوم

هذا هو الكود بالنسبة للكومبو Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim myds As New DataSet Dim str_con As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=موقع قاعدة البيانات" Dim strSQL As…

إبعتلي المثال و إن شاء الله أحلها لك

يا ريت تبعتلي الدالة و إن شاء الله أستطيع المساعدة

السلام عليكم هذه مجموعة من الكنترول الجاهزه وهي حقاً جميلة ويمكن إستعمالها بسهولة أنا إعملت مثال للتجربة وبداخل ملف ال bin تجدون هذه الكنترول (h) NIceControl.rar

إنت عندك frm or fmx

أنا جربت الطريقة ووجدت أنها صعبة يوجد طريقة أسهل بكثير أولا طبق الخطوه الأولى على الأدوات Design your application as normal. Where possible, set the FlatStyle property of your controls to System. This is very important ثم إذهب على الفورم الرئيسية و أكتب فيpubl…

يمكن ذلك عن طريق databinding فاذا كان الحقل الذي تودين ربطه من نوع boolean يمكن من خلال خاصية الchecked ربطها مع هذا الحقل