お世話になります。
 Public Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
　　　①・・・
 End Sub
 Public Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
      ②・・・
 End Sub

①で使用した関数の値を②でも使用したいのですが、ホームページを調べても、

    Public Sub syouhin(ByVal kakaku As Integer)　
        ・・・
　　End Sub
と、Button1.Clickをするときの例はありません。
どなたか手ほどき、またはヒントをください。ホームページのアドレスでも結構です。
よろしくお願いします。