有如下函数过程：
Function gys(By Val x As Integer, ByVal y As Integer) As Integer
Do While y＜＞0
preminder=x/y
x=Y
y=preminder
Loop
gys=x
End Function
以下是调用该函数的事件过程：
Private Sub Command1_Click
Dim a As Integer,b As Integer
a=10；b=2
x=gys(a，b)
Print x
End Sub
该程序的运行结果是______。

自古以来，我们的母亲河——黄河在哺育中华儿女的同时，也给人民带来了灾难。为此，西汉和东汉时，大规模治理黄河的皇帝分别是_______________、_______________。另外，还有东汉著名的水利专家_______________。同时，两汉时期的农业也有很大发展，具体表现有：_______________的进步；_______________的出现；_______________和_______________桑麻的普遍种植。