SOLO.NET

النوع String هو عبارة عن كلاس و/او اوبجكت وهو مرجعى Reference Type مثله مثل Image and Array اذا كان التكست بوكس لا يحوى شئ فانه لا يعنى ان القيمة null اى لا يوجد قيمة فلقيمة هنا هى zero length string (String.Empty) او "" اذا كانت null فهذا يعنى ان المتغير لا ي…

ايضا يمكنك عمل Method فى فورم 1ويكون Public Static حتى يتم الوصول اليه من خلال اى فورم اخر لاضافة فورم داخل البانيل public static void AddForm( Form f1,Form1 f2) { f1.TopLevel = false; f2.panel1.Controls.Clear(); f2.panel1.Controls.Add(f1); f1.Show(); } هكذا ي…

مثال سريع لعمل Custom InputBox كود InputBoxEX وهو dll Library Public Class InputBox Public ReadOnly Property Input As String Get Input = TextBoxInput.Text.Trim End Get End Property Shared Function ShowInput(Optional ByVal message As String = "", Optional ByVal…

عند الضغط على cancel فان الداله تعود بـempty string فلا يمكن معرفة اذا تم الضغط على ok بدون ادخال او cancel مع ادخال ا,,و بدون على كل الهدف من هذه الميثود هو الحصول على ادخال لا يهم اذا كان فارغ او cancel فالنتيجة واحدة اذا كان من الضرورى معرفة الحالاات الثلاث…

استخدم الخاصية MaxLength لتحديد العدد الاقصى لمدخلات التكست بوكس TextBox1.MaxLength = 3

لاستثناء TextBox 1&2 اضف شرط التحقق من اسم الاداه لتصبح الميثود كالتالى Private Sub EnableControl(ByVal ctrlParent As Control) Dim ctrl As Control For Each ctrl In ctrlParent.Controls If TypeOf ctrl Is TextBox Then If Not CType(ctrl, TextBox).Name = "TextBox1"…

تصميم قاعدة البيانات خاطئ وقد تواجه مشاكل مستقبلا

يمكنك البدء بتصميم كينونات البرنامج (Data Entity) مثلا الطلبة( الاسم.العمر.الجنس...الخ) ما تحتاجه من بيانات عنهم المحفظين(الاسم ....الخ) الدورات(اسم الدورة..موعد البدء..الانتهاء..الرسوم..الخ).... يفضل عمل Class لكل Object

اذا كنت ستسخدم for loop للبحe فالطريقة الاولى اسرع ولن تشعر بالفرق اذا كانت البيانات قليله

يمكن ذلك عن طؤيق الميثود ReadXml العائدة لـ DataTable Dim fileName As String = "C:\TestData.xml" Dim newTable As New DataTable newTable.ReadXml(fileName) يمكنك استخدام DataView للفلترة مثلا Dim view As DataView = newTable.DefaultView view.RowFilter = "idst = '…

:D

Private Sub Form1_InputLanguageChanged(sender As Object, e As InputLanguageChangedEventArgs) Handles MyBase.InputLanguageChanged 'your code here MessageBox.Show("The Language has been changed to :" + InputLanguage.CurrentInputLanguage.LayoutName) End Sub

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

استخدم Linq ToXML للاستعلام بعد تحميل الملف بواسطة الميثود Load العائدة لـ XDocument هذا مثال على نفس ملفك المرفق يتم البحث بناء على الحقل Idst على افتراض ان ملف xml اسمه data Imports System.Xml Imports System.Linq Imports System.IO Imports System.Text Module …

Dim Str As String Str = InputBox("Please Input The Project Name") If Str = "" Then MsgBox("cannot save empty data") Exit Sub Else txt_Name.Text = Str End If

موضوع هام وطرح مميز...جزاك الله خيراً

كل ما تطلبه موجود بالمنتدى.... استخدم البحث..... وابذل قليل من الجهد لتصل الى ما تريده............ <_<

السلام عليكم..... هذا مثال بسيط عملته لاغلاق سطح المكتب...... لتطويره لاغلاق الشامل انت بحاجة الى Win32 AP الكود using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using Syst…

MyReportهو اسم التقرير الذى تقوم بانشاءه واضافته للمشروع وهو عبارة عن كلاس.........مثله مثل الفورم على سبيل المثال

قم باضافة مرجع ل Microsoft Windows Image Aquiesition Library V2 من قائمة COM من خلال الكود التالى يمكن عمل سكان Try Dim Scan As WIA.CommonDialog = New WIA.CommonDialog() Dim img As WIA.ImageFile = Scan.ShowAcquireImage(WIA.WiaDeviceType.ScannerDeviceType, WIA.…