VB从键盘上输入两个正数m和n,求m和n的最大公因子

最大公约数就是几个数的共有约数之积
最大公因子就是几个数的公有约数中最大的一个
10和15的最大公约数和最大公因子都是5
但是10和20的最大公约数是10,最大公因子是5
Dim m%, n%
Private Sub Form_Activate()
m = InputBox("")
n = InputBox("")
End Sub
Private Sub Form_Click()
Dim a() As Integer
k = IIf(m