%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
%>
| 作者: 管理员 来源:网络收集 时间:09月16日 15:01 提交:sztjq 访问: |
| 陈正雷大师美国讲学归来 |
| 作者: 信息来源: 2007-9-13 9:47:17 |
|
9月12日晚上18:30陈正雷大师抵达郑州,结束了近半个月的美国讲学之行。 总经理陈斌率领公司部分员工在郑州新郑机场迎接陈正雷大师的归来。18:30由北京而来的航班准时抵达新郑机场,归来的陈正雷大师显得有些疲惫,看到大家大师很高兴,频频挥手和大家打招呼,在和大师的交流中得知大师这一路归来有近20个小时没有合眼休息 ,让我们深感大师在传播太极拳的路途上是多么的辛苦和劳累。 13日大师将休息一天,14日又要去山东参加由山东武术院举办的陈氏太极拳教练员培训班,据悉该班已经有近200人报名,大师将在该培训班上执教。
| |
|
|
|
|
|
电话:83100206 手机:13510359683 电邮:weixie@sztjq.com
粤ICP备06086521号 |