<%Function LeftStr(byVal Str,byVal StrLen) Dim l,t,c,i l=Len(str) t=0 For i=1 To l c=AscW(Mid(str,i,1)) If c<0 Or c>255 Then t=t+2 Else t=t+1 IF t>=StrLen Then LeftStr=left(Str,i)&"..." Exit For Else LeftStr=Str End If Next End Function %>
你的位置: 首页 -> 新闻
辅导中心太极拳友活动札记(图)
作者: 管理员 来源:网络收集 时间:06月12日 21:11 提交:sztjq 访问:

 本中心太极拳爱好者,利用休息时间,积极 组织大家参与户外活动。

    

    

    

    

    

·上一篇:魏勰老师在东门教授陈氏太极拳(图)
·下一篇:练习太极拳应从儿童开始(图)
打印文章】【关闭本页
电话:83100206 手机:13510359683 电邮:weixie@sztjq.com 粤ICP备06086521号