I am a little fuzzy on how to post my code so everyone can see it. I am too dull witted to figure out the instructions given on the blank thread.

Would any one be willing to help me out?

thanks

echo "Public Class frmProject4
    Private Sub btnDisplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplay.Click

        ' assining values

        Dim strOriginal As String = ""
        Dim strNew As String = ""
        Dim intLen As Integer

        ' Converting into variables

        strOriginal = txtOriginal.Text
        intLen = strOriginal.Length

        ' testing if Password between 5 and 7 characters";
"Public Class frmProject4
    Private Sub btnDisplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplay.Click

        ' assining values

        Dim strOriginal As String = ""
        Dim strNew As String = ""
        Dim intLen As Integer

        ' Converting into variables

        strOriginal = txtOriginal.Text
        intLen = strOriginal.Length

        ' testing if Password between 5 and 7 characters";
"Public Class frmProject4
    Private Sub btnDisplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplay.Click

        ' assining values

        Dim strOriginal As String = ""
        Dim strNew As String = ""
        Dim intLen As Integer

        ' Converting into variables

        strOriginal = txtOriginal.Text
        intLen = strOriginal.Length

        ' testing if Password between 5 and 7 characters

        If intLen >= 5 And intLen <= 7 Then

            ' Checking for Ucase vowels letter and replace it with Z

            strOriginal = strOriginal.Replace("A", "Z")
            strOriginal = strOriginal.Replace("E", "Z")
            strOriginal = strOriginal.Replace("I", "Z")
            strOriginal = strOriginal.Replace("O", "Z")
            strOriginal = strOriginal.Replace("U", "Z")

            ' checking for Lcase vowels letter and replace it with Z

            strOriginal = strOriginal.Replace("a", "Z")
            strOriginal = strOriginal.Replace("e", "Z")
            strOriginal = strOriginal.Replace("i", "Z")
            strOriginal = strOriginal.Replace("o", "Z")
            strOriginal = strOriginal.Replace("u", "Z")

            ' Checking for numbers and replace it with R;
Public Class frmProject4
    Private Sub btnDisplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplay.Click

        ' assining values

        Dim strOriginal As String = ""
        Dim strNew As String = ""
        Dim intLen As Integer

        ' Converting into variables

        strOriginal = txtOriginal.Text
        intLen = strOriginal.Length

        ' testing if Password between 5 and 7 characters

        If intLen >= 5 And intLen <= 7 Then

            ' Checking for Ucase vowels letter and replace it with Z

            strOriginal = strOriginal.Replace("A", "Z")
            strOriginal = strOriginal.Replace("E", "Z")
            strOriginal = strOriginal.Replace("I", "Z")
            strOriginal = strOriginal.Replace("O", "Z")
            strOriginal = strOriginal.Replace("U", "Z")

            ' checking for Lcase vowels letter and replace it with Z

            strOriginal = strOriginal.Replace("a", "Z")
            strOriginal = strOriginal.Replace("e", "Z")
            strOriginal = strOriginal.Replace("i", "Z")
            strOriginal = strOriginal.Replace("o", "Z")
            strOriginal = strOriginal.Replace("u", "Z")";

start a new thread with code snippet. like attachment.

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.