Да, Mid
.
Dim sub_str
sub_str = Mid(source_str, 10, 5)
Первый параметр - это исходная строка, второй - начальный индекс, а третий - длина.
@ bobobobo: Обратите внимание, что строки VBScript основаны на 1, а не на 0. Передача 0 в качестве аргумента Mid
приводит к "неверному вызову процедуры или аргументу Mid".