怎么只取小数点后一位

<%

yssz="123456.123456"

yskl="24557.649"

%>

yssz正确结果应该是0.1



yskl正确结果应该是0.6

我只想取一个数字 的 小数点后第一位 不进行四舍五入  整数部分都舍去都默认为0

这样的小数怎么取？  请高手帮忙
------解决方案--------------------
<%
yssz="24557.649"
yssz = "0" &  Mid(yssz,InStr(yssz,".") ,2)
Response.Write yssz
%>