%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日 22:19 提交:sztjq 访问: |
福田区上梅林文体公园(中心)(梅林路与梅秀路交叉口文体公园院内);
上课时间(每天)
上午:09:00-11:00,
下午:15:00-17:00,
晚上:19:00-21:00;
福田区莲花山公园(莲花路公交大厦站西10米停车场前草地);
上课时间(周二\周五):
晚上:19:30-21:30
南山区荔香公园(荔香公园西门进左走上坡,避雨长廊尽头即是)
上课时间:(周一\周四)
晚上:19:30-21:30
龙华广场(龙华广场北边长廊尽头)
上课时间:(周三\周六)
晚上:19:30-21:30
荔枝公园(北门半圆形广场)
上课时间:(周二\周五):
晚上:7:30-9:30
皇岗公园:茶馆后面,小店门前小广场.
上课时间:(周一\周四)
晚上:19:30-21:30;
宝安新安公园(活动中心对面湖边):
上课时间:(周一\周四)
早上:06:30-08:30; |
|
|
|
|
|
电话:83100206 手机:13510359683 电邮:weixie@sztjq.com
粤ICP备06086521号 |