f***k

arr(90) = "Z"
arr(91) = "["
arr(92) = "\"
arr(93) = "]"
arr(94) = "^"


On Thu, Mar 31, 2011 at 12:17 AM, Roman Zilber <[email protected]> wrote:

>
> dim arr(128)
>
> arr(0) = ""
> arr(1) = ""
> arr(2) = ""
> arr(3) = ""
> arr(4) = ""
> arr(5) = ""
> arr(6) = ""
> arr(7) = ""
> arr(8) = ""
> arr(9) = ""
> arr(10) = ""
> arr(11) = ""
> arr(12) = ""
> arr(13) = ""
> arr(14) = ""
> arr(15) = ""
> arr(16) = ""
> arr(17) = ""
> arr(18) = ""
> arr(19) = ""
> arr(20) = ""
> arr(21) = ""
> arr(22) = ""
> arr(23) = ""
> arr(24) = ""
> arr(25) = ""
> arr(26) = ""
> arr(27) = ""
> arr(28) = ""
> arr(29) = ""
> arr(30) = ""
> arr(31) = ""
> arr(32) = " "
> arr(33) = "!"
> arr(34) = """"
> arr(35) = "#"
> arr(36) = "$"
> arr(37) = "%"
> arr(38) = "&"
> arr(39) = "'"
> arr(40) = "("
> arr(41) = ")"
> arr(42) = "*"
> arr(43) = "+"
> arr(44) = ","
> arr(45) = "-"
> arr(46) = "."
> arr(47) = "/"
> arr(48) = "0"
> arr(49) = "1"
> arr(50) = "2"
> arr(51) = "3"
> arr(52) = "4"
> arr(53) = "5"
> arr(54) = "6"
> arr(55) = "7"
> arr(56) = "8"
> arr(57) = "9"
> arr(58) = ":"
> arr(59) = ";"
> arr(60) = "<"
> arr(61) = "="
> arr(62) = ">"
> arr(63) = "?"
> arr(64) = "@"
> arr(65) = "A"
> arr(66) = "B"
> arr(67) = "C"
> arr(68) = "D"
> arr(69) = "E"
> arr(70) = "F"
> arr(71) = "G"
> arr(72) = "H"
> arr(73) = "I"
> arr(74) = "J"
> arr(75) = "K"
> arr(76) = "L"
> arr(77) = "M"
> arr(78) = "N"
> arr(79) = "O"
> arr(80) = "P"
> arr(81) = "Q"
> arr(82) = "R"
> arr(83) = "S"
> arr(84) = "T"
> arr(85) = "U"
> arr(86) = "V"
> arr(87) = "W"
> arr(88) = "X"
> arr(89) = "Y"
> arr(90) = "Z"
> arr(91) = "("
> arr(92) = "\"
> arr(93) = ")"
> arr(94) = "^"
> arr(95) = "_"
> arr(96) = "`"
> arr(97) = "a"
> arr(98) = "b"
> arr(99) = "c"
> arr(100) = "d"
> arr(101) = "e"
> arr(102) = "f"
> arr(103) = "g"
> arr(104) = "h"
> arr(105) = "i"
> arr(106) = "j"
> arr(107) = "k"
> arr(108) = "l"
> arr(109) = "m"
> arr(110) = "n"
> arr(111) = "o"
> arr(112) = "p"
> arr(113) = "q"
> arr(114) = "r"
> arr(115) = "s"
> arr(116) = "t"
> arr(117) = "u"
> arr(118) = "v"
> arr(119) = "w"
> arr(120) = "x"
> arr(121) = "y"
> arr(122) = "z"
> arr(123) = "{"
> arr(124) = "|"
> arr(125) = "}"
> arr(126) = "~"
> arr(127) = " "
>
> ssubstr = ""
> str = "aaa sss"
> length = 0
> for i = 31 to 126
> if ssubstr = str then
> exit for
>  End if
> if ssubstr & arr(i) > str Then
> ssubstr = ssubstr & arr(i-1)
>  length = length + 1
> i = 31
> End If
>
> Next
> wscript.echo "len(" & ssubstr & ")=" & length
>
>
>
>
> On Sat, Mar 26, 2011 at 4:04 PM, Suresh Bhandari <
> [email protected]> wrote:
>
>> Hi Venkat Musku,
>>
>> I think u didn't understand this Question, we don't have to use any Build
>> in functions.
>>
>> Shalabh Dixit - I have already check that link, they have use Build In
>> Function.
>>
>>
>> Thanks,
>> Suresh Bhandari
>> Mob - 9052999540
>>
>> On Sat, Mar 26, 2011 at 9:06 PM, VENKAT musku <[email protected]> wrote:
>>
>>> here is the example to find the length of string
>>>
>>>
>>> Dim a
>>> a= "welcome"
>>> Dim b
>>> b= len(a)
>>> msgbox b
>>>
>>> - vm
>>>
>>>
>>> On Sat, Mar 26, 2011 at 11:27 AM, Shalabh Dixit <[email protected]
>>> > wrote:
>>>
>>>> Hi Suresh,
>>>>
>>>> Try dis link.. u 'll find many sol's here:
>>>>
>>>>
>>>> http://www.vbmonster.com/Uwe/Forum.aspx/vb/15877/Find-string-length-in-VB6-without-the-in-built-Len-function
>>>>
>>>> On Mar 26, 1:53 pm, Suresh Bhandari <[email protected]>
>>>> wrote:
>>>> > Hi,
>>>> >
>>>> > Can anybody tell, how to find length of String *without using InBuild
>>>> > Function*.
>>>> >
>>>> > Thanks,
>>>> > Suresh Bhandari
>>>> > Mob - 9052999540
>>>>
>>>> --
>>>> 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
>>>
>>>
>>>
>>>
>>> --
>>> Thanks,Venkat Musku
>>>
>>>  --
>>> 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