frmmain.frm

来自「用Visual Basic 寫的 象棋 遊戲~好玩喔~」· FRM 代码 · 共 72 行

VERSION 5.00
Begin VB.Form frmMain 
   BorderStyle     =   3  '蛮絬㏕﹚癸杠よ遏
   Caption         =   "い瓣禜囱"
   ClientHeight    =   9390
   ClientLeft      =   45
   ClientTop       =   615
   ClientWidth     =   10080
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   9390
   ScaleWidth      =   10080
   ShowInTaskbar   =   0   'False
   StartUpPosition =   1  '┮妮跌怠いァ
   Begin VB.PictureBox lblFirst 
      Height          =   9495
      Left            =   0
      Picture         =   "frmMain.frx":0000
      ScaleHeight     =   9435
      ScaleWidth      =   7635
      TabIndex        =   9
      Top             =   0
      Visible         =   0   'False
      Width           =   7695
   End
   Begin VB.Timer tmrRound 
      Enabled         =   0   'False
      Interval        =   3000
      Left            =   840
      Top             =   720
   End
   Begin VB.CommandButton cmdDraw 
      Caption         =   "―㎝"
      Height          =   495
      Index           =   1
      Left            =   8880
      TabIndex        =   8
      Top             =   8880
      Width           =   1215
   End
   Begin VB.CommandButton cmdLose 
      Caption         =   "粄块"
      Height          =   495
      Index           =   1
      Left            =   7680
      TabIndex        =   7
      Top             =   8880
      Width           =   1215
   End
   Begin VB.CommandButton cmdDraw 
      Caption         =   "―㎝"
      Height          =   495
      Index           =   0
      Left            =   8880
      TabIndex        =   6
      Top             =   2040
      Width           =   1215
   End
   Begin VB.CommandButton cmdLose 
      Caption         =   "粄块"
      Height          =   495
      Index           =   0
      Left            =   7680
      TabIndex        =   5
      Top             =   2040
      Width           =   1215
   End
   Begin VB.ListBox lstInFo 
      BackColor       =   &H00000080&
      BeginProperty Font 
         Name            =   "穝灿