2015-02-05 94 views
-1

我在Visual Basic中編寫代碼,我想調用具有特定代碼的特定變量的不同子例程。子程序和變量在visual basic中

Dim MonthSales As Double 
Call GetMonthSales() 

在我的備用子程序:

Console.WriteLine("How much did you sell this month?") 
MonthSales = CDbl(Console.ReadLine()) 

我所試圖做的是讓我的備用子程序設置我在我的主程序尺寸無論用戶將他們的每月銷售

+2

如果您使用Console類,則使用VB.Net而不是VBA或vbscript。如果你使用VB.Net,你應該不**使用'Call'關鍵字。 –

回答

2

你想要做的是糟糕的設計。相反,寫的方法返回一個值,像這樣:

Public Shared Function GetMonthSales() As Decimal 
    Console.WriteLine("How much did you sell this month?") 
    Return CDec(Console.ReadLine()) 
End Function 

,然後在Main()方法:

Dim MonthSales As Decimal = GetMonthSales() 

另外值得一提的是,你應該使用Decimal類型,而不是Double ,每當你用金錢工作。

+1

我還建議檢查用戶輸入的文本在轉換爲數字之前是否有效。例如'Decimal.TryParse' – Blackwood