Use Function Round in VB6

by Yuening Dai (30 Submissions)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sat 9^th January 1999
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Rate Use Function Round in VB6



Private Sub cmdRound_Click()
    '
    Dim dblTest As Double
    '
    '
    If IsNumeric(txtTest.Text) = False Then Exit Sub
    '
    dblTest = Val(txtTest.Text)
    '
    dblTest = Round(dblTest, 3)
    '
    txtTest.Text = Str(dblTest)
    '
End Sub

Download this snippet Add to My Saved Code

Use Function Round in VB6 Comments

No comments have been posted about Use Function Round in VB6. Why not be the first to post a comment about Use Function Round in VB6.

Use Function Round in VB6

Use Function Round in VB6 Comments

Post your comment

Difficulty