Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 17
  1. #1

    MsgBox ArgumentException

    Mistero... nell'evento keypress di un FileListBox ho una
    MsgBox("prova") che:
    -se viene richiamata prima di Me.PictureBox1.Image.Dispose() funziona
    -se viene richiamata dopo si genera un ArgumentException

    Qualche idea?



    PS: Me.PictureBox1.Image.Dispose() serve a liberare le risorse

  2. #2
    Prova a specificare il titolo dell'msgbox o ad usare, invece della funzione MsgBox mantenuta per compatibilità, MessageBox.Show().
    Amaro C++, il gusto pieno dell'undefined behavior.

  3. #3
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,482

    Moderazione

    VB6? VB.NET?
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  4. #4
    Originariamente inviato da MItaly
    Prova a specificare il titolo dell'msgbox o ad usare, invece della funzione MsgBox mantenuta per compatibilità, MessageBox.Show().
    Niente da fare... non funziona

  5. #5
    Utente di HTML.it L'avatar di Jupy64
    Registrato dal
    Sep 2004
    Messaggi
    1,151
    Ciao, prima specifica il linguaggio usato, e poi posta la parte di codice che ti da problemi...
    Jupy

  6. #6
    scusate l'ignoranza (ma è solo la seconda volta che uso Visual Basic)...
    io uso Microsoft Visual Basic 2005 Express Edition, forse non sto usando .Net
    ...ma se qualcuno mi spiega qual'è la differenza fra VB6 e .Net potrò esere più preciso

    Grazie mille

  7. #7
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,482
    Originariamente inviato da Marco Colli
    io uso Microsoft Visual Basic 2005 Express Edition, forse non sto usando .Net
    ...ma se qualcuno mi spiega qual'è la differenza fra VB6 e .Net potrò esere più preciso
    Si tratta di VB.NET. Le differenze non sono materia di questa discussione, ma possono comunque essere ricercate all'interno di questo forum.

    Ho corretto il titolo.

    Ciao!
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  8. #8
    Si tratta di VB.NET. Le differenze non sono materia di questa discussione, ma possono comunque essere ricercate all'interno di questo forum.
    farò una ricerca

    comunque tornando all'argomento della discussione... qualunque idea a proposito di questa stranezza è ben accetta

  9. #9
    Utente di HTML.it L'avatar di Jupy64
    Registrato dal
    Sep 2004
    Messaggi
    1,151
    Originariamente inviato da Marco Colli
    ...
    comunque tornando all'argomento della discussione... qualunque idea a proposito di questa stranezza è ben accetta
    Ciao, non per insistere, ma è difficile dare una risposta immediata in base a quello che hai detto. Se vuoi che qualcuno ti dia una risposta, deve capire anche il problema e soprattutto vedere la parte di codice che tu usi quando si manifesta tale problema..per questo motivo dovresti postare la parte "incriminata"..
    Jupy

  10. #10
    Ecco il codice incriminato (i tre MsgBox/MessageBox nel codice sotto non funzionano)

    Private Sub FileListBox1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles FileListBox1.KeyPress

    'libero le risorse
    Me.PictureBox1.Image.Dispose()

    MessageBox.Show("prova", "Titolo", MessageBoxButtons.OKCancel, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1, MessageBoxOptions.RightAlign, False)

    'percorso del file selezionato
    Dim FileSelezionato As String = FileListBox1.Path & "\" & FileListBox1.FileName

    'azioni
    If e.KeyChar = "o" Then
    My.Computer.FileSystem.MoveFile(FileSelezionato, NuovoPercorsoFile("altri"))
    ElseIf e.KeyChar = "w" Then
    My.Computer.FileSystem.MoveFile(FileSelezionato, NuovoPercorsoFile("bianchi"))
    ElseIf e.KeyChar = "b" Then
    My.Computer.FileSystem.MoveFile(FileSelezionato, NuovoPercorsoFile("blu"))
    ElseIf e.KeyChar = "y" Then
    My.Computer.FileSystem.MoveFile(FileSelezionato, NuovoPercorsoFile("gialli"))
    ElseIf e.KeyChar = "r" Then
    My.Computer.FileSystem.MoveFile(FileSelezionato, NuovoPercorsoFile("rossi"))
    ElseIf e.KeyChar = "g" Then
    My.Computer.FileSystem.MoveFile(FileSelezionato, NuovoPercorsoFile("verdi_ marr"))
    ElseIf e.KeyChar = "v" Then
    My.Computer.FileSystem.MoveFile(FileSelezionato, NuovoPercorsoFile("violetti"))
    ElseIf e.KeyChar = "x" Then
    My.Computer.FileSystem.MoveFile(FileSelezionato, NuovoPercorsoFile("scartati"))
    ElseIf e.KeyChar = "d" Then
    'MsgBox("Comando")
    Else
    'MsgBox("Comando non trovato!")
    End If

    'eseguo il refresh del FileListBox1
    Me.FileListBox1.Refresh()

    'seleziono la prima voce del FileListBox1
    Me.FileListBox1.SelectedIndex = 0

    End Sub


Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.