2017-11-04 6 views
0

は私が正しくコードを入力したように、形で二つの異なるテキストボックスから2つの値の合計を作りたかった:VBAの2つの異なるテキストボックスから2つの値を合計する方法はありますか?示されているよう

Private Sub btnResult_Click() 

Dim answer As Integer 
answer = txtNum1 + txtNum2 
txtAns.Value = answer 

End Sub 

そのコードすべきという名前のボックスに出力txtAnstxtNum1 + txtNum2の合計私は、ボタンbtnResultをクリックして、しかし、この写真のように任意の計算なしで隣同士に代わり、それは、出力2つの値をする場合:私は(のように/または他の演算子を使用した場合、

Click here to open the picture!

しかし*または - )計算の出力が正しく!

どうしたのですか?

+0

私はそれがデータを文字列として扱い、連結していると思われますが、他の演算子は整数を仮定しています。 – Robbie

+0

'cdbl(txtnum1)+ cdbl(txtnum2)'または 'cint'を試してください –

答えて

1

次の例では:

Dim answer As Integer 
answer = "1" + "2" 
Debug.Print answer 

整数値12が印刷されています。最初にテキスト式"1" + "2"が評価され、文字列"12"が生成され、これは整数値12に変換されます。

あなたが代わりに行いたい場合:

answer = Int("1") + Int("2") 

3が印刷される値。

あなたが行うことができますスクリプトでは:それは、デフォルトの属性であるとして

answer = Int(txtNum1.Value) + Int(txtNum2.Value) 

.Value修飾子はおそらく必要ありません。

+0

詳細なソリューションをありがとうございました。 –

関連する問題