Find capital letter in a string

[Arul]

Hi,

How can i find the ,how many capital letters in a given string

str= "ADlanda"

count is 2

regards,
Arul.D

[kotaramamohana]

Arul,

Use below mentioned code.

Code:

str= "ADlanda" n=len(str) msgbox n i=0 strRes="" While i<n a=mid(str,i+1,1) If ASC(a)>=65 AND ASC(a)<=90 Then strRes=strRes &a End If i=i+1 Wend msgbox "Your Result is: " &strRes

Might be we will be having easy code also. But I know this code only.

---

[Arul]

Hi kotaramamohana,

Thanks for ur script.

Code:

str= "ADlanda" n=len(str) msgbox n For i=0 to n-1 a=mid(str,i+1,1) If ASC(a)>=65 AND ASC(a)<=90 Then strRes=strRes &a End If Next msgbox "Your Result is: " &strRes

Regards,
Arul