تقييم الموضوع :
  • 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
شكراً للفائدة
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  شرح انشاء برنامج تحويل صيغ الملفات الصوتيه CLARO 11 1,345 16-11-18, 04:41 PM
آخر رد: anassss
  [مشروع] تعلم كيف تصنع برنامج لنشر منشورات لحساب الفيس بوك الخاص بك Basil Abdallah 8 1,550 01-07-18, 01:21 AM
آخر رد: YousefOkasha
  [VB.NET] شرح انشاء برنامج لتسجيل الدخول للمنتدى CLARO 5 1,857 16-06-18, 03:44 AM
آخر رد: YousefOkasha
  دورة إنشاء برنامج مبيعات متكامل ملهمـ 1 480 02-05-18, 12:04 AM
آخر رد: عبد العزيز البسكري
  تنزيل يوتيوب فيديو بدون برنامج Abu Ehab 2 375 22-03-18, 03:53 PM
آخر رد: عبد العزيز البسكري
  كيفية عمل برنامج للأذان + قاعدة بيانات لـ 252 دولة و 9512 مدينة ! : مبرمج أوتار 2 12,601 25-11-17, 01:21 PM
آخر رد: محمد خالد
  تحويل Interface الي دوال API silverlight 0 321 25-09-17, 11:13 AM
آخر رد: silverlight
  حمل برنامج رائع بخصوص تصميم أي تخطيط إنسيابي للمشاريع Flowchart عبدالله خضر 1 964 03-07-17, 12:58 PM
آخر رد: أبوبكر سويدان
  [مشروع] مشروع برنامج لتشغيل ملفات mp3 alking-0999 2 1,299 31-12-16, 11:46 PM
آخر رد: Basil Abdallah
  عمل برنامج FTP Upload Basil Abdallah 3 689 31-12-16, 11:46 PM
آخر رد: Basil Abdallah

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


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