Lemur zaprasza
Strona: [ > ] z 1 Autor Temat: Wyliczanie prędkości odczytu z pamięci DJK Typ: neutral Postów: 871 Zarejestrowany: Feb 2004 Wyliczanie prędkości odczytu z pamięci Jak już sie domyślam mało będzie odpowiedzi ale cóż spróbuję. Mam taką funkcję: Public Function MemReadTest() As String Dim Time As Long Dim dest As String Dim Source As String Source = Space(1048576 * 2) dest = Source Time = GetTickCount CopyMemory ByVal StrPtr(dest), ByVal StrPtr(Source), LenB(Source) MemReadTest = Str(Int((LenB(dest) / (1024 ^ 2)) / (((1 + GetTickCount - Time) / 1000) / 4))) & " MB" End Function Funkcja ma wyliczać prędkość odczytu z pamięci w MB/s i nie wiem czy dobra jest ta funkcja (sam robiłem ) Porównując wyniki z Benchmarkiem muszę wynik częściowy podzielić przez 4 aby wszystko sie zgadzało (ta 4 po 1000) Czemu tak ma być ?? Może coś jest źle P.S. Jeżeli mam wartość B/ms to jak wyliczyć MB/s ?? P.S. Mam zmienną: Dim text As String text = "A" Ile w rzeczywistości bajtó zajmuje ta zmienna 1 czy 2 - 256 znaków jest zapisanych na 8 bitach Pozdrawiam [Post edytowany dnia 19-12-2004 22:27 przez DJK] _____________________________________________ Jeśli można coś zrobić w sposób optymalny to czemu nie 19-12-2004 22:24 Wszystkich odpowiedzi: 0 :: Maxymalnie na stronę: 20 Strona: [ > ] z 1 |