Hi everybady,
i have faced few Qns in one of i attended interview, please help me out with these below Qns.
1. how to join values without using join function?
2. how to compare values without using String compare function?
3. input is Bangalore, but i need output like this below format, what is function to use and get this outcome
B
A
N
G
A
L
o
R
E
4. Input is "CapGemini" but uotput should be like this "inimeGpaC"
5. Input is
1
1 2
1 2 3
1 2 3 4
1 2 3 4 5
Can someone let me know results of this Qns, please. Thanks.
Answers were Sorted based on User's Feedback
1. how to join values without using join function?
Ans:
Option Explicit
Dim strValue, arrValue,iCount
arrValue = Array("Srinivasulu","Thatavarthi")
For iCount = 0 To UBound(arrValue)
strValue =strValue&" "& arrValue(iCount)
Next
MsgBox strValue
'Actual Output:
---------------------------
---------------------------
Srinivasulu Thatavarthi
---------------------------
OK
---------------------------
2. how to compare values without using String compare function?
Ans:
Option Explicit
Dim strValue
strValue = "Thatavarthi"
If strValue = "Thatavarthi" Then
MsgBox "Both strings are same"
Else
MsgBox "Both strings are not same"
End If
'Expected out Put
---------------------------
---------------------------
Both strings are same
---------------------------
OK
---------------------------
3. input is Bangalore, but i need output like this below format, what is function to use and get this outcome
B
A
N
G
A
L
o
R
E?
Ans:
Option Explicit
Dim strValue,iCount, strNewValue
strValue = Ucase("Bangalore")
For iCount = 1 To Len(strValue)
strNewValue = strNewValue& vbNewLine& Mid(strValue,iCount,1)
Next
MsgBox strNewValue
'Expected Value:
---------------------------
---------------------------
B
A
N
G
A
L
O
R
E
---------------------------
OK
---------------------------
4. Input is "CapGemini" but uotput should be like this "inimeGpaC"
Option Explicit
Dim strValue,iCount, strNewValue
strValue = "CapGemini"
For iCount = Len(strValue) To 1 Step -1
strNewValue = strNewValue& Mid(strValue,iCount,1)
Next
strNewValue = Trim(strNewValue)
MsgBox strNewValue
'Expected value
---------------------------
---------------------------
inimeGpaC
---------------------------
OK
---------------------------
5. Input is
1
1 2
1 2 3
1 2 3 4
1 2 3 4 5
Ans:
Option Explicit
Dim iCount,strValue,jcount,arrValue
For iCount = 1 To 5
For jcount = 1 To 5
If iCount = jcount then
strValue = strValue&jcount
Exit For
End IF
Next
arrValue = arrValue&vbNewline& strValue
Next
MsgBox arrValue
'Expected Output
---------------------------
---------------------------
1
12
123
1234
12345
---------------------------
OK
---------------------------
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / testengineer
4. Input is "CapGemini" but uotput should be like this "inimeGpaC"
Ans: StrReverse("CapGemini")
3. input is Bangalore, but i need output like this below format, what is function to use and get this outcome
B
A
N
G
A
L
o
R
E
Ans:
string1= "Banglore"
string2=ucase(string1)
strlength=len(string2)
For i = 1 To strlength
val=Mid(string2,i,1)&vbNewline
print val
Next
5 Ans:
For i = 1 To 5
For j = 1 To i
print j
Next
Next
| Is This Answer Correct ? | 1 Yes | 2 No |
When are redim statement and preserve keyword used in the vbscript language?
Explain about constants in vb script?
Which operator is used for fetching the modulus of the 2 numbers in the vbscript language?
We have an application which is built using multiple technologies and are using QTP as the tool for Automating the same. While we spy over a combo box in this application, we get the object name as a "Combo Control" and we are not able to perform any action over this object in either selecting or checking any method for the same like "Exist" etc. Hence we thought of a solution and the same can be found below
What is the extension of the vbscript file?
how to write function to validate the number of characters entering into the text box?
What is the difference between javascript and vbscript?
write a vbscript for finding the sum of the numbers from 1- 50
I need to get some data from data base and store this (retrieved) data in a excel sheet using VB script in QTP9.0 I have created connection for data base I have created as excels sheet by using Set XL=CreateObject("Excel.Application") XLworksheet.cells(1,1).value= rs.fields.item("<<The data retrieved from data base >>") I have taken a for loop and changed the cells values (1 as i and another 1 as j) But still I am not able to get Plz kindly tell me know this . It is very urgent
what is test scenario?
What is the purpose of folders object of scripting.filesystemobject class in vbscript?
write a vb script to display the number is odd or even and whether it is divisible by 9 or not