下列各句中划线的成语使用恰当的一项是：（    ）

A．在李云龙独特的战术指挥下，骄横的日军山崎大队全军覆灭。接着李云龙会同国军358团团长楚云

飞闯进日军重兵防守的县城，旅进旅退，沉重地打击了日军。

B．苏轼的《水调歌头·明月几时有》信手拈来前人的成果入词，达到了天衣无缝的境地，可谓化典入

词的范例。

C．寄生植物，望文生义，它是靠攫取寄生养料和水分来养活自己的一种植物。

D．如今在长春，许多堂堂北方大汉也纷纷走进美容店，表明人们已经改变了“男人爱护皮肤就是矫揉造作”的偏见。男士美容蔚然成风，这也是社会进步的一种体现。

[说明] 已有一个工程文件，窗体上有两个图片框，名称为P1，P2。分别用来表示信号灯合汽车，其中在P1中轮流装入“黄灯.ico”、“红灯.ico”、“绿灯.ico”文件来实现信号灯的切换；还有两个计时器 Timer1 和Timer2，Timer1 用于变换信号灯，黄灯1秒，红灯2秒，绿灯3秒；Timer2用于控制汽车向左移动。运动时，信号灯不断变换，单击“开车”按钮后，汽车开始移动，如果移动到信号灯前或信号灯下，遇到红灯或黄灯，则停止移动。下面是实现上述功能的程序，请填空。 Private Sub Timer41_ Timer() a=a+1 If (1) Then a=1 End If Select Case aCase 1 P1. Picture = LoadPicture( “黄灯.ico” )Case 2, 3 P1. Picture = LoadPicture( “红灯”.ico” )Case4, 5, 6 P1. Picture = LeadPicture( “绿灯. ico” ) (2) End Select End Sub Private Sub Timer2_Timer( ) If (3) And (P2. Left ＞ P1. Left And P2. Left ＜ P1. Left + P1. Width) Or P2. Left ＜ = 100 ThenTimer2. Enabled = False Else (4) End If End Sub