造成大熊猫的野生种群数量不断减少的最直接原因是（　　）

A．大熊猫的食物--箭竹大量死亡

B．人类不合理采伐、开垦，引发环境变化

C．全球气候变暖，使熊猫难于生存

D．空气污染严重，使熊猫不能生存

在名称为Form1的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的Muhiline属性设置为True，然后编写如下的事件过程： Private Sub Form_Click( ) Open“d：\test\smText1.txt"For lnput As#1 Do While Not 【14】 Line lnput#1，aspect＄whole＄=wholes+aspect＄+Chr＄(13)+Chr＄(10) Loop Text1.Text=whole＄ Close#1 Open“d：\test\smtext2.txt"For Output As #1 Print #1， 【15】 Close#1 End Sub 上述程序的功能是，把磁盘文件，mText1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。