Dim Sagaku As Decimal'差額を変数宣言 

Sagaku=CDec(Me.Textbox1.Text)'差額にこのフォームのテキストボックスを代入する。 





'売上から経費を引いて差額を計算する。 

Sagaku=Uriage-Keihi

このようなコードを書かれてるようですが
2行目は、コメントで書かれてる意図とは違うものです。

差額変数(Decimal型)に、Textbox1に入力されている文字列をDecimal型に変換して代入するです。

エラーを無くすだけなら、Textbox1のTextプロパティにデザイナから0あたりを入れておけば消えると思います。
（動き的に意図したものにはなりませんが）
何故ならないかは、少し考えてみるといいかもしれないです。