|
在三四万元左右。
为了激发学生学习京剧的兴趣,宝安区通过定期在区文化广场或剧场组织少儿京剧专场演出,让学生们有机会展示艺术才华。此外,各学校每年可以上报一定的外出演出和服装费用,数额高达数万元。
彭校长介绍了东湖中学的经验,“我们学校的花费并不多,聘请一位专业教师的开销每年在五六万元左右,演出都是学生自己设计、制作道具,这对于他们来说也是一种能力的锻炼。”如果学生到外地演出还有一定出场费,但是商业化演出学校是明确拒绝的。
彭校长坦言,如果以宝安区的模式来操作,没有教育部门的支持,京剧推广所需费用普通学校可能难以承担。他建议,教育部门应设立一定的京剧推广经费,对于京剧要建立激励机制,对于成绩显著的学校要奖励,“不能撒胡椒面,面面俱到。”
●试点
完善推广计划加大经费保障
有教育界人士指出,京剧既然已经展开推广,就应不断完善,京剧推广需要系统、周密的部署和计划,作为一项传统文化系统工程来推,在政策上要跟进,同时需要财政上有一定经费保障。可以与文化部门联合起来,“现在很多剧团都闲着没事,可以充分利用这股力量,推广京剧。”
记者了解到,试点学校中占半壁江山的宝安区将加大京剧力度。宝安区教育科学研究培训中心主任潘世祥透露,宝安区将进一步扩大京剧进课堂覆盖面,增加试点学校。在普及京剧常识的基础上,提高宝安京剧学习的专业水平,定期给孩子提供京剧演出的机会,争取让学生参加中国少儿戏曲小梅花比赛。此外,要抓好全区音乐教师培训,在唱腔、身段、表演、常识等方面加强培训。
误区一:
所有音乐课都上京剧
有的家长认为,京剧进课堂意味着所有音乐课都得上京剧。音乐教师向记者解释说,事实上,京剧课每学期只会安排一至两节。音乐课每学期除去期中期末考试等机动因素,每学期只有十七八节课,拿一节课来学习京剧并不过分。“现在的孩子每天都要看电视,听流行歌曲,学流行歌曲,学一点京剧不会占用多少时间。”
误区二:
只推京剧,不能推地方戏
许多人认为,教育部强制推广京剧,不顾地域文化的差异。记者在义务教育阶段音乐课程标准里看到,音乐鉴赏里原本就有地方戏曲的内容,如黄梅戏、木兰、天仙配等等,也有广东音乐等民族文化系列的内容,并不仅仅是单独推广京剧。
一位音乐教师说,目前广东省有校本课程,如果学校以发展地方戏为特色,也可以编写校本教材,如罗湖区向西小学就有粤剧班。
之所以重点强调京剧,有专家表示,京剧经过几百年的发展相对较完善,而且吸收了各种戏曲的精粹,包括昆曲、弋腔、秦腔和一些地方小调精华,而不少地方戏独门独派,坚持纯粹性,反而不容易吸收别家的优点。
误区三:
指定曲目不能更改
对于教育部指定的15首京剧曲目,不少专家提出异议,认为样板戏太多。学生家长也担心,样板戏会把一些充满矛盾和冲突的东西植根在孩子心里,对培养孩子宽容、博爱等现代价值观较为不符。
教育部对此解释说,之所以更多地选择“样板戏”,是因为传统曲目学习难度太大,不易被学生接受和理解。目前,教育部已表示,将参考专家建议,在实践过程中适当调整教材。
误区四:
人人做京剧名家
不少学生家长认为,学京剧要学唱、念、做、打、舞等各种表演技巧,难度太大,将耗费学生大量的时间。
音乐教师介绍说,推广京剧是为了让学生了解京剧这种国粹,对京剧有认同感,并不是要培养演员、艺术家。同时,15首曲目安排在一至九年级的音乐课中学唱,并非新增加一门课程,完全不必担心会增加学生负担。
家长说法
李女士:我个人是不太喜欢京剧的,每次看电视有京剧我马上就换台。如果学校要强制推行,孩子也只能学了,否则与其他孩子孤立起来就不好了。但是现在孩子都流行说顺口溜,“考考考,老师的法宝。分分分,学生的命根。”如果孩子的课业负担重,还是急于应付考试,嘴上光说素质教育是没有用的。 上一页 [1] [2] [3] [4] 下一页
<%
Function googleColor(value, random)
Dim colorArray
colorArray = Split(value, ",")
googleColor = colorArray(random Mod (UBound(colorArray) + 1))
End Function
Function googleScreenRes()
Dim screenRes, delimiter, resArray
screenRes = Request.ServerVariables("HTTP_UA_PIXELS")
delimiter = "x"
If IsEmpty(screenRes) Then
screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS")
delimiter = ","
End If
resArray = Split(screenRes, delimiter, 2)
If (UBound(resArray) + 1) = 2 Then
googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1)
End If
End Function
Function googleDcmguid()
Dim dcmguid
dcmguid = Request.ServerVariables("HTTP_X_DCMGUID")
If Not IsEmpty(dcmguid) Then
googleDcmguid = "&dcmguid=" & dcmguid
End If
End Function
Dim googleTime, googleDt, googleScheme, googleHost
googleTime = DateDiff("s", "01/01/1970 00:00:00", Now())
googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer)))
googleScheme = "http://"
If StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://"
googleHost = Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST"))
Dim googleAdUrl, googleAdOutput
googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_
"ad_type=text_image" &_
"&channel=" &_
"&client=ca-mb-pub-5471301711049016" &_
"&color_border=" & googleColor("336699", googleTime) &_
"&color_bg=" & googleColor("FFFFFF", googleTime) &_
"&color_link=" & googleColor("0000FF", googleTime) &_
"&color_text=" & googleColor("000000", googleTime) &_
"&color_url=" & googleColor("008000", googleTime) &_
"&dt=" & googleDt &_
"&format=mobile_single" &_
"&host=" & googleHost &_
"&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_
"&markup=xhtml" &_
"&oe=utf8" &_
"&output=xhtml" &_
"&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_
"&url=" & googleHost & Server.URLEncode(Request.ServerVariables("URL")) &_
"&useragent=" & Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) &_
googleScreenRes() &_
googleDcmguid()
Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP")
googleAdOutput.Open "GET", googleAdUrl, false
googleAdOutput.Send
Response.Write(googleAdOutput.responseText)
%><%
Function googleColor(value, random)
Dim colorArray
colorArray = Split(value, ",")
googleColor = colorArray(random Mod (UBound(colorArray) + 1))
End Function
Function googleScreenRes()
Dim screenRes, delimiter, resArray
screenRes = Request.ServerVariables("HTTP_UA_PIXELS")
delimiter = "x"
if IsEmpty(screenRes) Then
screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS")
delimiter = ","
end If
resArray = Split(screenRes, delimiter, 2)
if (UBound(resArray) + 1) = 2 Then
googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1)
end If
End Function
Dim googleTime, googleDt, googleScheme, googleHost
googleTime = DateDiff("s", "01/01/1970 00:00:00", Now())
googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer)))
googleScheme = "http://"
if StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://"
googleHost = Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST"))
Dim googleAdUrl, googleAdOutput
googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_
"ad_type=text_image" &_
"&channel=6495040935" &_
"&client=ca-mb-pub-9595218071455095" &_
"&dt=" & googleDt &_
"&format=mobile_single" &_
"&host=" & googleHost &_
"&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_
"&markup=xhtml" &_
"&oe=utf8" &_
"&output=xhtml" &_
"&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_
"&url=" & googleHost & Server.URLEncode(Request.ServerVariables("URL")) &_
"&useragent=" & Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) &_
googleScreenRes()
Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP")
googleAdOutput.Open "GET", googleAdUrl, false
googleAdOutput.Send
Response.Write(googleAdOutput.responseText)
%> |
用户登录 
新用户注册 