选择题   以下程序的功能是计算并输出两个整数的最大公约数。
    Private Sub al ()
    Dim x As Integer, y As Integer, t As Integer
    x = InputBox('请输入x的值')
    y = InputBox('请输入y的值')
    Do
    __________
    x = y
    y = t
    Loop While (t ＜＞ 0)
    Debug.Print __________
    End Sub
    有如下语句：
    ①t = x
    ②t = y
    ③t = x/y
    ④t = x Mod y
    ⑤x
    ⑥y
    ⑦t
    ⑧x/y
    程序中有两条下划线，将程序补充完整的正确语句是______。