[asemshahen5]

هذا المديول بعد التحويل لا تنسى إضافة هذه المكتبة للمشروع Microsoft.VisualBasic:

PHP كود :

using Microsoft.VisualBasic;
using System;
using Microsoft.VisualBasic.CompilerServices;

namespace Test_Number
{
    static class Module1
    {
        public static string GetMohafza(string RakamKomy)
        {
            string GetMohafzaRet = default(string);
            string MOhfza;
            string cod;
            cod = Microsoft.VisualBasic.Strings.Mid(RakamKomy, 8, 2);

            switch (cod)
            {
                case "01":
                    {
                        MOhfza = "القاهرة";
                        break;
                    }

                case "02":
                    {
                        MOhfza = "الاسكندرية";
                        break;
                    }

                case "16":
                    {
                        MOhfza = "الغربية";
                        break;
                    }

                case "33":
                    {
                        MOhfza = "مطروح";
                        break;
                    }

                case "24":
                    {
                        MOhfza = "المنيا";
                        break;
                    }

                case "18":
                    {
                        MOhfza = "البحيرة";
                        break;
                    }

                case "25":
                    {
                        MOhfza = "أسيوط";
                        break;
                    }

                case "27":
                    {
                        MOhfza = "قنا";
                        break;
                    }

                case "17":
                    {
                        MOhfza = "المنوفية";
                        break;
                    }

                case "12":
                    {
                        MOhfza = "الدقهلية";
                        break;
                    }

                case "15":
                    {
                        MOhfza = "كفر الشيخ";
                        break;
                    }

                case "26":
                    {
                        MOhfza = "سوهاج";
                        break;
                    }

                case "13":
                    {
                        MOhfza = "الشرقية";
                        break;
                    }

                case "14":
                    {
                        MOhfza = "القليوبية";
                        break;
                    }

                case "22":
                    {
                        MOhfza = "بنى سويف";
                        break;
                    }
                case "19":
                    {
                        MOhfza = "الاسماعيلية";
                        break;
                    }

                case "21":
                    {
                        MOhfza = "الجيزة";
                        break;
                    }

                case "28":
                    {
                        MOhfza = "أسوان";
                        break;
                    }

                case "29":
                    {
                        MOhfza = "الاقصر";
                        break;
                    }

                default:
                    {
                        MOhfza = "unknown";
                        break;
                    }
            }
            GetMohafzaRet = MOhfza;
            return GetMohafzaRet;
        }

        public static string Gender(string RakamKomy)
        {
            string GenderRet = default(string);
            int cod;
            cod =Convert.ToInt32( Microsoft.VisualBasic.Strings.Mid(RakamKomy, 13, 1));
            if ((cod % 2) == 0)
                GenderRet = "أنثى";
            else
                GenderRet = "ذكر";
            return GenderRet;
        }

        public static DateTime BirthDate(string RakamKomy)
        {
            DateTime BirthDateRet = default(DateTime);
            try
            {
                int centry = Conversions.ToInteger(Microsoft.VisualBasic.Strings.Mid(RakamKomy, 1, 1));
                string BYear = Interaction.IIf(centry == 2, 19, Interaction.IIf(centry == 3, 20, 21)) + "" + Microsoft.VisualBasic.Strings.Mid(RakamKomy, 2, 2);
                string BMonth = Microsoft.VisualBasic.Strings.Mid(RakamKomy, 4, 2);
                string BDay = Microsoft.VisualBasic.Strings.Mid(RakamKomy, 6, 2);
                BirthDateRet = Conversions.ToDate((BDay + "/" + BMonth + "/" + BYear));
            }
            catch (Exception ex)
            {
                Interaction.MsgBox(ex.Message);
            }

            return BirthDateRet;
        }

        public static object Calcday(DateTime vDate1, DateTime vdate2)
        {
            object CalcdayRet = default(object);
            int vMonths;
            int vDays;
            vMonths =Convert.ToInt32( DateAndTime.DateDiff("m", vDate1, vdate2));
            vDays =Convert.ToInt32( DateAndTime.DateDiff("d", DateAndTime.DateAdd("m", (double)vMonths, vDate1), vdate2));
            if (vDays < 0)
            {
                vMonths = vMonths - 1;
                vDays =Convert.ToInt32( DateAndTime.DateDiff("d", DateAndTime.DateAdd("m", (double)vMonths, vDate1), vdate2));
            }
            CalcdayRet = vDays; // & "يوم "
            return CalcdayRet;
        }

        public static object CalcMonth(DateTime vDate1, DateTime vdate2)
        {
            object CalcMonthRet = default(object);
            int vMonths;
            int vDays;
            vMonths = Convert.ToInt32(DateAndTime.DateDiff("m", vDate1, vdate2));
            vDays = Convert.ToInt32(DateAndTime.DateDiff("d", DateAndTime.DateAdd("m", (double)vMonths, vDate1), vdate2));
            if (vDays < 0)
            {
                vMonths = vMonths - 1;
                vDays = Convert.ToInt32(DateAndTime.DateDiff("d", DateAndTime.DateAdd("m", (double)vMonths, vDate1), vdate2));
            }
            vMonths = vMonths % 12;
            CalcMonthRet = vMonths; // & "شهر "
            return CalcMonthRet;
        }

        public static object Calcyear(DateTime vDate1, DateTime vdate2)
        {
            object CalcyearRet = default(object);
            int vYears;
            int vMonths;
            int vDays;
            vMonths = Convert.ToInt32(DateAndTime.DateDiff("m", vDate1, vdate2));
            vDays = Convert.ToInt32(DateAndTime.DateDiff("d", DateAndTime.DateAdd("m", (double)vMonths, vDate1), vdate2));
            if (vDays < 0)
            {
                vMonths = vMonths - 1;
                vDays = Convert.ToInt32(DateAndTime.DateDiff("d", DateAndTime.DateAdd("m", (double)vMonths, vDate1), vdate2));
            }
            vYears = vMonths / 12;
            CalcyearRet = vYears; // & "سنه "
            return CalcyearRet;
        }
    }
}