[VB6]Une erreur que je comprends pas la !

Une erreur que je comprends pas la ! [VB6] - Programmation

Marsh Posté le 13-06-2002 à 17:53:17    

salut a tous !
voila j'ai fais un code visual basic kand je le lance a partir de visual basic il marche sans aucun pb mais kand je le compile é ke je le lance paffff  
erreur d'exécution '9':
indices en dehors de la plage
cela est du a koi ?  
merci d'une reponce prochaine


---------------
Virtual 3D WorlD
Reply

Marsh Posté le 13-06-2002 à 17:53:17   

Reply

Marsh Posté le 13-06-2002 à 19:08:19    

tu sors d'un tableau.

Reply

Marsh Posté le 13-06-2002 à 19:09:18    

é je fais comment pour y rerentré dedans ?


---------------
Virtual 3D WorlD
Reply

Marsh Posté le 13-06-2002 à 19:11:30    

CtHuLhU50 a écrit a écrit :

é je fais comment pour y rerentré dedans ?  




 :lol:  :lol:  
 
en fait il veut dire que tu as dépassé la limite d'un tableau.
 
par exemple, tu as demandé tab(15) pour un tableau de 12 éléments.
 
EDIT: généralement c'est un mavais test dans une boucle (un '<=' à la place d'un '<' par ex.)


Message édité par mareek le 13-06-2002 à 19:12:30

---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
Reply

Marsh Posté le 13-06-2002 à 19:17:49    

CtHuLhU50 a écrit a écrit :

é je fais comment pour y rerentré dedans ?  




 
:lol: on me l'avais jamais faite celle-là ;)

Reply

Marsh Posté le 13-06-2002 à 19:18:48    

:lol:

Reply

Marsh Posté le 13-06-2002 à 19:19:39    

ben vi mé kand je le lance a partir de vb ca marche nikel .... je capte pas la


---------------
Virtual 3D WorlD
Reply

Marsh Posté le 13-06-2002 à 19:33:20    

merci!
 
:lol:

Reply

Marsh Posté le 13-06-2002 à 20:03:35    

:lol:  :lol:  
 
qu'il est bon de rire parfois... bon allez, envoie ton code, qu'on puisse ouvrir la porte pour rerentrer dans ton tableau ! :d


---------------
J'ai un string dans l'array (Paris Hilton)
Reply

Marsh Posté le 13-06-2002 à 20:03:42    

:lol:  :lol:  
 
qu'il est bon de rire parfois... bon allez, envoie ton code, qu'on puisse ouvrir la porte pour rerentrer dans ton tableau ! :d


---------------
J'ai un string dans l'array (Paris Hilton)
Reply

Marsh Posté le 13-06-2002 à 20:03:42   

Reply

Marsh Posté le 13-06-2002 à 20:50:32    

si tu ve mon code oké mais c pas ce ke tu crois :)
Private TV8 As TVEngine
Dim Scene(900) As TVScene
Dim deco As TVScene
 
Dim prii(900) As Integer
Private bon As TVMesh
Private InputEngine As TVInputEngine
Private sngPositionX As Single
Private sngPositionY As Single
Private sngPositionZ As Single
Dim Lower(900) As New TVActor
Dim Upper(900) As New TVActor
Dim Head(900) As New TVActor
Dim nick(900) As String
Private Room As TVMesh
 
Private Atmos As TVAtmosphere
 
Private sngWalk As Single
Private sngStrafe As Single
Private TankPosition As D3DVECTOR
Private Camera As TVCamera
Public TextMesh As TVMesh
Private sngBrake As Single
Public go As Integer
 
Public textc As TVScreen2DText
 
Public Scr As TVScreen2DImmediate
Public TexFactory As TVTextureFactory
 
Private DoLoop As Boolean
 
 
 
Private Sub Form_Load()
socket.teping.Enabled = True
 
lo = 0
lo2 = 0
num2 = 5
num = 13
For a = 0 To 11
List1.AddItem ""
Next
Randomize Timer
DoLoop = True
sngWalk = 0
sngStrafe = 0
sngPositionX = 0
sngPositionY = 20
sngPositionZ = 0
sngAngleX = 0
sngAngleY = 0
TankPosition.x = 50
TankPosition.y = 20
TankPosition.z = 50
 
Set TV8 = New TVEngine
TV8.Init3DFullscreen 1024, 768, 32
'TV8.Init3DWindowedMode Form3.hWnd
Set Scene(0) = New TVScene
Set deco = New TVScene
 
Set InputEngine = New TVInputEngine
Set Camera = New TVCamera
Set Scr = New TVScreen2DImmediate
Set TexFactory = New TVTextureFactory
TexFactory.LoadTexture "D:\TrueVision 3D SDK\VB\v3dworld\img\chat.jpg", "chat"
Set textc = New TVScreen2DText
Scene(0).SelectFont "Courier New"
Set Room = New TVMesh
Set Room = deco.CreateMeshBuilder
socket.Text9 = TV8.TimeElapsed
 
deco.LoadTexture "D:\TrueVision 3D SDK\VB\v3dworld\textures\game\stone_wall.bmp", , , "RoomTexture"
socket.Text8 = "1.25"
Room.AddFloor GetTex("RoomTexture" ), -500, -500, 500, 500
socket.Text8 = "1.30"
 
voila é text8 de la form socket kand mon prog plante &é a 1.25 donc ca plante sur la fonction Room.AddFloor GetTex("RoomTexture" ), -500, -500, 500, 500
 
ca t'avance vachement d'avoir mon coee n'es pas :)


---------------
Virtual 3D WorlD
Reply

Marsh Posté le 13-06-2002 à 22:10:50    

si c gettex() ki plante, il faut p'tet k'on ai droit au contenu du code de cette sub/function (je suppose ke c le cas)

Reply

Marsh Posté le 13-06-2002 à 22:25:18    

si tu ve le contenue de tt le code y en a pour 200 ko donc ....
c('est pour de plus je suis plus sur ke l'erreur é la c tellement le bordel .....
  :sarcastic:


---------------
Virtual 3D WorlD
Reply

Marsh Posté le 13-06-2002 à 22:33:31    

p'tet pas bezoin de tt le code je pense : je c pas si tu y a paensé, mais avec le debogueur VB tu saura exactement kel ligne de ta sub/function fait foirer ton appli !

Reply

Marsh Posté le 13-06-2002 à 22:44:48    

je pe pas utilisé le debugger  
car si je lance mon prgramme sous visual basic il marche nikel c'est kand je le compile en .exe que la il marche plus


---------------
Virtual 3D WorlD
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed