Estou dando uma estudada para melhor entender a conversão de arquivos para bytes...então me surgiram dúvidas que procurei no Google, e encontrei alguns tópicos bem interessantes...
onde tirei e adquiri mais dúvidas :)
Em um teste, peguei um arquivo (de imagem mesmo) e passei ele para um array de bytes...
depois dei um "For Each" em cada parte do array...
Gostaria de saber o que são esses números que recebi de retorno...
são bytes ??? :huh:
notei que os valores não ultrapassam o número 256...
no "For Each" que usei coloquei um espaço entre cada parte...
então os valores vieram dessa maneira:
2 25 189 202 45 127 32 30 4 12 67 249
e em algumas partes uma vasta sequência de zeros:
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
Aqui o script que usei para o teste:
Private Sub cmd_Bytes_Click()
Dim b() As Byte
fileNum = FreeFile
Open vFile For Binary As #fileNum
ReDim b(1 To LOF(fileNum))
Get fileNum, , b()
Close fileNum
Dim t As String
For Each v In b()
DoEvents
t = t & v & " "
Next v
txtRes.Text = t
End Sub
Question
Danleonhart
Seguinte...
Estou dando uma estudada para melhor entender a conversão de arquivos para bytes...então me surgiram dúvidas que procurei no Google, e encontrei alguns tópicos bem interessantes...
onde tirei e adquiri mais dúvidas :)
Em um teste, peguei um arquivo (de imagem mesmo) e passei ele para um array de bytes...
depois dei um "For Each" em cada parte do array...
Gostaria de saber o que são esses números que recebi de retorno...
são bytes ??? :huh:
notei que os valores não ultrapassam o número 256...
no "For Each" que usei coloquei um espaço entre cada parte...
então os valores vieram dessa maneira:
2 25 189 202 45 127 32 30 4 12 67 249
e em algumas partes uma vasta sequência de zeros:
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
Aqui o script que usei para o teste:
Link to comment
Share on other sites
3 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.