Page 2 of 2 FirstFirst 12
Results 16 to 19 of 19
  1. #16
    Middlemarch is offline Competent Performer
    Windows 10 Access 2019
    Join Date
    Mar 2015
    Posts
    479
    Files contains an array of filenames. (There can be up 60+ so the Split OpenArgs method didn't seem ideal),
    Yes to Listview and ActiveX. Three columns are used. This is in frmER.
    Code:
    Sub FillList()
        Dim i As Integer
        Dim xmp As clsMP3ID3V2
        Dim FL As clsFlacTag
        For i = 1 To UBound(filenames)
            Set TheListview = ListView8.ListItems.Add(, , filenames(1))
            TheListview.SubItems(1) = StripPath(filenames(i))
            Select Case fExt(TheListview.SubItems(1))
               Case "mp3"
                   Set xmp = New clsMP3ID3V2
                   xmp.mp3File = filenames(i)
                   TheListview.SubItems(2) = xmp.EncodedBy
                   TheListview.SubItems(3) = xmp.LinkTo
               Case "flac"
                    Set FL = New clsFlacTag
                    FL.Flacfile = filenames(i)
                   TheListview.SubItems(2) = FL.EncodedBy
                   TheListview.SubItems(3) = FL.LinkTo
            End Select
        Next
    End Sub


  2. #17
    jojowhite's Avatar
    jojowhite is offline Competent Performer
    Windows 11 Access 2021
    Join Date
    Jan 2025
    Posts
    434
    here is another method.
    before anything open Form1 in design view and see the Property
    and on that property it is populating the listbox.

    now open MainForm still in Design view and see the Click event
    of the button where we are Instantiating Form1 and filling our
    array to be passed to Form1.

    close all forms and Open MainForm and press the button.
    there will be delay on Showing Form1 since our array is very
    big. but once shown, the listbox is already populated.
    Attached Files Attached Files

  3. #18
    Middlemarch is offline Competent Performer
    Windows 10 Access 2019
    Join Date
    Mar 2015
    Posts
    479
    I could see yours working as you described, and with trepidation added it to my stuff
    It all worked perfectly! I expected all sorts of trouble... but it was quite easy to follow and I get the idea how it works.
    Stepping showed the sequence of events and that was quite useful.
    I was able to slot in my FillList stuff.
    Many thanks.

  4. #19
    jojowhite's Avatar
    jojowhite is offline Competent Performer
    Windows 11 Access 2021
    Join Date
    Jan 2025
    Posts
    434

Page 2 of 2 FirstFirst 12
Please reply to this thread with any new information or opinions.

Similar Threads

  1. Replies: 2
    Last Post: 03-09-2021, 05:52 PM
  2. Replies: 17
    Last Post: 02-25-2018, 02:37 AM
  3. Passing Data From One Form to Another Form
    By ETCallHome in forum Forms
    Replies: 6
    Last Post: 03-12-2011, 12:53 PM
  4. Replies: 10
    Last Post: 09-27-2010, 08:06 PM
  5. Passing current form name to other form
    By owiec in forum Forms
    Replies: 2
    Last Post: 11-15-2009, 05:50 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
Other Forums: Microsoft Office Forums