递归算法实例：阶乘（vb.net代码）

Public Class frmMain
    Private Sub 更新下载ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 更新下载ToolStripMenuItem.Click
        Process.Start("https://pan.baidu.com/s/1uHZturISzQifxeHL-FX-eQ")
        My.Computer.Clipboard.Clear()
        My.Computer.Clipboard.SetText("e832")
        MsgBox("提取码e832已复制，直接到网页粘贴即可")
    End Sub

    Private Sub 作品集ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 作品集ToolStripMenuItem.Click
        Process.Start("https://pan.baidu.com/s/1jr_3Yt5l1i6jNNbMy4R61A")
        My.Computer.Clipboard.