1

私は、3つの数値を入力し、それらを平均して、平均を出力するプログラムを作成しようとしています。私がこれまでに持っているコード：

Sub Main()
    Dim Average As Double

    Console.WriteLine("Please input first number:")
    Dim Num1 As String
    Num1 = Console.ReadLine()

    Console.WriteLine("Please input second number:")
    Dim Num2 As String
    Num1 = Console.ReadLine()

    Console.WriteLine("Please input third number:")
    Dim Num3 As String
    Num3 = Console.ReadLine()

    Average = (Num1 + Num2 + Num3) / 3
    Console.WriteLine("Your average is: ", Average)
    Console.WriteLine("Press any key to exit")
    Console.ReadLine()
End Sub

3つの数字を入力すると、プログラムに「あなたの平均は」というテキストが表示されますが、そこには価値がありません。テキストの後は空白です。

4

3 に答える 3

3

文字列の連結を試してください

Console.WriteLine("Your average is: " + Average.ToString)

または、複合フォーマット文字列を使用します

Console.WriteLine("Your average is: {0}", Average)

Console.WriteLine（string、object []）のMSDNを参照してください

編集：加算と除算を実行する前に、その文字列入力を正しい数値に変換する必要があります

Dim Num1 as Integer
While(Int32.TryParse(Console.ReadLine(), Num1)
     Console.WriteLine("Please enter a integer number")

' and so on for the other inputs '

そして、どうぞ、あなた自身に賛成して、Option Strict Onあなたのプロジェクトに着手してください。この種の自動変換は悪です。

于 2013-03-05T20:44:50.840 に答える
1

私はこれで思います：

Console.WriteLine("Your average is: ", Average)

あなたは実際にこれを意味しました：

Console.WriteLine(String.Format("Your average is: {0}", Average))
于 2013-03-05T20:46:23.317 に答える
-1 
Console.WriteLine("Please input first number:")
Dim Num1 As String
Num1 = Console.ReadLine()

Console.WriteLine("Please input second number:")
Dim Num2 As String
Num1 = Console.ReadLine() ------ Use Num2 instead of Num1

Console.WriteLine("Please input third number:")
Dim Num3 As String
Num3 = Console.ReadLine()

Average = (Num1 + Num2 + Num3) / 3
Console.WriteLine("Your average is: ", Average) and use concat "&" here.
Console.WriteLine("Press any key to exit")
Console.ReadLine()
于 2014-09-30T03:53:48.410 に答える