次の方法で共有

ゼロによる除算 (Visual Basic Run-Time エラー)

除数として使用されている式の値は 0 です。

このエラーを解決するには

  1. 式内の変数のスペルを確認します。 スペルミスの変数名は、ゼロに初期化された数値変数を暗黙的に作成できます。

  2. 式内の変数 、特にプロシージャに渡された変数に対する以前の操作を他のプロシージャの引数として確認します。

こちらも参照ください