2009年12月19日，哥本哈根气候变化大会在达成不具法律约束力的《哥本哈根协议》后闭幕。《哥本哈根协议》维护了《联合国气候变化框架公约》及其《京都议定书》确立的“共同但有区别的责任”原则，就发达国家实行强制减排和发展中国家采取自主减缓行动作出安排，并就全球长期目标、资金和技术支持、透明度等焦点问题达成广泛共识。结合读图，回答有关问题。

（1）与图中海平面变化密切相关的因素是____________。

（2）归纳图中海平面变化的规律，并简述在近代时期所表现出来的特点。

    _________________________________________________________________________________________

（3）试阐释《哥本哈根协议》所维护的“共同但有区别的责任”原则。

    _________________________________________________________________________________________

    _________________________________________________________________________________________

    _________________________________________________________________________________________

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：　　Option Base 1　　Private Sub Command1_Click()　　　Dim a(10) As Integer　　　For i = 1 To 10　　　　a(i) = i　　　Next　　　Call swap（　【13】　　）　　　For i = 1 To 10　　　　Print a(i);　　　Next　　　End Sub　　　Sub swap(b() As Integer)　　　　n =　【14】　　　　For i = 1 To n / 2　　　　　 t = b(i)　　　　　　b(i) = b(n)　 b(n) = t　　　　　　【15】　　　　Next　　End Sub　上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……，a(5)与a(6)的值互换。请填空。