Скорость строковых функций

[Space]

Правда ли, что строковые ф-и вроде Mid$ работают быстрее их аналога без $, т.к Mid возвращает Variant, а Mid$ возвращает String? Я ранее думал, что Mid это тоже что и Mid$, только $ опущен для простоты набора команды. Зачем Mid возвращать Variant - в каких случаях это необходимо и даже возможно? Ведь Mid всегда работает со строкой и возвращает её, и другой тип вернуть не может.

[Viper]

Правда ли, что строковые ф-и вроде Mid$ работают быстрее их аналога без $, т.к Mid возвращает Variant, а Mid$ возвращает String?.

Правда. Так оно и есть. Помимо Mid$ и Mid и остальные функции работы со строками имеюют две версии.

Зачем Mid возвращать Variant - в каких случаях это необходимо и даже возможно?

В случае, если приходиться работать с Variant.

Ведь Mid всегда работает со строкой и возвращает её, и другой тип вернуть не может.

Mid может (собственно и возвращает) вернуть Variant, содержащий внутри String. Также может использоваться аргумент типа Variant.

[Space]

а смысл какой? Ведь переменная Variant может принять String:

Код: Выделить всё

Dim v1 as Variant
v1=mid$(a$,10)

другое дело Variant в качестве параметра функции...

[Viper]

а смысл какой? Ведь переменная Variant может принять String

Может, но на преобразование уйдет некоторое время. Одним словом, при работе со строками надо пользоваться $-версиями строковых функций.
З.Ы. Можешь, кстати, протестировать время работы. Тестовую програмку несложно набросать.

[Space]

да, несложно. Я думаю, что разница во времени выполнения будет мала, вся сложность заключается в том, что комп должен работать с постоянной нагрузкой на процессор, чтобы увидеть реальный результат.

[Viper]

да, несложно. Я думаю, что разница во времени выполнения будет мала.

В разы будет разница между Mid и Mid$ для строк. ЕМНИП раза в три где то.

[Денис]

ЕМНИП раза в три где то.

Внезапно бенчмарк!

Код: Выделить всё

Private Sub Form_Load()

Debug.Print "Test MID"
Debug.Print "________"

Dim T1 As Single
Dim A1 As String
Dim i As Long
Const Sample As String = "svfkbvgsdbfhvbshdfhbv"
Const Iter As Long = 1000000

T1 = Timer
For i = 1 To Iter
   A1 = Mid(Sample, 5, 2)
Next
T1 = Timer - T1
Debug.Print "Время Mid : " & T1

T1 = Timer
For i = 1 To Iter
   A1 = Mid$(Sample, 5, 2)
Next
T1 = Timer - T1
Debug.Print "Время Mid$: " & T1

End Sub

Код: Выделить всё

Test MID
________
Время Mid : 0,42125
Время Mid$: 0,155375

[Space]

интересно, что у тебя коеффициент = 0,42125/0,155375=2,7
у меня коеффициент для дизайнера колеблется в пределах [1.38;1.58], для exe [1.11;1.375]. Наверно, это связано с алгоритмами предугадывания выполнения команд процессором. У меня AMD 3200, а у тебя скорее проц от Intel Также со способом компиляции, у меня Compile to Native Code - Optimize for Fast Code.

[alibek]

Наверно, это связано с алгоритмами предугадывания выполнения команд процессором.

Нет.

[Денис]

У меня AMD 3200, а у тебя скорее проц от Intel

Ха, зато у тебя страницы форума не сохраняются! А у меня - да.

[Viper]

У меня тест посложнее и подлиннее, результат:

При использовании Mid$ время = 17.54 секунд.
При использовании Mid строк = 53.44 секунд.

Аккурат в три раза быстрее.