asp中用mid函数截取字符

<%
dim a,b,c
a="祖国啊伟大的祖国"
c=mid(a,4,2)
response.write c
%>