Numbers to word text currency in Crystal Report

numbervar nAmount := 1000.99; numberVar nRemain:= Remainder(nAmount,1); numberVar IntAmount := Truncate(nAmount); stringVar sWordAmount:= ToWords(Truncate(nAmount),0); if nRemain > 0 and IntAmount > 0 then sWordAmount:= sWordAmount +” Baht And “+ ToWords(round(nRemain,2)*100,0)+” Satang” else if nRemain > 0 and IntAmount…

Read more »

How to make datagridview cell readonly in vb.net

Private Sub DataGridView1_CellMouseClick(sender As Object, e As DataGridViewCellMouseEventArgs) Handles DataGridView1.CellMouseClick If e.RowIndex < 0 Then Exit Sub End If If e.ColumnIndex = 1 Then DataGridView1.CurrentCell.ReadOnly = False Else DataGridView1.CurrentCell.ReadOnly = True End If End Sub

Read more »