【VB开源代码栏目提醒】：网学会员为需要VB开源代码的朋友们搜集整理了Popup.frm相关资料，希望对各位网友有所帮助!

    VERSION 5.00
    Begin VB.Form frmPopUp 
       Caption         =   " Opciones Generales"
       ClientHeight    =   5655
       ClientLeft      =   60
       ClientTop       =   465
       ClientWidth     =   8145
       BeginProperty Font 
          Name            =   "Tahoma"
          Size            =   8.25
          Charset         =   0
          Weight          =   400
          Underline       =   0   'False
          Italic          =   0   'False
          Strikethrough   =   0   'False
       EndProperty
       Icon            =   "Popup.frx":0000
       LinkTopic       =   "Form1"
       ScaleHeight     =   377
       ScaleMode       =   3  'Pixel
       ScaleWidth      =   543
       ShowInTaskbar   =   0   'False
       StartUpPosition =   2  '屏幕中心
       Begin VB.PictureBox picBotonesMini 
          Appearance      =   0  'Flat
          AutoRedraw      =   -1  'True
          AutoSize        =   -1  'True
          BackColor       =   &H80000005&
          BorderStyle     =   0  'None
          ForeColor       =   &H80000008&
          Height          =   240
          Left            =   405
          Picture         =   "Popup.frx":000C
          ScaleHeight     =   240
          ScaleWidth      =   1155
          TabIndex        =   8
          Top             =   1455
          Visible         =   0   'False
          Width           =   1155
       End
       Begin VB.FileListBox fileBmps 
          Appearance      =   0  'Flat
          BackColor       =   &H00FFC0C0&
          Height          =   225
          Hidden          =   -1  'True
          Left            =   1950
          Pattern         =   "*.jpg;*.bmp"
          System          =   -1  'True
          TabIndex        =   7
          Top             =   75
          Visible         =   0   'False
          Width           =   480
       End
       Begin VB.PictureBox picVol 
          Appearance      =   0  'Flat
          AutoRedraw      =   -1  'True
          AutoSize        =   -1  'True
          BackColor       =   &H80000005&
          BorderStyle     =   0  'None
          ForeColor       =   &H80000008&
          Height          =   1470
          Left            =   165
          Picture         =   "Popup.frx":0ED0
          ScaleHeight     =   1470
          ScaleWidth      =   135
          TabIndex        =   0
          Top             =   1110
          Visible         =   0   'False
          Width           =   135
       End
       Begin VB.PictureBox picMenu 
          Appearance      =   0  'Flat
          AutoRedraw      =   -1  'True
          AutoSize        =   -1  'True
          BackColor       =   &H80000005&
          BorderStyle     =   0  'None
          ForeColor       =   &H80000008&
          Height          =   360
          Left            =   120
          Picture         =   "Popup.frx":19CC
          ScaleHeight     =   360
          ScaleWidth      =   2400
          TabIndex        =   6
          Top             =   600
          Visible         =   0   'False
          Width           =   2400
       End
       Begin VB.PictureBox picMini 
          Appearance      =   0  'Flat
          AutoSize        =   -1  'True
          BackColor       =   &H00FF8080&
          BorderStyle     =   0  'None
          ForeColor       =   &H80000008&
          Height          =   630
          Left            =   2580
          Picture         =   "Popup.frx":4F4F
          ScaleHeight     =   42
          ScaleMode       =   3  'Pixel
          ScaleWidth      =   284
          TabIndex        =   5
          Top             =   105
          Visible         =   0   'False
          Width           =   4260
       End
       Begin VB.PictureBox PicMusic 
          Appearance      =   0  'Flat
          AutoRedraw      =   -1  'True
          AutoSize        =   -1  'True
          BackColor       =   &H00FF8080&
          BorderStyle     =   0  'None
          BeginProperty Font 
             Name            =   "宋体"
             Size            =   8.25
             Charset         =   0
             Weight          =   400
             Underline       =   0   'False
             Italic          =   0   'False
             Strikethrough   =   0   'False
          EndProperty
          ForeColor       =   &H80000008&
          Height          =   3150
          Left            =   1620
          Picture         =   "Popup.frx":DB5B
          ScaleHeight     =   3150
          ScaleWidth      =   5595
          TabIndex        =   4
          Top             =   1140
          Visible         =   0   'False
          Width           =   5595
       End
       Begin VB.PictureBox picBotones 
          Appearance      =   0  'Flat
          AutoRedraw      =   -1  'True
          AutoSize        =   -1  'True
          BackColor       =   &H80000005&
          BorderStyle     =   0  'None
          ForeColor       =   &H80000008&
          Height          =   540
          Left            =   150
          Picture         =   "Popup.frx":4725F
          ScaleHeight     =   540
          ScaleWidth      =   1725
          TabIndex        =   3
          Top             =   75
          Visible         =   0   'False
          Width           =   1725
       End
       Begin VB.PictureBox picDiscos 
          Appearance      =   0  'Flat
          AutoSize        =   -1  'True
          BackColor       =   &H80000005&
          BorderStyle     =   0  'None
          ForeColor       =   &H80000008&
          Height          =   270
          Left            =   360
          Picture         =   "Popup.frx":4A298
          ScaleHeight     =   270
          ScaleWidth      =   405
          TabIndex        =   2
          Top             =   1125
          Visible         =   0   'False
          Width           =   405
       End
       Begin VB.PictureBox picRep 
          Appearance      =   0  'Flat
          AutoRedraw      =   -1  'True
          AutoSize        =   -1  'True
          BackColor       =   &H80000005&
          BorderStyle     =   0  'None
          ForeColor       =   &H80000008&
          Height          =   135
          Left            =   135
          Picture         =   "Popup.frx":4A8C4
          ScaleHeight     =   135
          ScaleWidth      =   2085
          TabIndex        =   1
          Top             =   960
          Visible         =   0   'False
          Width           =   2085
       End
       Begin VB.Menu mnuMenuPrincipal 
          Caption         =   "MenuPrincipal"
          Begin VB.Menu mnuNuevaBusqueda 
             Caption         =   "F   Nueva Busqueda ..."
          End
          Begin VB.Menu mnuA 
             Caption         =   "-"
          End
          Begin VB.Menu mnuCFront 
             Caption         =   "   Cover Front"
             Begin VB.Menu mnuCambiarListaCaratula 
                Caption         =   "L   Cambiar Lista Rep/Caratula"
             End
             Begin VB.Menu mnuWallpapper 
                Caption         =   "    Colocar Caratula como Wallpaper"
             End
             Begin VB.Menu mnuMCaratula 
                Caption         =   "    Maximizar Caratula"
             End
          End
          Begin VB.Menu mnuB 
             Caption         =   "-"
          End
          Begin VB.Menu mnuBrowsers 
             Caption         =   "   Browsers"
             Begin VB.Menu mnuExplorar 
                Caption         =   "    Explorar ..."
             End
             Begin VB.Menu mnuExpAlbum 
                Caption         =   "    Explorar Album(s)"
             End
             Begin VB.Menu mnuZ 
                Caption         =   "-"
             End
             Begin VB.Menu mnuTagEditor 
                Caption         =   "   Tag Editor"
             End
             Begin VB.Menu mnuLyrics 
                Caption         =   "    Lyrics"
             End
          End
          Begin VB.Menu mnuC 
             Caption         =   "-"
          End
          Begin VB.Menu mnuControles 
             Caption         =   "    Controles de Reproduccion"
             Begin VB.Menu mnuVolumen 
                Caption         =   "   Volumen"
                Begin VB.Menu mnuSubirVolumen 
                   Caption         =   "+   Subir Volumen"
                End
                Begin VB.Menu mnuBajarVolumen 
                   Caption         =   "-   Bajar Volumen"
                End
             End
             Begin VB.Menu mnuD 
                Caption         =   "-"
             End
             Begin VB.Menu mnuTrackAnterior