Write a Visual Basic program to read the string first and find the reverse string and delete all the vowels

WAP in VB to read the string first and find the reverse string and delete all the vowels.
_____________________________________________________________

Dim a
Private Sub Command1_Click()
a = StrReverse(Text1.Text)
Label2.Caption = a
End Sub

Private Sub Command2_Click()
a = Replace(a, "a", "")
a = Replace(a, "A", "")
a = Replace(a, "e", "")
a = Replace(a, "E", "")
a = Replace(a, "i", "")
a = Replace(a, "I", "")
a = Replace(a, "o", "")
a = Replace(a, "O", "")
a = Replace(a, "u", "")
a = Replace(a, "U", "")
Label3.Caption = a
End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()

End Sub

_______________________________________________________
OUTPUT
_______________________________________________________



____________________________________
DOWNLOAD
____________________________________

Download its form

Download its Image

BACK TO MAIN PAGE

Write a Visual Basic program to find length of entered text

WAP to find length of entered text.
________________________________

Private Sub Command1_Click()
Dim a, b
a = Text1.Text
b = Len(a)
Label2.Caption = b
End Sub

Private Sub Command2_Click()
Text1.Text = ""
Label2.Caption = "OUTPUT"

End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()

End Sub

___________________________________
OUTPUT
___________________________________



____________________________________
DOWNLOAD
____________________________________

Download its form

Download its Image

BACK TO MAIN PAGE