Vikash

Dim TotalFine As Double = 0 Dim TotalMonthDif As Integer Dim totalMonthPaid As Integer

 MsgBox("Message") MessageBox.Show("Insufficient Balance in your Account") If MessageBox.Show("Do you want to print Receipt..", "Message..", MessageBoxButtons.YesNo,  -------------------------- If MessageBox.Show("Do you want to print Receipt..", "Message..", MessageBoxButtons.YesNo, MessageBoxIcon.Information) = Windows.Forms.DialogResult.Yes  Then      CmdPrint_Click(sender, e) End If ------------------------- MsgBox("You are not authorized for modification", MsgBoxStyle.OkOnly + MsgBoxStyle.Critical) MsgBox("Invalid Registration No............")

DTBookingDate.Enabled = DateEnable  Query(Dt5, "select top 1 [Transaction].TranCode,[Transaction].InstallmentAuto from [Transaction] order by [Transaction].Recordno desc;") If Dt5.Rows.Count > 0 Then lblLastTransCode.Text = "Last Trans Code : " + Dt5.Rows(0)(0).ToString End If