why the two number after the decimal point are always converted to two

Gentleman:

Does anyone knows why the two number after the decimal point are always converted to two zeros with the code below?

Example:

If the real value was 175.53

I only get 175.00

Why is this?

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click

Dim MyRegEx As New Regex("=s+(?d+)")
Dim s As String = txtDataView.Text
Dim Mc As MatchCollection = MyRegEx.Matches(s)
Dim M As Match
Dim i As Integer
If Mc.Count > 0 Then
i = 0
For Each M In Mc
i += 1
PutInTextBox(Me, "TextBox" & CStr(i), M.Groups("MyPat").Value)
Next
End If

End Sub



Private Sub PutInTextBox(ByVal ContainerCtrl As Control, ByVal TBName As String, ByVal msg As String)
Dim ctl As Control
For Each ctl In ContainerCtrl.Controls
If TypeOf ctl Is TextBox And ctl.Name = TBName Then
ctl.Text = msg
Exit For
Else
PutInTextBox(ctl, TBName, msg)
End If
Next

End Sub
Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories