Visual Basic 2005 - Problem s nactenim do pole – Visual Basic – Fórum – Programujte.com

zdravim, mam toto:

Dim binReader As New BinaryReader( _
File.Open(fileNamePath, FileMode.Open))

a potreboval bych dany soubor prekopat do pole o 2 sloupcich, 1 polozka- 1 sloupec 1bajt a druhy sloupec 2. bajt

a tak dale, dokud nebude konec. Sory ze tak hloupe, ale potrebuji se s tim poprat.

Pokud soubor obsahu ty bajty, které chceš uložit do pole, tak pak BinaryReader -> ReadByte.

A ukládat do pole, které bude definováno takhle nějak:

Dim pole(50, 1) As Byte





pole(0, 0) = 1

pole(0, 1) = 2

pole(1, 0) = 3



...



'misto 1, 2, 3 budou bajty z toho souboru

To liborb :

ale praveze nevim pevnou delku pole, vice mene potrebuji ukladat s binarniho souboru pokazde 2bajty do pole.

zkousim toto:

Dim pole(binReader.BaseStream.Length) As String

                        

                        Dim a As Integer = binReader.BaseStream.Length / 2





                        For o As Integer = 0 To a

                            pole(o) = binReader.ReadInt16.ToString

                        Next

                        

                        MessageBox.Show(pole(0).ToString)

String? Sem měl za to, že chceš bajty ... :

Dim delka As Integer = binReader.BaseStream.Length / 2 - 1



Dim pole(delka, 1) As Byte



For a As Integer = 0 To delka

	pole(a, 0) = binReader.ReadByte()

	pole(a, 1) = binReader.ReadByte()

Next

To liborb :

diky, uz jsem si s tim pohral

pro nektere operace bych potreboval sloucit 2 polozky pole.

pole(0) a pole(1), pritom pole je Byte, asi do Int16

jde to vubec nejak?

Vždycky můžeš použít "klasiku":

Dim x As UInt16



x = pole(1, 0) * 256 + pole(1, 1)

To liborb :
UInt16 kolik se tam da narvat bajtu? je to jen pro 2 jak jsi napsal?

Ano, je to 16 bitové neznaménkové číslo neboli 2 bajty. Pokud chceš víc, tak UInt32 nebo UInt64.

sice to je uz mimo tema, ale potreboval bych vykreslovat do Picture boxu po pixelu, s tim ze mam barvu v RGB

(mam Visual basic 2005)

Je to jednoduché, barva v RGB == pixel.