乍得湖是非洲第四大湖，湖水水位常随季节显著变化。读图完成下列各题。

小题1:乍得湖北部蕴藏了丰富的矿产资源，最有可能是（   ）

A．石油

B．铜

C．黄金

D．金刚石小题2:乍得湖在短短40多年间面积萎缩90%以上，其最主要原因为（   ）

A．气候干旱，蒸发旺盛

B．降水减少，旱灾严重

C．过度放牧、砍伐森林及过度引水

D．河流补给水源枯竭小题3:乍得湖流域国家开展了对此流域的环境综合治理工作，最切实可行的措施是（   ）

A．加强人工降雨力度，增加降水量

B．引进物种，增加生物种类，提高生态环境的稳定性

C．恢复植被、开凿人工河道引水入湖和推广节水措施等

D．让乍得湖周围的居民大量迁移至别处

在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1 Click() Dim intNum As Integer intNum＝InputBox("请输入：") MsgBox f(intNum) End Sub Function f(X As Integer)As Integer f＝IIf(X＜10,X,X+5) End Function 运行程序，单击命令按钮，在输入对话框中输入5，则程序的输出结果为______。