Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Arraylist Order by string array or comma delitmited string in vb.NET
Language:
Ada
Assembly
Bash
C#
C++ (gcc)
C++ (clang)
C++ (vc++)
C (gcc)
C (clang)
C (vc)
Client Side
Clojure
Common Lisp
D
Elixir
Erlang
F#
Fortran
Go
Haskell
Java
Javascript
Kotlin
Lua
MySql
Node.js
Ocaml
Octave
Objective-C
Oracle
Pascal
Perl
Php
PostgreSQL
Prolog
Python
Python 3
R
Rust
Ruby
Scala
Scheme
Sql Server
Swift
Tcl
Visual Basic
Layout:
Vertical
Horizontal
'Rextester.Program.Main is the entry point for your code. Don't change it. 'Compiler version 11.0.50709.17929 for Microsoft (R) .NET Framework 4.5 Imports System Imports System.Collections.Generic Imports System.Collections Imports System.Linq Imports System.Text.RegularExpressions Namespace Rextester Public Module Program Public Sub Main(args() As string) 'Arraylist Order by string array or comma delitmited string in vb.NET dim al_povodne as ArrayList = New ArrayList al_povodne.Add("6") al_povodne.Add("3") al_povodne.Add("-689") al_povodne.Add("68") Dim poleKodov() As String = "1,2,3,4,5,6".ToString().Split(",") 'Dim poleKodov() As String ="".ToString().Split(",") al_povodne = new ArrayList (al_povodne.ToArray().OrderBy(Function(b) if(Array.indexof(poleKodov,b.ToString)> 0,Array.indexof(poleKodov,b.ToString),al_povodne.count+1)).Toarray) For Each item as object in al_povodne Console.WriteLine(item) Next End Sub End Module End Namespace
Show compiler warnings
[
+
]
Show input
Compilation time: 0,2 sec, absolute running time: 0,09 sec, cpu time: 0,09 sec, average memory usage: 13 Mb, average nr of threads: 3
fork mode
|
history
|
discussion