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 |
What variable can you use to share info across the whole application for one user?
How to open excel in vb script?
Which object is used to work with the excel sheets in the vbscript language and what statement is used to create this object?
How will you trim the spaces on the left of a string using vbscript?
what is the standards used for writing the script in QTP
There are 5 web pages.write a script to click the button on 4th web page.
What are the differences between sub procedures and function procedures?
How to write functional test cases for send button in gmail.
what does create object actually do when you call it in vbscript?
Explain the scope of the variables using dim, public, and private keywords respectively.
How to Enter Values on the Command promt using VB script
how to genarate a random numbers in vb?