こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

VB初心者です。コードの書き方が分かりません。

VB初心者です。
VBで(zのn乗)-(xのn乗+yのn乗)の計算が出来るようにしたいのですが、答えが必ず-1になってしまいます。
Option Explicit On

Public Class Form1

Dim x As Long
Dim y As Long
Dim z As Long
Dim n As Long

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Me.Close()

End Sub

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

End Sub

Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged

End Sub

Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox3.TextChanged

End Sub

Private Sub TextBox4_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox4.TextChanged

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click


TextBox5.Text = (z ^ n) - (x ^ n + y ^ n)


End Sub
End Class

正しいコードの書き方を教えて下さい。
また特定の答えのときにメッセージを表示したいのですが、どうすればいいですか?

投稿日時 - 2013-09-17 21:52:29

QNo.8268774

すぐに回答ほしいです

質問者が選んだベストアンサー

VBAでは0の0乗は1になります。
ということは、すべての変数に値が代入されていないということです。

先にテキストボックスの値を変数に代入しましょう。

投稿日時 - 2013-09-17 23:52:55

お礼

ご回答ありがとうございます。
代入のやり方が分からないので正しいコードを教えて下さい。
自分でコードを書いたところ、ビルドエラーが出てしまいました。

投稿日時 - 2013-09-18 10:57:28

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(2)

ANo.1

x,y,z,nそれぞれの変数に値を代入している箇所が無いように見えますが。
それぞれのTextBox?_TextChangedで、その値を変数に取り込むのでは?

投稿日時 - 2013-09-17 23:23:21

補足

ご回答ありがとうございます。
それはどこから書き始めればいいでしょうか?

投稿日時 - 2013-09-18 10:58:30

お礼

ご回答ありがとうございます。
出来れば完成したコードも教えていただけますか?

投稿日時 - 2013-09-18 16:05:19

あなたにオススメの質問