Discussion :

[omdafer]

Bonjour, j'ai creer une class qui a une variable public : tableau de string (dim toto() as string)

Dans mon form_load je n'arrive pas à attribuer une valeur à ce tableau de String
( ex: maclass.toto(i)=TableauString(i)), quand je compile j'ai le rapport d'erreur d'XP qui s'affiche.

J'ai déclaré la classe en 1ere ligne dans form1.bv

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Public Class Form1
    Dim MaClass As classCreer

Pouvez vous me dire ce qui faut faire.

[Aspic]

Pourrais tu nous donner plus de "code" car avec ca on peux pas localiser l'erreur...

[omdafer]

Voici ma class :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Public Class programme
    Public playlistNom() As String
    Public playlistURL() As String
    Public Sub creerPlaylist()
 
    End Sub
    Public Sub programme(ByVal nombre As Integer)
 
    End Sub
 
 
End Class

La déclaration de ma classe dans le Form1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
     Public Class Form1   '1er ligne du fichier form1.vb
Dim MonProg As programme   ' Déclaration de ma classe

Puis dans le "Private Sub Form1_Load" :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Dim j As Integer
 
...
 
Dim NomChaine() As String   'contient des valeur
Dim TitreGuignolsS() As String = {" ", " ", " ", " ", " ", " "}  ' Contient des valeur
 
...
 
For j = 0 To (NomChaine.Length + TitreGuignolsS.Length - 1)
            If (j < NomChaine.Length) Then MonProg.playlistNom(j) = NomChaine(j)
            If (j >= NomChaine.Length) Then MonProg.playlistNom(j) = TitreGuignolsS(j - NomChaine.Length)
        Next

C'est avec cà --> "MonProg.playlistNom(j) = NomChaine" que j'ai un rapport d'erreur quend je compile et execute le programme
Et également avec ça --> "MonProg.playlistNom(j) = TitreGuignolsS(j - NomChaine.Length)"

[SaumonAgile]

Est ce que tu as instancié ton tableau de string (playlistNom) dans lequel tu veux écrire ?
Je ne connais pas la syntaxe VB.NET mais en C# on écrit un truc de ce genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

String[] playlistNom= new String[Taille];

[omdafer]

J'ai déjà essayé ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Public Sub programme(ByVal nombre As Integer)
        playlistNom() = New String(nombre)
    End Sub

dont "programme(Integer)" est une fonction de ma classe permettant d'instancier mon "playlistNom", mais l'éditeur me donne ce message

Erreur 2 Une valeur de type 'Integer' ne peut pas être convertie en 'Tableau à 1 dimension(s) de Char'. D:\Mes documents\Mes sources\VLCTV\VLCTV\programme.vb 8 36 VLCTV

justement je pense que c'est parce que je n'arrive pas à instancier mes tableau de string, que j'ai un rapport d'erreur XP quand j'execute.
Sans oublier qu'il faut que playlistNom soit global et que je ne connais pas tout de suite la taille quelle va faire.

[Aspic]

Normal...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 Public playlistNom(Num) As String
    Private Num As Integer
    Public Sub programme(ByVal nombre As Integer)
        Num = nombre
    End Sub

Essaye ca je pense que tu veux redimentionner ton tableau de string en fonction du paramètre "Nombre"