在字符串中找到缺少的字符

在字符串中找出缺少的字符？
比如有个字符串 1-10
s1='1,2,3,5,7,9,10'
如何找出其中缺少的字符
4，6，8
------解决方案--------------------
int i,k
string s1,s2

s1='1,2,3,5,7,9,10'
k = 1
for i=1 to 10
    if mid(s1,k,len(string(i)))=string(i) then
        k+=2
    else
        if s2='' then
            s2 += string(i)
        else
            s2 += ','+string(i)
        end if
    end if
next
messagebox('',s2)