Visual Basic

Friends

    Passing more information on the problem for better understanding.
    See the routine below it is very simple, however I'm getting intermittent error in my application.
    Searching the error I got the link below, but checking my process I did not find anything related to the item resize.
    If anyone has any other information that can help me in this matter thank you for the attention.

Private Sub cmdExit_Click()
   On Error GoTo TryCathError
   Unload Me
   Exit Sub
TryCathError:
   Dim s_dsMsg As String
   s_dsMsg = "Error :{" & Err.Number & "}" _
      & vbNewLine & Err.Description
     
   MsgBox s_dsMsg, vbCritical, "Error"
End Sub

link ===> msdn.microsoft.com/en-us/library/aa243662(v=vs.60).aspx 

There is an Unload statement in the Resize event of a Data, Form, MDIForm, or PictureBox control. 
Remove the Unload statement from the event.

Quote:

Eddy Vluggen / Grupo

I'm programming with vb 6, the error I passed is code 365

Unable to unload within this context

Quote:

How sad, but thank you for your attention.

nei2009 wrote:

I'm programming with vb 6

Bastard Programmer from Hell
If you can't read my code, try converting it here[^]

Quote:

How sad, but thank you for your attention.

Public Interface IListViewFormat
    Function ListViewFormat() As String
End Interface

Public Class Aansluiting Implements IListViewFormat
    ... properties code ...

    Public Function ListViewFormat()
        return String.Format("{0} - {1}", ID, aansluiting)
    End Function

Dim collection = New List(Of IListViewFormat)
... add your items to the List and pass it to the method
Public Sub AddToListView(ByVal collection As IList(Of IListViewFormat))
    For Each item In collection
        ListView1.Items.Add(item.ListViewFormat)
    Next
End Sub