⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 rjsoftchess.frm

📁 关于国际象棋的VB示例
💻 FRM
📖 第 1 页 / 共 5 页
字号:
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0080C0FF&
      Height          =   345
      Left            =   8190
      TabIndex        =   39
      Top             =   7320
      Width           =   1635
   End
   Begin VB.Label Label4 
      Alignment       =   1  'Right Justify
      BackStyle       =   0  'Transparent
      Caption         =   "PLAYER:"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   20.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0080C0FF&
      Height          =   345
      Left            =   5340
      TabIndex        =   38
      Top             =   7320
      Width           =   825
   End
   Begin VB.Label Label3 
      Alignment       =   1  'Right Justify
      BackStyle       =   0  'Transparent
      Caption         =   "LOCAL:"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   20.25
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0080C0FF&
      Height          =   345
      Left            =   2610
      TabIndex        =   37
      Top             =   7320
      Width           =   705
   End
   Begin VB.Line Line1 
      BorderColor     =   &H000080FF&
      BorderWidth     =   3
      Index           =   1
      X1              =   9720
      X2              =   9855
      Y1              =   3705
      Y2              =   3705
   End
   Begin VB.Shape Shape1 
      BorderColor     =   &H000080FF&
      BorderWidth     =   3
      Height          =   465
      Left            =   7920
      Top             =   3480
      Width           =   1785
   End
   Begin VB.Image CursorArrow 
      Height          =   165
      Index           =   1
      Left            =   9420
      Picture         =   "RJSoftChess.frx":1BB2
      Top             =   3735
      Width           =   240
   End
   Begin VB.Image CursorArrow 
      Height          =   165
      Index           =   0
      Left            =   9420
      Picture         =   "RJSoftChess.frx":1E04
      Top             =   3525
      Width           =   240
   End
   Begin VB.Label MaxGameTime 
      Alignment       =   2  'Center
      BackColor       =   &H00000000&
      Caption         =   "MIN GAME"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   18
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0080C0FF&
      Height          =   315
      Left            =   8415
      TabIndex        =   33
      Top             =   3555
      Width           =   990
   End
   Begin VB.Label GameTime 
      Alignment       =   1  'Right Justify
      BackStyle       =   0  'Transparent
      Caption         =   "00:00"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   18
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0080C0FF&
      Height          =   315
      Index           =   2
      Left            =   7440
      TabIndex        =   32
      Top             =   3930
      Width           =   495
   End
   Begin VB.Label GameTime 
      Alignment       =   1  'Right Justify
      BackStyle       =   0  'Transparent
      Caption         =   "00:00"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   18
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H0080C0FF&
      Height          =   315
      Index           =   1
      Left            =   7440
      TabIndex        =   31
      Top             =   3180
      Width           =   495
   End
   Begin VB.Label TimerLabel 
      Alignment       =   1  'Right Justify
      BackStyle       =   0  'Transparent
      Caption         =   "TIMER:"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   18
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H000080FF&
      Height          =   315
      Index           =   1
      Left            =   6750
      TabIndex        =   30
      Top             =   3930
      Width           =   645
   End
   Begin VB.Label TimerLabel 
      Alignment       =   1  'Right Justify
      BackStyle       =   0  'Transparent
      Caption         =   "TIMER:"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   18
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H000080FF&
      Height          =   315
      Index           =   0
      Left            =   6750
      TabIndex        =   29
      Top             =   3180
      Width           =   645
   End
   Begin VB.Shape PreSquare 
      BorderColor     =   &H00FF0000&
      BorderWidth     =   2
      Height          =   720
      Left            =   2670
      Top             =   8070
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Label LabelY 
      Alignment       =   1  'Right Justify
      BackStyle       =   0  'Transparent
      Caption         =   "8"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   18
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H000080FF&
      Height          =   375
      Index           =   7
      Left            =   45
      TabIndex        =   8
      Top             =   6120
      Width           =   225
   End
   Begin VB.Label LabelY 
      Alignment       =   1  'Right Justify
      BackStyle       =   0  'Transparent
      Caption         =   "1"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   18
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H000080FF&
      Height          =   375
      Index           =   0
      Left            =   45
      TabIndex        =   1
      Top             =   945
      Width           =   225
   End
   Begin VB.Image OppsPiece 
      Height          =   585
      Left            =   570
      Top             =   9480
      Width           =   495
   End
   Begin VB.Label GuestBoard 
      BackStyle       =   0  'Transparent
      Caption         =   "    GUEST MODE"
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   12
         Charset         =   0
         Weight          =   700
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FFFFFF&
      Height          =   6465
      Left            =   360
      TabIndex        =   27
      Top             =   465
      Visible         =   0   'False
      Width           =   6375
   End
   Begin VB.Image Master_White 
      Height          =   720
      Index           =   0
      Left            =   150
      Picture         =   "RJSoftChess.frx":2056
      Top             =   8850
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_White 
      Height          =   720
      Index           =   1
      Left            =   750
      Picture         =   "RJSoftChess.frx":3D20
      Top             =   8850
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_White 
      Height          =   720
      Index           =   2
      Left            =   1350
      Picture         =   "RJSoftChess.frx":59EA
      Top             =   8850
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_White 
      Height          =   720
      Index           =   3
      Left            =   1920
      Picture         =   "RJSoftChess.frx":76B4
      Top             =   8850
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_White 
      Height          =   720
      Index           =   4
      Left            =   2490
      Picture         =   "RJSoftChess.frx":937E
      Top             =   8850
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_White 
      Height          =   720
      Index           =   5
      Left            =   3030
      Picture         =   "RJSoftChess.frx":B048
      Top             =   8850
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_Black 
      Height          =   720
      Index           =   0
      Left            =   120
      Picture         =   "RJSoftChess.frx":CD12
      Top             =   9480
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_Black 
      Height          =   720
      Index           =   1
      Left            =   750
      Picture         =   "RJSoftChess.frx":E9DC
      Top             =   9480
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_Black 
      Height          =   720
      Index           =   2
      Left            =   1350
      Picture         =   "RJSoftChess.frx":106A6
      Top             =   9480
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_Black 
      Height          =   720
      Index           =   3
      Left            =   1920
      Picture         =   "RJSoftChess.frx":12370
      Top             =   9480
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_Black 
      Height          =   720
      Index           =   4
      Left            =   2520
      Picture         =   "RJSoftChess.frx":1403A
      Top             =   9480
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image Master_Black 
      Height          =   720
      Index           =   5
      Left            =   3090
      Picture         =   "RJSoftChess.frx":15D04
      Top             =   9480
      Visible         =   0   'False
      Width           =   720
   End
   Begin VB.Image GRG 
      Height          =   315
      Index           =   1
      Left            =   420
      Picture         =   "RJSoftChess.frx":179CE
      Top             =   10320
      Visible         =   0   'False
      Width           =   150
   End
   Begin VB.Image GRG 
      Height          =   315
      Index           =   2
      Left            =   600
      Picture         =   "RJSoftChess.frx":17CB0
      Top             =   10320
      Visible         =   0   'False
      Width           =   150
   End
   Begin VB.Image MouseImage 
      Height          =   480
      Index           =   0
      Left            =   780
      Picture         =   "RJSoftChess.frx":17F92
      Top             =   10320
      Visible         =   0   'False
      Width           =   480
   End
   Begin VB.Label BoardLocation 
      Height          =   285
      Left            =   3000
      TabIndex        =   26
      Top             =   10410
      Visible         =   0   'False
      Width           =   645
   End
   Begin VB.Shape FromSquare 
      BorderColor     =   &H000000FF&
      BorderWidth     =   2
      Height          =   720
      Left            =   300
      Top             =   8070
      Visible         =   0   'False

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -