Visual Basic中讀取從鍵盤

Question

我想實現一個簡單的計算，以輸出總價使用Visual Basic.NET

我想讀的原價和運輸重量，然後用它在計算中。問題是， 當我輸入的任何值，這兩個變量只返回第一個數字

例如，如果輸入23它將返回2

Dim originalPrice As Double 
    Dim commissionPrice As Double 
    Dim shippingWeight As Double 
    Dim totalPrice As Double 

    Console.Write("Enter Original Price: ") 
    originalPrice = Double.Parse(Console.ReadLine(originalPrice)) 

    Console.Write("Enter Shipping Weight: ") 
    shippingWeight = Double.Parse(Console.ReadLine(shippingWeight)) 
    shippingWeight = shippingWeight * 7 

    If (originalPrice + shippingWeight >= 200) Then 
     commissionPrice = (originalPrice + shippingWeight) * 0.03 
    Else 
     commissionPrice = 5 
    End If 

    totalPrice = commissionPrice + originalPrice + shippingWeight 

    Console.WriteLine(originalPrice) 
    Console.WriteLine(commissionPrice) 
    Console.WriteLine(shippingWeight)  
    Console.WriteLine(totalPrice) 

Answer 1

我認爲你的問題是，你正在過變量到Console.read（）

這樣應該可以工作。

Dim originalPrice As Double 
    Dim commissionPrice As Double 
    Dim shippingWeight As Double 
    Dim totalPrice As Double 

    Console.Write("Enter Original Price: ") 
    originalPrice = Double.Parse(Console.ReadLine()) 

    Console.Write("Enter Shipping Weight: ") 
    shippingWeight = Double.Parse(Console.ReadLine()) 
    shippingWeight = shippingWeight * 7 

    If (originalPrice + shippingWeight >= 200) Then 
     commissionPrice = (originalPrice + shippingWeight) * 0.03 
    Else 
     commissionPrice = 5 
    End If 

    totalPrice = commissionPrice + originalPrice + shippingWeight 

    Console.WriteLine(originalPrice) 
    Console.WriteLine(commissionPrice) 
    Console.WriteLine(shippingWeight) 
    Console.WriteLine(totalPrice) 

    Console.Read()