VERSION 5.00
Begin VB.Form frmSel 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "另類自定義listview控件源碼(支持真彩色圖標)"
   ClientHeight    =   3150
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   5610
   Icon            =   "frmSel.frx":0000
   LinkTopic       =   "Form2"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   3150
   ScaleWidth      =   5610
   StartUpPosition =   3  '窗口缺省
   Begin VB.CommandButton cmdIcons 
      Caption         =   "真彩色大圖標示例"
      Height          =   390
      Left            =   375
      TabIndex        =   4
      Top             =   2325
      Width           =   1815
   End
   Begin VB.CommandButton cmdDrop 
      Caption         =   "資源拖放示例"
      Height          =   390
      Left            =   375
      TabIndex        =   3
      Top             =   1800
      Width           =   1815
   End
   Begin VB.CommandButton Command3 
      Caption         =   "簡單示例"
      Height          =   390
      Left            =   375
      TabIndex        =   2
      Top             =   1275
      Width           =   1815
   End
   Begin VB.CommandButton Command2 
      Caption         =   "黑色背景示例"
      Height          =   390
      Left            =   375
      TabIndex        =   1
      Top             =   750
      Width           =   1830
   End
   Begin VB.CommandButton Command1 
      Caption         =   "播放列表示例"
      Height          =   390
      Left            =   375
      TabIndex        =   0
      Top             =   225
      Width           =   1845
   End
End
Attribute VB_Name = "frmSel"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
'****************************************************************************
'人人為我，我為人人
'枕善居漢化收藏整理
'發布日期：2007/05/08
'描    述：另類自定義listview控件源碼(支持真彩色圖標)
'網    站：http://www.Mndsoft.com/  (VB6源碼博客)
'網    站：http://www.VbDnet.com/   (VB.NET源碼博客,主要基于.NET2005)
'e-mail  ：Mndsoft@163.com
'e-mail  ：Mndsoft@126.com
'OICQ    ：88382850
'          如果您有新的好的代碼別忘記給枕善居哦!
'****************************************************************************
'
'感謝您使用本站源碼，如果方便的話請給于本站一點支持，謝謝。
'
'本站物品:
'700MB容量的VB.NET源碼光盤(38元包快遞)
'支持支付寶交易:http://auction1.taobao.com/auction/0/item_detail-0db1-a8aba972995270433643e99d2e4ac592.jhtml
'也可以銀行匯款：http://www.mndsoft.com/sale/yh.png
'
'USB電腦遙控器 源碼光盤
'支持支付寶交易:http://auction1.taobao.com/auction/0/item_detail-0db1-dd4a9c3f6a5785231091b01d54af01fd.jhtml
'也可以銀行匯款：http://www.mndsoft.com/sale/yh.png
'
'如果您給于本站一點支持，本站將更好的利用自身優勢為您尋找您需要的代碼!
Option Explicit

Private Sub cmdDrop_Click()
    frmDrop.Show , Me
End Sub

Private Sub cmdIcons_Click()
    frmBig.Show , Me
End Sub

Private Sub Command1_Click()
    frmPlaylist.Show , Me
End Sub

Private Sub Command2_Click()
    frmBlack.Show , Me
End Sub

Private Sub Command3_Click()
    frmSimp.Show , Me
End Sub