Hi Sirisha,

Here is the solution:

Environment("Country")="belgium"
strCountry=Environment("Country")
If  strCountry<>"" Then
Environment.value("Country")=Ucase(Left(strCountry,1)) + Right(strCountry,
len(strCountry)-1)
msgbox Environment.value("Country")
End If

Regards

*Debajit Hazarika*


On Wed, Nov 30, 2011 at 10:41 PM, Shalabh Dixit <[email protected]>wrote:

> On Error Resume Next
> Dim str_Country
> Environment("test") = "belgium"
> str_Country = Environment("test")
> str_First_Letter = UCase(Mid(str_Country,1,1))
> str_Text = str_Text & Mid(str_Country,2)
> str_Country_new = str_First_Letter & str_Text
> MsgBox str_Country_new
>
>
>
>
>
>
> Regards
> Shalabh Dixit
> My QTP Blog <http://shalabhdixit.wordpress.com/>
>
>
>
>
> On Wed, Nov 30, 2011 at 6:19 PM, sirisha chigurupati <[email protected]
> > wrote:
>
>> Hi all,
>>
>> I  captured text in one website using envionment variable and the text is
>> belgium and I have to insert check point in another website where the
>> text is Belgium
>>
>> How can I covert my environment variable/string's first letter to Ucase?
>>
>> BYE
>> Sirisha
>>
>> --
>> You received this message because you are subscribed to the Google
>> "QTP - HP Quick Test Professional - Automated Software Testing"
>> group.
>> To post to this group, send email to [email protected]
>> To unsubscribe from this group, send email to
>> [email protected]
>> For more options, visit this group at
>> http://groups.google.com/group/MercuryQTP?hl=en
>
>
>  --
> You received this message because you are subscribed to the Google
> "QTP - HP Quick Test Professional - Automated Software Testing"
> group.
> To post to this group, send email to [email protected]
> To unsubscribe from this group, send email to
> [email protected]
> For more options, visit this group at
> http://groups.google.com/group/MercuryQTP?hl=en
>

-- 
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

Reply via email to