print the array values in ascending order?
Answers were Sorted based on User's Feedback
Answer / rajanikanth
Option Explicit
Dim a,i,b,j,temp
a=Array(30,70,10,60,90,20,50,80)
For i=0 To UBound(a)
For j=0 To UBound(a)
If StrComp(a(i),a(j),1)<0 Then
temp=a(i)
a(i)=a(j)
a(j)=temp
End If
Next
Next
For i=0 To UBound(a)
MsgBox a(i)
Next
| Is This Answer Correct ? | 1 Yes | 0 No |
arr = Array(4, 6, 2, 7, 3, 5, 1, 8, 10, 22, 33, 15, 11, 8)
For i = LBound(arr) to UBound(arr)
For j = LBound(arr) to UBound(arr) - 1
If arr(j) > arr(j + 1) Then
TempValue = arr(j + 1)
arr(j + 1) = arr(j)
arr(j) = TempValue
End If
Next
Next
s = ""
For i = LBound(arr) To UBound(arr)
s = s & arr(i) & ","
Next
Msgbox s
'Expected output
---------------------------
---------------------------
1,2,3,4,5,6,7,8,8,10,11,15,22,33,
---------------------------
OK
---------------------------
| Is This Answer Correct ? | 0 Yes | 0 No |
What is wrong with the following code: <%afname="header.asp"%><!?#include file ="<%=afname%>"?>
How to Import data from a file (file is on the desktop) to the data table
Which in-built function related to an array joins substrings into one string in the vbscript language?
How will you compare two strings in vbscript?
How to find a latest file from any folder
write a vb script to calculate factorial of a number?
write generic functions for webapplication?like generic function for webedit generic function for webbutton generic function for links
Mention what is select case statement?
how to check whether link is disabled in QTP??
Mention what is the main difference between function and sub-procedure?
how to organize files in object repository of qtp
Explain about vb script?