Discussion :

[BernardBouree]

Bonjour

J'ai une classe FichierMultimedia définie comme suit:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Public Class Mutimedia
 
_bFileExist as Boolean
........
Public Sub New()
 
End Sub
.........
Public Property BFileExist() As Boolean
        Get
            Return _bFileExist
        End Get
        Set(ByVal value As Boolean)
            _bFileExist = value
         End Set
    End Property

Dans un module j'ai le code suivant

Code :

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

1
2
Dim clFile as New Multimedia
clFile.BFileExist=My.Computer.FileSystem.FileExists("Nomfichier.jpg")

A l'exécution la dernière ligne me donne une exeption avec "La conversion de la chaîne "" en type 'Boolean' n'est pas valide."

BFileexist est bien un boolean ainsi que le retour de la fonction system FileExist.

Que se passe-t-il ?

Merci pour votre aide
Bernard

[sevyc64]

a priori pas d'erreurs, surement qu'elle se situe ailleurs

[Pol63]

vérifie la pile des appels lors de l'erreur, car elle ne vient pas de là

[mdevaux62]

Code :

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

_bFileExist as Boolean

Il ne manque pas un Private devant _bFileExist ???

Code :

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

Private _bFileExist as Boolean

[Bluedeep]

Il ne manque pas un Private devant _bFileExist ???

On ne voit pas trop le rapport avec l'erreur.
Accessoirement, les membres de classes sont par défaut private.

[mdevaux62]

Un rapport avec l'erreur ? Quelle erreur ?

Dans le code présenté, c'est la SEULE erreur (erreur par ailleurs signifiée par l'éditeur).