by syed sajeed naeem (2 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Wed 9th June 1999
Date Added: Mon 8th February 2021
Rating:
(1 Votes)
This code will help to convert the textcase from ucase to lcase character by character on click of a button "Like if u type "AbCdE" it will
API Declarations
dim s,s1 as string
'PLACE 2 TEXTBOXES & A COMMAND BUTTON
'DURING THE RUN TIME TYPE THE TEXT IN
'TEXT BOX NO.1 & THEN CLICK THE BUTTON
'THIS WILL CONVERT THE TEXTCASE
command1_click()
dim i as integer
dim s,s1 as integer
s1=""
for i =1 to len(text1)
s=mid(text1,i,1)
if Asc(s)<64 or Asc(s)> 91 then
s=Ucase(s)
else
s=Lcase(s)
endif
s1=s1 & s
Next i
text2=s1
End Sub
No comments have been posted about This code will help to convert the textcase from ucase to lcase character by character on click of . Why not be the first to post a comment about This code will help to convert the textcase from ucase to lcase character by character on click of .