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

📄 frmindata.frm

📁 数据连接程序放到数据库里
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Object = "{C932BA88-4374-101B-A56C-00AA003668DC}#1.1#0"; "MSMASK32.OCX"
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Begin VB.Form frmInData 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "动态查询"
   ClientHeight    =   7365
   ClientLeft      =   2700
   ClientTop       =   2400
   ClientWidth     =   8550
   ControlBox      =   0   'False
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   7365
   ScaleWidth      =   8550
   StartUpPosition =   2  '屏幕中心
   Begin VB.CommandButton cmdbutton 
      Caption         =   "删 除"
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   10.5
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   525
      Index           =   1
      Left            =   7095
      TabIndex        =   20
      Top             =   6060
      Width           =   1335
   End
   Begin MSFlexGridLib.MSFlexGrid MSFGrid 
      Height          =   4950
      Left            =   165
      TabIndex        =   19
      Top             =   930
      Width           =   8160
      _ExtentX        =   14393
      _ExtentY        =   8731
      _Version        =   393216
      Appearance      =   0
   End
   Begin VB.Frame Frame2 
      Height          =   750
      Left            =   150
      TabIndex        =   4
      Top             =   75
      Width           =   8145
      Begin VB.CommandButton cmdsearch 
         Caption         =   "查 询"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   420
         Left            =   6690
         TabIndex        =   9
         Top             =   165
         Width           =   1380
      End
      Begin MSComCtl2.DTPicker DTDate 
         Height          =   360
         Left            =   4725
         TabIndex        =   8
         Top             =   195
         Width           =   1770
         _ExtentX        =   3122
         _ExtentY        =   635
         _Version        =   393216
         Format          =   19660801
         CurrentDate     =   38228
      End
      Begin VB.ComboBox comFCode 
         Height          =   300
         Left            =   1185
         TabIndex        =   6
         Top             =   255
         Width           =   2460
      End
      Begin VB.Label Label2 
         AutoSize        =   -1  'True
         Caption         =   "日 期"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   210
         Left            =   3990
         TabIndex        =   7
         Top             =   285
         Width           =   525
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "基金代码"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   210
         Left            =   180
         TabIndex        =   5
         Top             =   315
         Width           =   840
      End
   End
   Begin VB.CommandButton cmdExit 
      Caption         =   "退 出"
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   10.5
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   525
      Left            =   7095
      TabIndex        =   3
      Top             =   6630
      Width           =   1335
   End
   Begin VB.CommandButton cmdClear 
      Caption         =   "清 除"
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   10.5
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   525
      Left            =   5730
      TabIndex        =   2
      Top             =   6645
      Width           =   1335
   End
   Begin VB.CommandButton cmdbutton 
      Caption         =   "保 存"
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   10.5
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   525
      Index           =   0
      Left            =   5715
      TabIndex        =   1
      Top             =   6060
      Width           =   1335
   End
   Begin VB.Frame Frame1 
      Height          =   1365
      Left            =   180
      TabIndex        =   0
      Top             =   5865
      Width           =   5385
      Begin MSMask.MaskEdBox MaskEdBox1 
         Height          =   375
         Left            =   1125
         TabIndex        =   18
         Top             =   930
         Width           =   1200
         _ExtentX        =   2117
         _ExtentY        =   661
         _Version        =   393216
         Format          =   "$#,##0.00;($#,##0.00)"
         PromptChar      =   "_"
      End
      Begin VB.ComboBox Combo2 
         Height          =   300
         Left            =   4470
         TabIndex        =   16
         Top             =   525
         Width           =   750
      End
      Begin VB.CommandButton Command1 
         Height          =   315
         Left            =   3090
         TabIndex        =   14
         Top             =   525
         Width           =   315
      End
      Begin VB.ComboBox Combo1 
         Height          =   300
         Left            =   1140
         TabIndex        =   13
         Top             =   525
         Width           =   1965
      End
      Begin MSComCtl2.DTPicker DTPicker 
         Height          =   360
         Left            =   1140
         TabIndex        =   11
         Top             =   135
         Width           =   1515
         _ExtentX        =   2672
         _ExtentY        =   635
         _Version        =   393216
         Format          =   19660801
         CurrentDate     =   38228
      End
      Begin VB.Label Label6 
         AutoSize        =   -1  'True
         Caption         =   "帐号余额"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   210
         Left            =   195
         TabIndex        =   17
         Top             =   1020
         Width           =   840
      End
      Begin VB.Label Label5 

⌨️ 快捷键说明

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