jiezhang.frm

VB客房管理系统全套(带源码)顾客可以用电话或上网注册的方式预定。其方式不同

VERSION 5.00
Begin VB.Form Form5 
   Caption         =   "结帐"
   ClientHeight    =   4185
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   5820
   LinkTopic       =   "Form5"
   ScaleHeight     =   4185
   ScaleWidth      =   5820
   StartUpPosition =   3  '窗口缺省
End
Attribute VB_Name = "Form5"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit
'用于传递查询块

Private Sub chkItem_Click(Index As Integer)

    If Index = 0 Then
        txtItem(Index).SetFocus
       ElseIf Index = 1 Then
         txtItem(Index).SetFocus
          ElseIf Index = 2 Then
           txtItem(Index).SetFocus
              ElseIf Index = 3 Then
               txtItem(Index).SetFocus
               ElseIf Index = 4 Then
                  txtItem(Index).SetFocus
   
End If
End Sub