The average business loses $13.5M per year to ineffective training (per 1,000 employees). Keep ahead of the competition and combine in-person quality with online cost and flexibility by training with Linux Academy.
Public Function ConvMoney(ByVal strInfield As String) As Tuple(Of Boolean, String) If strInfield = String.Empty Then Return Nothing Dim clsFrm As New ClsFrmMainLoad Dim MyMoney As Double Dim StrMyMoney As String = String.Empty Try strInfield = strInfield.Replace(",", "") MyMoney = Convert.ToDouble(strInfield) StrMyMoney = MyMoney Return New Tuple(Of Boolean, String)(True, StrMyMoney) Catch ex As Exception clsFrm.FormatMessage(15, " Money Information : ", strInfield, "Money information") Return New Tuple(Of Boolean, String)( False, String.Empty) End Try End Function
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
10 Experts available now in Live!