How do I selected item change with if condition in linq?

Question

0.00/5 (No votes)

See more:

I have a byte array
eg
Dim ArrayBytes = {0, 5, 200, 95, 6, 11, 100, 8, 120, 0, 0, .........}

I want all selected item has three number as string (eg 5 > "005", 93 > "093", 0 > "000")
if selected item contains one number i want add front of byte "00" (eg "005")
if selected item contains two numbers i want add front of byte "0" (eg "095")

What I have tried:

Dim NewBytes2 As New List(Of String)(ArrayBytes.GetRange(0, 10).Where(Function(x) If CStr(x).lenght = 1 Then   x =  "00" & CStr(x) ElseIf CStr(x).lenght = 2 Then   x =  "0" & CStr(x) end if)

Posted 6-Apr-18 4:46am

gacar

Updated 6-Apr-18 5:15am

v3

Add a Solution

Comments

G3Coder 6-Apr-18 11:11am

This what you are after: https://docs.microsoft.com/en-us/dotnet/standard/base-types/how-to-pad-a-number-with-leading-zeros ?

gacar 6-Apr-18 13:39pm

Yes there is about my question. Thank you for your comment.

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

OriginalGriff · Accepted Answer · 2018-04-06T05:17:00

Solution 1

Try:

VB

Dim arrayBytes As Byte() = New Byte() {0, 5, 200, 95, 6, 11, 100, 8, 120, 0, 0}
Dim withZeros As String() = arrayBytes.[Select](Function(b) b.ToString("000")).ToArray()

Posted 6-Apr-18 5:17am

OriginalGriff

Comments

Bryian Tan 6-Apr-18 11:42am

nice ++ :)

gacar 6-Apr-18 13:32pm

Thank you. This is working

gacar 6-Apr-18 14:07pm

Last thing, is it posible to string? (not string array())

OriginalGriff 6-Apr-18 14:21pm

What - exactly - do you want in the string?

gacar 6-Apr-18 14:29pm

Yes. But thank you. I found solution from stackoverflow.
Dim withZeros = arrayBytes.Select(Function(b) b.ToString("000")).Aggregate(Function(x, y) x & ", " & y)