inputbox

Question

salut, je suis débutante en vb.net et j'ai un probléme au niveau de l'inputbox si je clique sur le bouton annuler de cette derniére ca me retourne un erreur (chaine vide "") plz aider moi 

aniakuos

cs_Jack · Answer

Salut
Qu'est ce qui te renvoie une erreur ? Sur quelle ligne ?
Donne le maximum de détails.
Comme expliqué dans l'aide (tu l'as lue, au mons ?), "Si l'utilisateur clique sur Annuler, une chaîne de longueur nulle est retournée"
C'est donc à toi de tester le contenu de la chaine renvoyée, mais comme on ne sait pas où se produit l'erreur, impossible de t'en dire plus ...

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

aniakuos5 · Answer

Mon code c'est pour supprimer une ligne d'une base de données,et pour obtenir le numéro de la ligne j'ai utiliser l'inputbox.Alors si je clique sur "ok" sa marche bien,si sur "annuler" il me renvoi l'erreur suivant: (La conversion de la chaîne "" en type 'Double' n'est pas valide.)


code:
Dim inp As integer = InputBox("Donnez le code à supprimer!!")
        For i As Integer = 0 To dt.Rows.Count - 1
            If dt.Rows(i).Item(0) = inp Then
                dt.Rows(i).Delete()
                oda.Update(dt)
                Exit Sub
            End If
        Next
        MsgBox("Bien supprimé") 

aniakuos

cboulas · Answer

Salut, pour moi c'est tout à fait logique

Déjà InputBox devrait te retourner un String et non un Interger directement : à toi de faire le cast

Ensuite tu n'a pas mis de test pour savoir si la valeur retournée est vide.

Chris...
- La vérité n'est pas ailleurs, elle est sous le nez de chacun, quelques mouvements neuronale permettent de l'entrevoir -
MCPD (webform-winform) / MCSA / MCDST / MCT

aniakuos5 · Answer

oui meme si string ca reste la meme erreur, en tt cas merci je vais chercher comment je dois faire le test 

aniakuos

jmf0 · Answer

Bonjour,

moi, ce que j'adore, c'st ceci :

Dim inp As integer = InputBox("Donnez le code à supprimer!!") 
For i As Integer = 0 To dt.Rows.Count - 1 
  If dt.Rows(i).Item(0) = inp Then 
    dt.Rows(i).Delete() 
    oda.Update(dt) 
    Exit Sub
  End If 
Next 
MsgBox("Bien supprimé") 

Et quand-est-ce, alors, que l'on peut afficher cette msgbox ?

aniakuos5 · Answer

wéééé il s'affiche
aniakuos

Inputbox

6 réponses

Votre réponse

Discussions similaires