تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
عمل برنامج تحويل الاكواد من #c لى vb.net وى العكس
#1
عمل برنامج تحويل الاكواد من #C لى VB.NET وى العكس
صوره

الاكواد
إقتباس :
كود :
Imports CodeConvert.ConversionLoader
Imports CodeConvert
Imports ICSharpCode.NRefactory
Imports System
Imports System.IO
Imports System.Text
Imports System.Environment
Imports FastColoredTextBoxNS

Public Class frmConverter

    Private Sub buttonClearAllCode_Click(sender As Object, e As System.EventArgs) Handles buttonClearAllCode.Click
        txtCSharp.Text = String.Empty
        txtVBnet.Text = String.Empty
    End Sub

    Private Sub buttonCopyCSharpCode_Click(sender As Object, e As System.EventArgs) Handles buttonCopyCSharpCode.Click
        My.Computer.Clipboard.SetText(txtCSharp.Text)
    End Sub

    Private Sub buttonCopyVBCode_Click(sender As Object, e As System.EventArgs) Handles buttonCopyVBCode.Click
        My.Computer.Clipboard.SetText(txtVBnet.Text)
    End Sub

    Private Sub buttonConvertCSharpToVB_Click(sender As Object, e As System.EventArgs) Handles buttonConvertCSharpToVB.Click
        Me.txtVBnet.Text = ConvertCSharpToVB(txtCSharp.Text)
        txtVBnet.Text &= vbCrLf & vbCrLf & "'Converted By: CodeConverter 2011 Conversion Utility!"
    End Sub

    Private Sub buttonConvertVBtoCSharp_Click(sender As Object, e As System.EventArgs) Handles buttonConvertVBtoCSharp.Click
        Me.txtCSharp.Text = ConvertVBToCSharp(txtVBnet.Text)
        txtCSharp.Text &= vbCrLf & vbCrLf & "//Converted By: CodeConverter 2011 Conversion Utility!"
    End Sub

    Private Sub OpenToolStripMenuItem_Click(sender As Object, e As System.EventArgs) Handles OpenToolStripMenuItem.Click
        Dim fName As String
        ofd.Filter = "C-Sharp Files (*.cs)|*.cs|VB Files (*.vb)|*.vb"

        If ofd.ShowDialog = Windows.Forms.DialogResult.OK Then
            fName = ofd.FileName

            If fName.EndsWith(".cs") Then
                txtCSharp.Language = Language.CSharp
                txtCSharp.Text = File.ReadAllText(fName)
                buttonConvertCSharpToVB.Enabled = True
                buttonConvertVBtoCSharp.Enabled = False
                buttonCopyVBCode.Enabled = True
                buttonCopyCSharpCode.Enabled = False
            Else
                txtVBnet.Text = File.ReadAllText(fName)
                txtVBnet.Language = Language.VB
                buttonConvertCSharpToVB.Enabled = False
                buttonConvertVBtoCSharp.Enabled = True
                buttonCopyVBCode.Enabled = False
                buttonCopyCSharpCode.Enabled = True
            End If
        End If
    End Sub

    Private Sub frmConverter_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        txtCSharp.Dispose()
        txtVBnet.Dispose()
    End Sub

    Private Sub frmConverter_Load(sender As Object, e As System.EventArgs) Handles Me.Load
        If Me.WindowState = FormWindowState.Maximized Then
            sc1.SplitterDistance = ((sc1.Width / 2) - (sc1.SplitterWidth / 2))
        Else
            sc1.SplitterDistance = ((sc1.Width / 2) - (sc1.SplitterWidth / 2))
        End If
    End Sub

    Private Sub frmConverter_SizeChanged(sender As Object, e As System.EventArgs) Handles Me.SizeChanged
        If Me.WindowState = FormWindowState.Maximized Then
            txtCSharp.BackgroundImageLayout = ImageLayout.Stretch
            txtVBnet.BackgroundImageLayout = ImageLayout.Stretch
            sc1.Panel1Collapsed = False
            sc1.SplitterDistance = ((sc1.Width / 2) - (sc1.SplitterWidth / 2))
        ElseIf Me.WindowState = FormWindowState.Minimized Then
            sc1.Panel1Collapsed = True
        Else
            txtCSharp.BackgroundImageLayout = ImageLayout.Center
            txtVBnet.BackgroundImageLayout = ImageLayout.Center
            sc1.Panel1Collapsed = False
            sc1.SplitterDistance = ((sc1.Width / 2) - (sc1.SplitterWidth / 2))
        End If
    End Sub

    Private Sub CloseToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles CloseToolStripMenuItem.Click
        Application.Exit()
    End Sub
End Class

لتحميل المشروع من هنا
الرد }}}
تم الشكر بواسطة:
#2
جميل جدا

أخي انا حملت المشروع ويوم شغلته يطلع لي Error
هذي صورة الخطأ




علما بإني استخدم VB.Net 2010
فما هي المشكلة ؟!
Big Grin
<---------------------------------------------------------------->

الرد }}}
تم الشكر بواسطة:
#3
Easy 4ever كتب :
جميل جدا

أخي انا حملت المشروع ويوم شغلته يطلع لي Error
هذي صورة الخطأ




علما بإني استخدم VB.Net 2010
فما هي المشكلة ؟!

أسف اخى المشكله من عندى الفيوجر 2010 مش شغال بيجبلى Error كتير اول اما ارجع من المدرسه هاعمله من على الهارد التانى
الرد }}}
تم الشكر بواسطة:
#4
تفضل أخى هذا رابط البرنامج من جديد وى لو مش عاوز تحمله امسح ملف CodeConverter.sln
وى افتح من CodeConverter.vbproj هايعمل ملف SLN جديد
هنا الرابط
الرد }}}
تم الشكر بواسطة:
#5
أشتغل البرنامج المعدل
لاكن في مشكله إذا سويت تحويل الكود مايحول
هذا صوره تحويل من
VB.Net إلى C#.Net




وهذي صورة تحويل من C#.Net إلى VB.Net



Sad
Big Grin
<---------------------------------------------------------------->

الرد }}}
تم الشكر بواسطة:
#6
Easy 4ever كتب :
أشتغل البرنامج المعدل
لاكن في مشكله إذا سويت تحويل الكود مايحول
هذا صوره تحويل من
VB.Net إلى C#.Net




وهذي صورة تحويل من C#.Net إلى VB.Net



Sad

اخى هذه صوره من #C الى Vb.net

عند انتهاء التحميل عندى ثوف اعمل فيديو 1 دقيقه لافاضه Smile
الرد }}}
تم الشكر بواسطة:
#7
تفضل أخى هذا معول بى 2008
الرد }}}
تم الشكر بواسطة:
#8
عرفت وش المشكله
واشتغل الحين
100%

المشكلة كانت ان البرنامج لايقوم بتحويل كود سطر
بل يقوم بتحويل
جميع الكلاس
إي ان إذا ضفت له
سطر واحد وتريد تحويله فلا يقبل
يجب إدخال كل التعريفات الموجوده
بالكلاس
مثال لو كنت أريد أن احول كود
إيقاف البرنامج من C#.Net إلى VB.Net
يجب كتابة كمايلي :-




لم أكتب فقط
Application.Exit
بل كتبت الكلاس بأكملة ليتم التحويل بنجاح

شكرا على المجهود فالبرنامج قيم

Big Grin
<---------------------------------------------------------------->

الرد }}}
تم الشكر بواسطة:
#9
جزاك الله كل خير أخي الكريم Smile
اللَّهُمَّ أَنْتَ رَبِّي ، لا إِلَه إِلاَّ أَنْتَ خَلَقْتَني وأَنَا عَبْدُكَ ، وأَنَا على عهْدِكَ ووعْدِكَ ما اسْتَطَعْتُ ، أَعُوذُ بِكَ مِنْ شَرِّ ما صنَعْتُ ، أَبوءُ لَكَ بِنِعْمتِكَ علَيَ ، وأَبُوءُ بذَنْبي فَاغْفِرْ لي ، فَإِنَّهُ لا يغْفِرُ الذُّنُوبِ إِلاَّ أَنْتَ .
الرد }}}
تم الشكر بواسطة:
#10
شكراً للفائدة
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف تتعامل مع برنامج الإكسيل من برنامجك rinawi 7 6,626 12-11-22, 12:11 AM
آخر رد: خالد العصاوي
  نظرة على DropBox SDK و التعامل معها +برنامج رفع و تحميل ملفات ابو ليلى 4 4,871 08-09-22, 11:54 AM
آخر رد: saif2023
  برنامج مبيعات ومشتريات وإدارة أعمال ( الفاتورة الإلكترونية ) yassoo1985 2 2,245 04-06-22, 01:14 PM
آخر رد: yassoo1985
Heart طلب برنامج Advanced Installer أبو خالد الشكري 0 1,417 16-05-22, 09:12 PM
آخر رد: أبو خالد الشكري
  أهم طرق إدارة المخازن وتطبيقها على برنامج مخازن وارد ومنصرف Menna ahmeed 0 1,967 27-04-22, 12:52 PM
آخر رد: Menna ahmeed
  طريقة إنشاء برنامج طباعة ملصقات الباركود ملهمـ 1 4,397 22-12-21, 05:09 PM
آخر رد: alessam4pro
  تحويل Interface الي دوال API silverlight 1 3,412 24-11-21, 04:15 PM
آخر رد: yassoo1985
Heart [VB.NET] برنامج ادارة المطاعم و الكافيهات mgr21002100 6 6,650 14-01-21, 07:59 PM
آخر رد: abarrak
  تحويل النص إلى كلام بالعربي دون الاتصال بالأنترنت ابو ليلى 15 10,126 20-09-20, 05:27 AM
آخر رد: kingofchess
  تفعيل برنامج Visual Studio 2019 Adilo idabdellah 4 11,512 20-05-20, 11:48 AM
آخر رد: الفاضي

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم