>>632
わかるに決まってるよねそんなの。
桃白白のことバカにするんじゃないよ。
Callっていうのはサブプロシージャを呼ぶときに使うものだよ。
たとえば
Result = Call FunctionA()
こういう書き方できないでしょ？
Callを使うときっていうのは戻り値がないっていうのが前提になるわけ。
ひるがえってCallを使わないのはファンクションを呼ぶときに使うことが前提になる。
だから、こう書けばソートされるでしょ。余裕だよこんなもの。
entry = bubblesort(entry)

Function bubblesort(array)
　dim i,j,t
　for i = 0 to UBound(array) - 1
　　for j = 1 to UBound(array) - i
　　　if array( j ) < array( j - 1 ) then
　　　　t = array( j ) : array( j ) = array( j - 1 ) : array( j - 1 ) = t
　　　end if
　　next
　　'WScript.Echo Join(array," ")
　next
　bubblesort = array
end Function