怎么编写vb程序，求两个数的最大公约数
下面编写的VB程序，是利用Sub子程序递归调用方式计算两个数M、N的最大公约数，其中M>N，且N≠0。
操作方法
- 01
启动VB程序，在“新建工程”界面选择【标准 EXE】，点击【打开】，进入工程页面后，再将最右端下方属性窗口中Form1的“Caption”的内容改为“Sub子程序的递归调用——求两个数的最大公约数”
- 02
单击最左端工具栏中的【TextBox】,在窗体上拖动变成十字线的鼠标指针画出合适的文本框大小，或者是双击【TextBox】，会在窗体中自动出现文本框，自己拖动文本框调节大小和位置，重复操作建立三个文本框
- 03
单击最左端工具栏中的【Label】,在窗体上拖动变成十字线的鼠标指针画出合适的标签大小，或者是双击【Label】，会在窗体中自动出现标签，自己拖动标签调节大小和位置，重复操作建立三个标签
- 04
单击最左端工具栏中的【CommandButton】,在窗体上拖动变成十字线的鼠标指针画出合适的控制按钮大小，或者是双击【CommandButton】，会在窗体中自动出现控制按钮，自己拖动控制按钮调节大小和位置，建立两个控制按钮
- 05
单击“Text1”，在最右端下方的属性窗口中将“Text"的内容“Text1”删除并置空，还可单击“Font”的内容“宋体”后面的“...”按钮，调节文本框中内容的字体、字形和大小，Text2与Text3文本框重复相同操作
- 06
单击“Label1”，在最右端下方的属性窗口中将“Caption"的内容“Label1”改为“请输入m的值”，Label2标签“Caption”的内容“Label2”改为“请输入n的值”，Label3标签“Caption”的内容“Label3”改为“m和n的最大公约数是”，除此还可分别在其属性窗口中单击“Font”的内容“宋体”后面的“...”按钮，调节标签中内容的字体、字形和大小
- 07
单击“Command1”,在最右端下方的属性窗口中将“Caption"的内容“Command1”改为“计算”，还可单击“Font”的内容“宋体”后面的“...”按钮，调节控制按钮中内容的字体、字形和大小；“Command2”在最右端下方的属性窗口中将“Caption"的内容“Command2”改为“结束”，其余操作相同
- 08
双击“编写程序”的图标，进入编程： Public Sub gcds(m As Integer, n As Integer, k As Integer) If (m Mod n) = 0 Then k = n Else Call gcds(n, m Mod n, k) End If End Sub 双击“计算”按钮，进入编程： Private Sub Command1_Click() Call gcds(Val(Text1.Text), Val(Text2.Text), k%) Text3.Text = k End Sub 再双击“结束”按钮，进入编程： Private Sub Command2_Click() End End Sub
- 09
点击上方工具栏中的“运行”，再点击“启动”或直接点击三角形，输入数据m=24和n=18,点击“计算”按钮得出答案“6”，再点“结束”便结束运行
- 10
最后再点击“文件”，选择“保存工程”或者“生成工程1.exe(k)”，保存即可