Other issues arise when it comes to leap years. The following code takes care of all the problems mentioned above:

VB .NET

Public Enum LicensePaymentType As Integer
  Monthly = 1
  Annual = 2
End Enum   

Private Function determineNextInvoice(ByVal LicType As LicensePaymentType, _
          ByVal InvoiceDay As Integer, ByVal LastInvoice As DateTime) As DateTime
  If LicType = LicensePaymentType.Monthly Then
     If LastInvoice.Day < InvoiceDay Then
        Dim Temp As Integer = InvoiceDay - LastInvoice.Day
        Dim NewInvDate As DateTime = LastInvoice.AddMonths(1)
        Return NewInvDate.AddDays(Temp)
     Else
        Return LastInvoice.AddMonths(1)
     End If
  ElseIf LicType = LicensePaymentType.Annual Then
     Dim NumDaysNextYearsMonth As Integer = _
           DateTime.DaysInMonth(LastInvoice.AddYears(1).Year, LastInvoice.AddYears(1).Month)
     If LastInvoice.Day < InvoiceDay AndAlso NumDaysNextYearsMonth >= InvoiceDay Then
        Dim Temp As Integer = InvoiceDay - LastInvoice.Day
        Dim NewInvDate As DateTime = LastInvoice.AddYears(1)
        Return NewInvDate.AddDays(Temp)
     Else
     Return LastInvoice.AddYears(1)
     End If
  End If
End Function

VB .NET

Dim newstr As String
newstr = oldstr.Replace(Chr(147), "& quot;") ' take out extra space b/w & and quot;
newstr = newstr.Replace(Chr(148), "& quot;") ' take out extra space b/w & and quot;

C#

string newstr;
newstr = oldstr.Replace((char)147, "& quot;") // take out extra space b/w & and quot;
newstr = newstr.Replace((char)148, "& quot;") // take out extra space b/w & and quot;