نقل قول نوشته شده توسط Mani_rf مشاهده تاپیک
حالا من بقیه را نمی دونم اما من که از این دو کد استفاده کردم.




        Button1.Enabled = False



        Dim V1 As Double = 996585545.21556

        Dim V2 As Double = 2522314498.8892241

        Dim V3 As Double = 0



        Dim I As Double = 0, J As Double = 0



        Dim Time As Long = DateTime.Now.TimeOfDay.TotalMilliseconds



        For J = 0 To 9999999999

            V3 = V1 * V2

        Next



        Label1.Text = DateTime.Now.TimeOfDay.TotalMilliseconds - Time



        Button1.Enabled = True




            Button1.Enabled = false;



            double V1 = 996585545.21556;

            double V2 = 2522314498.8892241;

            double V3 =0;



            double I = 0; double J = 0;



            double  Time = DateTime.Now.TimeOfDay.TotalMilliseconds;



           for (J = 0; J < 9999999999; J++)

            {

                V3 = V1 * V2;

            }



            Label1.Text =Convert.ToString  ( DateTime.Now.TimeOfDay.TotalMilliseconds - Time);



            Button1.Enabled = true;

متاسفانه شما هم کدتون در دو زبان معادل همدیگه نیست .اما خوشبختانه چون شما از حلقه های تودرتو استفاده نکردین این اشتباهتون چندان تاثیرگذار در زمان برنامه نباید باشه.
بعد از اینکه کدتون رو اصلاح کردین بگین به چه اختلاف زمانی رسیدین ؟ آیا اختلاف همچنان زیاد ه ؟

/
یه سوال : دلیل اینکه اعداد رو اینطوری انتخاب کردین (مثلا 2522314498.8892241) و از اعداد رند استفاده نکردین چی بوده ؟ (چون احساس می کنم به عمد این کارو کردین مشتاقم مزیتشو بدونم)