Adobe provided a lot of infrastructure to do that with just a simple script.

The first block of code below is what I came up with first.--------Click Here to display the illustration-------- Private Sub Accept Grades_Click( By Val sender As System. Enabled = False Do str_input Grade = Input Box("Enter grade number " & int_counter.

To String, "Grade Calculator", "Enter Grade") If str_input Grade = String. Show("Nothing entered" & vb New Line & "Please enter a grade", "Error", Message Box Buttons. Information) Else If Not Is Numeric(str_input Grade) Then Message Box.

I haven't actually tried to write a loop like this since VB.

NET came onto the scene, so I gave it a shot just for fun. Click Dim dec_grade As Decimal Dim str_input Grade As String = "" Dim int_counter As Integer = 1 Accept Grades.

--------Click Here to display the illustration-------- Dim Valid Grade Entry As Boolean Private Sub input Grade_Validating( By Val sender As Object, By Val e As System. Cancel Event Args ) Valid Grade Entry = False Error Msg.

I'm a little confused by the apparently-interchangeable use of "Contact" and "Product".

By Dan Mabbutt While working on a program recently, I needed to guarantee that some text input contained only numbers. Visible = False End Sub This works better and it's shorter.

(The app required the user to enter a numeric serial number.) I bingled the web for a while to see if anyone had any better ideas about how to do it than I did and I discovered (Yet again!! This article covers the common recommendations and then the one I recommend. But if you're going to do it this way, why not use the technology invented to do it: Regular Expressions.

So, if the user enters ‘01234’ we should see an error message that would instruct the user about what type of data is valid for this field.

To start, we create a text field and bring up the properties dialog for the field.

For example, you start off referring to the model as "Product" but then you have this:class Contact : IData Error Info And later you say "That completes our Contact model".