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
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.
We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.