Date: Tue, 16 Oct 2001 12:49 p.m.
   From: Mark Jacobson <jacobson@math-cs.cns.uni.edu>
     To: 810-030-01@uni.edu
Subject: Midterm exam on Friday.... Program due on Friday....

Hi Visual Basic students,

    I am making the program due on Wednesday, October 24th.

    There will also be a QUIZ on that same day.  
    October 24th, Wednesday:  15-20 minute quiz.

    Your program can have whatever GUI user interface you like, and
you are certainly welcome to add extra features to it.  It is required
to have the two different menus, and the two commands on each menu.

    The palindrome problem could be solved by using the ideas in the
reverse string command sub.  If you make a copy of the data in all
uppercase ( allCapsMovieName = UCase("Ghostbusters") ), for example,
and then build a reversed version of that, you can then compare the two
strings to see if they are the same.  If they are the same, then the
string is a palindrome.

    allCapsStr = UCase(txtData.Text)

    ' Code to create the reversed version goes here.  Step #2
    reversedStr = ""
    ' loop to create the reverseStr data, from the allCapsStr input...

    If allCapsStr = reversedStr Then
        ITS A PALINDROME
    Else
        ITS NOT A PALINDROME
    End If

    txtData.Text might be Radar, for example.

    allCapsStr would be set to RADAR

    reversedStr would be RADAR later, after step #2 of your algorithm
    created it one letter at a time, using the For loop.

    For i = 1 To Len(allCapsStr)
            Mid function and concatenate happens in here
         reversedStr = reversedStr  &  Mid( , , )
    Next i

        or

    For i = Len(allCapsStr) To 1 Step -1
             Mid function and concatenate happens in here
         reversedStr = Mid( , , )  &  reversedStr
    Next i

    See you in class on Wednesday.

    Mark