Выражение InStr

[Iskin]

Здравствуйте!
У меня есть числа. В формате два тире, всегда. количество чисел могут меняться. Например: 218500-2924010-00
Выражение1:

IIf(InStr([F1];'-')>0;IIf(InStr(Mid([F1];InStr([F1];'-')+1);'-')>0;Mid([F1];InStr([F1];'-')+1;InStr(Mid([F1];InStr([F1];'-')+1);'-')-1);Mid([F1];1;InStr([F1];'-')-1));"-")

Это выражение в запросе находит и выдает: 2924010
А надо что бы выдавало: 292401. Т.е. чтобы последнею цифру отметала.
Помогите дописать/изменить код