Opening a random file in a directory VBScript

Question

I have a folder with a bunch of memes in it, %AppData%\\Memes And I have a file, meme.vbs in my startup folder.

How would I make meme.vbs