ASM51

Boa noite.

Gostaria de uma ajuda para um simples código que faça um contador em VB.NET Express 2010:

00000
00001
00002
00003
00004
00005
00006
00007
00008
00009
0000A
0000B
0000C
0000D
0000E
0000F
00010
00011
00012
00013
00014
...
FFFFA
FFFFB
FFFFC
FFFFD
FFFFE
FFFFF


Ele vai contar de 00000 - FFFFF e inserindo em um listbox toda a contagem (conforme exemplo acima)...

Eu fiz esta conversão, mas não sei se este é o melhor metodo e como fazer agora para adicionar a contagem para a proxima casa... e continuar até o fim.

vbnet code

Dim Count As Ingeter
Dim MyString As String
For Count = 0 To 15
            MyString = Hex(Aux)
Next

Se alguem puder me ajudar, eu agradeço.
Vlw...
Ps: não é trabalho de escola e já procurei no google!!!

Creio que seja necessário apenas aumentar o 15 para 1048575.

Aux deve ser Count.

Insira também um delay para poder ver a contagem...

Obrigado por responder!!!

Estava usando o Aux em meu outro codigo...

E usei a faixa de 0 a 1048575 = FFFFF!!!

Mas ai ele não aparecera 00001... Como fazer???

Preciso da mascara dos 0000 a esquerda!!!

Vlw...

Resolvido parcialmente!!!


For Count = 0 To 1048575
AString = Hex( Count)
BString = AString.ToString.PadLeft(5, "0"c)
ListBox1.Items.Add(BString & Chr(13))
Next

Pena q a contagem esta muito alta e o programa trava...

Vlw...

Para o programa não travar durante a contagem tem que fazer o seguinte:
1) Criar uma segunda thread que realiza a contagem
2) Criar um método usando invoke para acessar os parametros da classe do form
3) Criar um delegate para esse metodo seguro
4) A partir da thread que realiza a contagem chamar esse delegate com a referência do método seguro para acesso aos atributos do form

Eu não conheço VB, mas em C# é bem fácil de fazer.

Poderia me fazer esse exemplo em C#???

Se puder, agradeço...

Vlw...

Pode ser Exemplo em C também se alguem souber...

' 2^16 é o mesmo que 16-bit ou FFFF = 65535
' Mas o seu é um número maior FFFFF exatamente 20-bits ou 2^20 = (0 To 1048575)
' Ele apenas formata os valores para você, adiciona tudo em um ArrayList.
' Você pode usar em seu código "DEC To HEX" assim: hList.Item(1048575&)

Dim hList As New ArrayList

For i As Int64 = 0 To 1048575&
hList.Add(Hex(i))
Next

' Depurar > Janelas > Saída
Console.WriteLine("DEC: {0} e HEX: &H{1}", 1048575&, hList.Item(1048575&))

O tópico era de 2011... Kkkkk

Vlw...