Microsoft 9GD00001 manual Microsoft Visual Studio 2010 a Beginner’s Guide

82Microsoft 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