VBの世界ではまったく新しく、私は宿題に取り組んでいます。私は3つのテキストボックスから来る値が計算のための有効な値であることを確かめるためにネストされたtry/catchブロックを設定しようとしています。私はなぜ、私は "End of statement expected"エラーが出ているのか分からないので、私は立ち往生しています。 tryブロックの3行すべてに、それらの下に波線があります。ここに私のコードは次のとおりです。試してください/ヘルプをキャッチして、文の末尾が期待されます
Private Sub Calculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Calculate.Click
Dim FutureValueDecimal, InvestmentAmountDecimal, InterestRateDecimal As Decimal
Dim YearsInteger As Integer
Try InvestmentAmountDecimal = Decimal.Parse(InvestmentAmountTextBox.text)
Try InterestRateDecimal = Decimal.Parse(InterestRateTextBox.text)
Try YearsInteger = Integer.Parse(yearsTextBox.text)
Catch InvalidYears As FormatException
MsgBox("Please enter a valid number of years", MsgBoxStyle.Exclamation, "Error")
YearsTextBox.SelectAll()
End Try
Catch InvalidInterest As FormatException
MsgBox("Please enter a valid interest rate.", MsgBoxStyle.Exclamation, "Error")
InterestRateTextBox.SelectAll()
End Try
Catch InvalidAmount As FormatException
MsgBox("Please enter a valid investment amount.", MsgBoxStyle.Exclamation, "Error")
End Try
FutureValueDecimal = InvestmentAmountDecimal * (1D + InterestRateDecimal)^YearsInteger
FutureValueTextBox.Text = FutureValueDecimal.ToString("C")
End Sub
「試行」と次の文の間に改行を入れてください(たとえば、「InvestmentAmountDecimal = Decimal.Parse(InvestmentAmountTextBox.text)」)。 – someone
私はそれを試しても動作しません。奇妙なことは、2つの内部try/catchをコメントアウトして、外部の「InvestmentAmountDecimal + = 1」のような単純なものを試しても、私はまだ同じエラーが発生するということです。 – Kris
@Krisあなたが使用している本の中には、セパレートラインに並んで同じラインに表示する必要があると言わず、どちらも良いものではないという2つの理由が考えられます。 1)作者は良く分からなかった。 2)出版社は書式を変更し、著者は決してそれを修正しなかった(おそらく理由1のため)。本の著者または出版社の連絡先電子メールアドレスを持っている必要があります...将来の印刷物のために修正するために何かを送ってください! –