Sorting algorithms/Cocktail sort with shifting bounds: Difference between revisions

Content added Content deleted
(→‎{{header|VBScript}}: Better indentation)
Line 366: Line 366:
=={{header|Visual Basic .NET}}==
=={{header|Visual Basic .NET}}==
{{works with|Visual Basic .NET|9.0}}
{{works with|Visual Basic .NET|9.0}}
<lang vbnet>' Bubble sort - VB.Net
<lang vbnet>' Sorting algorithms/Cocktail sort with shifting bounds - VB.Net
Private Sub Cocktail_Shaker_Sort()
Private Sub Cocktail_Shaker_Sort()
Dim A(20), tmp As Long 'or Integer Long Single Double String
Dim A(20), tmp As Long 'or Integer Long Single Double String