%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
%>
| 作者: 管理员 来源:网络收集 时间:10月15日 11:12 提交:sztjq 访问: |
金秋十月,恰逢十一黄金周培训结束,本中心三位主教练乘上北去的列车,前往河南参加中国武术段位考试。本次段位考试前,陈正雷大师在百忙之中,抽出时间为考生进行理论培训,课堂上,大家专心听讲,认真地做着笔记。通过这次培训,大家不仅对太极拳有了更深的认识,而且对中国武术也有了更全面的了解。

陈正雷大师在考前理论培训班上讲课

大家听得多和么认真

三位主教练在培训班上合影 |
|
|
|
|
|
电话:83100206 QQ群:52099695 手机:13510359683 电邮:weixie@sztjq.com
粤ICP备06086521号 |