Microsoft 9GD00001 82 Microsoft Visual Studio 2010: A Beginners Guide

82 Microsoft Visual Studio 2010: A Beginner’s Guide
public void Credit(decimal amount)
{
accountBalance += amount;
}
public void Debit(decimal amount)
{
accountBalance -= amount;
}
public decimal CurrentBalance
{
get
{
return accountBalance;
}
set
{
if (value < 0)
{
// charge fee
}
accountBalance = value;
}
}
}
}
VB:
Module Module1
Private Dim accountBalance As Decimal = 100
Sub Main() Credit(100)
Debit(50)
Console.WriteLine("Balance: " & CurrentBalance)
Console.ReadKey()
End Sub
Sub Credit(ByVal amount As Decimal)
accountBalance += amount
End Sub
Sub Debit(ByVal amount As Decimal)
accountBalance -= amount
End Sub