BasharVS

مرحباً أخي الكريم . رجاءً جرب هذا الكود http://www.a1vbcode.com/app-3012.asp > تحياتي BasharVS .

مرحباً أخي الكريم . يمكننا مساعدتك بتحويل Code من VB6 الى VB.Net, على مااعتقد أن اغلبية برامج التحويل تجعل المبرمج يتوه مع الـ Code الذي يتم تحويله, لأنه غير قادر على تحويل بعض ( العمليات, المتغيرات, الخصائص ) الخاصة ببعض المكونات .

مرحباً أخي الكريم . منع الـ Form من التحرك بتاتاً ( مستحيل ) الا في حالة واحدة وهي تغير الخاصية FromBorderStyle الى None والتي ستخفي شريط العنوان من قمة الـ Form . أو يمكنك تحديد ذلك مع بعض الأحداث مثل ( SizeChanged, LocationChanged ) ولكنها ستتحرك عند تحريك ا…

We all wish to help you, but we have never tired to do this, anyway I'm going to google it and then tell you what I think :P . _________________________ Have a look at this ( http://www.tec-it.com/en/products/barcode-tools/Default.aspx ) And This ) http://www.…

طيب, OK :P . basharvs@hotmail.com

مرحبا ً. اعتقد أن الـ DataSet والـ DataTable لاتعطي المبرمج أو المطور كافة احتياجاته لاستخدام XML Document , هناك صف خاص لقراءة وكتابتة XML Document . Namespace ( System.XML ) Usage : Imports System.XML Dim MyXMLDocument As New XMLDocument

مرحباً أخي الكريم . اليس من سهل استخدام العملية : Imports System.IO Imports System.Text Dim NText As String = File.ReadAllText("C:\MyDocument.txt", Encoding.ASCII) أو Dim NText As String = My.Computer.FileSystem.ReadAllText("C:\MyDocument.txt", Encoding.ASCII)…

مرحباً أخي الكريم . يمكنك تغير الخاصية TopLevel الى False لكي تعامل معاملة أي Control أي : Private Sub Button1_Click(ByVal Sender As System.Object, ByVal E As System.EventArgs) Handles Button1.Click Dim NForm As New Form1 NForm.TopLevel = False Me.Controls.Add…

How To Get Hardware Information (CPU ID, MainBoard Info, Hard Disk Serial, System Information , ...)

مرحباً أخي الكريم . يمكنك الاستعانة بأي برنامج رسم لتصميم الفاتورة ومن ثم تقدير أماكن الحقول الفارغة .. وبالنسبة للطباعة سأحاول إنشاء مشروع يساعدك على تطوير مستواك الإبداعي في هذا المجال . وإذا أردت تجربة شيء ما من صنعك, فجرب رسم النصوص بالاستخدام DrawString و…

مرحباً أخي الكريم . صراحةً لايحبذ تغير متغير عددي إلى نصي, لأنه سيحجز حجم أكبر في الذاكرة وفي قاعدة البيانات, اعتذر لكتابتي اياه :( . إذا كنت تتعامل مع DataGridView Control فيمكنك استخدام الحل الثاني كالتالي : Dim SQL1 As String = " SELECT * FROM stu where spo…

مرحباً . قبل أن أبدأ علي اخبارك بشيء ما وهو أن تستخدم الخاصية Tag بإضافة المفتاح الخاص بكل TextBox اي T1.Tag = "a" >>>> Private Sub TS_TextChanged(Byval Sender As System.Object, Byval Ev As System.EventArgs ) Handles T1.TextChanged, T2.TextChanged, T3.TextChan…

مرحباً أخي الكريم . هل يمكنك أن توضح بشكل ادق ...

مرحباً أخي الكريم . ماهو موقع العمود ( Student ID ) من الأعمدة الاخرى ؟

مرحباً أخي الكريم . جرب المثال التالي : Imports System.Drawing Imports System.Drawing.Printing Public Class Form1 Private WithEvents DocToPrint As New PrintDocument Private _Left, _Top, _Right, _Bottom As Single Private _JustABitmap As New Bitmap("C:\BVSCORP.j…

وبإمكانك أيضاً تحويل أي صورة إلى أيقونة : Dim Bmp As Bitmap = Image.FromFile("C:\MyIcon.png") Dim Ico As Icon = Drawing.Icon.FromHandle(Bmp.GetHicon) Ico.Save(New IO.FileStream("C:\MyIcon.ico", IO.FileMode.OpenOrCreate)

مرحباً أخي الكريم . جرب التالي : Private Sub SetChecked( Byval Parent As Object, Byval Status As Boolean ) For Each TN As TreeNode In Parent.Nodes TN.Checked = Status SetChecked( TN, Status ) Next TN End Sub Private Sub Button1_Click( Byval Sender As System.Ob…

مرحباً . عليك إضافة ( PictureBox, RadioButton, (2)TextBox ) الى الـ Form1 PictureBox1, RadioButton1, TextBox1, TonTextBox إذا كان TonTextBox متغير نصي, عليك استبدال ( TonTextBox.Text ) بـ ( TonTextBox ) وتصريح المتغير, أي ( Dim TonTextBox As String )ز Private …

مرحباً أخي الكريم . العفو . إذا كان StatusBar.Dock = DockStyle.Bottom فسيظهر الـ StatusBar دائماً في الأسفل حتى إذا غيرت حجم الـ Form . إذا كانت المشكلة ان الـ Form تحوي تحكم أخر Control وخاصية Dock = DockStyle.Bottom ماعليك سوى النقر بالزر اليميني RightClick …

مرحباً أخي الكريم . بالنسبة لقاعدة بيانات كالـ SQL أو Access عليك القيام بإحدا الحلول التالية : لعرض التنسيق وحفظه : تغير نوع العمود من ( Decimal, Int, Numeric, Etc.. ? ) الى ( Nvarchar(4) ) إذا لم تكن تريد تغير نوع العمود : يمكنك استخدام Sub لحل هذه المشكلة :…