title image


Smiley Re: VB6 - Mehrere Probleme (FlexGrid, Arrays, ...)
Hi,



die Daten ins FlexGrid füge ich über folgenden Code hinzu :



Private Sub sart_KeyPress(KeyAscii As Integer)

.

.

.

MSFlexGrid1.Rows = MSFlexGrid1.Rows + 1

i = Val(i) + Val(1)

MSFlexGrid1.TextMatrix(i, 1) = posi.Text

MSFlexGrid1.TextMatrix(i, 2) = laenge.Text

MSFlexGrid1.TextMatrix(i, 3) = stck.Text

MSFlexGrid1.TextMatrix(i, 4) = sart.Text

MSFlexGrid1.TextMatrix(i, 0) = i

posi.SetFocus

KeyAscii = 0



Mein Projekt sieht vor das ich aus einer 6 m Stange möglichst viele Stücke herraus schneiden kann so das ich einen Veschnitt von bis zu 3% zurückhalte. Die verschiedenen Längen dieich ausschneiden möchte füge ich im FlexGrid ein mit einigen anderen Daten.

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: