frmmain.vb

Visual Basic Oracle数据库联接

        Me.tabOfficeDemo.Appearance = CType(resources.GetObject("tabOfficeDemo.Appearance"), System.Windows.Forms.TabAppearance)
        Me.tabOfficeDemo.BackgroundImage = CType(resources.GetObject("tabOfficeDemo.BackgroundImage"), System.Drawing.Image)
        Me.tabOfficeDemo.Controls.AddRange(New System.Windows.Forms.Control() {Me.pgeInvoice, Me.pgeInventory, Me.pgeExcel})
        Me.tabOfficeDemo.Dock = CType(resources.GetObject("tabOfficeDemo.Dock"), System.Windows.Forms.DockStyle)
        Me.tabOfficeDemo.Enabled = CType(resources.GetObject("tabOfficeDemo.Enabled"), Boolean)
        Me.tabOfficeDemo.Font = CType(resources.GetObject("tabOfficeDemo.Font"), System.Drawing.Font)
        Me.tabOfficeDemo.ImeMode = CType(resources.GetObject("tabOfficeDemo.ImeMode"), System.Windows.Forms.ImeMode)
        Me.tabOfficeDemo.ItemSize = CType(resources.GetObject("tabOfficeDemo.ItemSize"), System.Drawing.Size)
        Me.tabOfficeDemo.Location = CType(resources.GetObject("tabOfficeDemo.Location"), System.Drawing.Point)
        Me.tabOfficeDemo.Name = "tabOfficeDemo"
        Me.tabOfficeDemo.Padding = CType(resources.GetObject("tabOfficeDemo.Padding"), System.Drawing.Point)
        Me.tabOfficeDemo.RightToLeft = CType(resources.GetObject("tabOfficeDemo.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.tabOfficeDemo.SelectedIndex = 0
        Me.tabOfficeDemo.ShowToolTips = CType(resources.GetObject("tabOfficeDemo.ShowToolTips"), Boolean)
        Me.tabOfficeDemo.Size = CType(resources.GetObject("tabOfficeDemo.Size"), System.Drawing.Size)
        Me.tabOfficeDemo.TabIndex = CType(resources.GetObject("tabOfficeDemo.TabIndex"), Integer)
        Me.tabOfficeDemo.Text = resources.GetString("tabOfficeDemo.Text")
        Me.tabOfficeDemo.Visible = CType(resources.GetObject("tabOfficeDemo.Visible"), Boolean)
        '
        'pgeInvoice
        '
        Me.pgeInvoice.AccessibleDescription = resources.GetString("pgeInvoice.AccessibleDescription")
        Me.pgeInvoice.AccessibleName = resources.GetString("pgeInvoice.AccessibleName")
        Me.pgeInvoice.Anchor = CType(resources.GetObject("pgeInvoice.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.pgeInvoice.AutoScroll = CType(resources.GetObject("pgeInvoice.AutoScroll"), Boolean)
        Me.pgeInvoice.AutoScrollMargin = CType(resources.GetObject("pgeInvoice.AutoScrollMargin"), System.Drawing.Size)
        Me.pgeInvoice.AutoScrollMinSize = CType(resources.GetObject("pgeInvoice.AutoScrollMinSize"), System.Drawing.Size)
        Me.pgeInvoice.BackColor = System.Drawing.SystemColors.Control
        Me.pgeInvoice.BackgroundImage = CType(resources.GetObject("pgeInvoice.BackgroundImage"), System.Drawing.Image)
        Me.pgeInvoice.Controls.AddRange(New System.Windows.Forms.Control() {Me.btnEdList1, Me.lstCustomers, Me.Label3, Me.lstProducts, Me.GroupBox1, Me.btnAdd, Me.Label2})
        Me.pgeInvoice.Dock = CType(resources.GetObject("pgeInvoice.Dock"), System.Windows.Forms.DockStyle)
        Me.pgeInvoice.Enabled = CType(resources.GetObject("pgeInvoice.Enabled"), Boolean)
        Me.pgeInvoice.Font = CType(resources.GetObject("pgeInvoice.Font"), System.Drawing.Font)
        Me.pgeInvoice.ImageIndex = CType(resources.GetObject("pgeInvoice.ImageIndex"), Integer)
        Me.pgeInvoice.ImeMode = CType(resources.GetObject("pgeInvoice.ImeMode"), System.Windows.Forms.ImeMode)
        Me.pgeInvoice.Location = CType(resources.GetObject("pgeInvoice.Location"), System.Drawing.Point)
        Me.pgeInvoice.Name = "pgeInvoice"
        Me.pgeInvoice.RightToLeft = CType(resources.GetObject("pgeInvoice.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.pgeInvoice.Size = CType(resources.GetObject("pgeInvoice.Size"), System.Drawing.Size)
        Me.pgeInvoice.TabIndex = CType(resources.GetObject("pgeInvoice.TabIndex"), Integer)
        Me.pgeInvoice.Text = resources.GetString("pgeInvoice.Text")
        Me.pgeInvoice.ToolTipText = resources.GetString("pgeInvoice.ToolTipText")
        Me.pgeInvoice.Visible = CType(resources.GetObject("pgeInvoice.Visible"), Boolean)
        '
        'btnEdList1
        '
        Me.btnEdList1.AccessibleDescription = CType(resources.GetObject("btnEdList1.AccessibleDescription"), String)
        Me.btnEdList1.AccessibleName = CType(resources.GetObject("btnEdList1.AccessibleName"), String)
        Me.btnEdList1.Anchor = CType(resources.GetObject("btnEdList1.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.btnEdList1.BackgroundImage = CType(resources.GetObject("btnEdList1.BackgroundImage"), System.Drawing.Image)
        Me.btnEdList1.Dock = CType(resources.GetObject("btnEdList1.Dock"), System.Windows.Forms.DockStyle)
        Me.btnEdList1.Enabled = CType(resources.GetObject("btnEdList1.Enabled"), Boolean)
        Me.btnEdList1.FlatStyle = CType(resources.GetObject("btnEdList1.FlatStyle"), System.Windows.Forms.FlatStyle)
        Me.btnEdList1.Font = CType(resources.GetObject("btnEdList1.Font"), System.Drawing.Font)
        Me.btnEdList1.Image = CType(resources.GetObject("btnEdList1.Image"), System.Drawing.Image)
        Me.btnEdList1.ImageAlign = CType(resources.GetObject("btnEdList1.ImageAlign"), System.Drawing.ContentAlignment)
        Me.btnEdList1.ImageIndex = CType(resources.GetObject("btnEdList1.ImageIndex"), Integer)
        Me.btnEdList1.ImeMode = CType(resources.GetObject("btnEdList1.ImeMode"), System.Windows.Forms.ImeMode)
        Me.btnEdList1.Location = CType(resources.GetObject("btnEdList1.Location"), System.Drawing.Point)
        Me.btnEdList1.Name = "btnEdList1"
        Me.btnEdList1.RightToLeft = CType(resources.GetObject("btnEdList1.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.btnEdList1.Size = CType(resources.GetObject("btnEdList1.Size"), System.Drawing.Size)
        Me.btnEdList1.TabIndex = CType(resources.GetObject("btnEdList1.TabIndex"), Integer)
        Me.btnEdList1.Text = resources.GetString("btnEdList1.Text")
        Me.btnEdList1.TextAlign = CType(resources.GetObject("btnEdList1.TextAlign"), System.Drawing.ContentAlignment)
        Me.btnEdList1.Visible = CType(resources.GetObject("btnEdList1.Visible"), Boolean)
        '
        'lstCustomers
        '
        Me.lstCustomers.AccessibleDescription = CType(resources.GetObject("lstCustomers.AccessibleDescription"), String)
        Me.lstCustomers.AccessibleName = CType(resources.GetObject("lstCustomers.AccessibleName"), String)
        Me.lstCustomers.Anchor = CType(resources.GetObject("lstCustomers.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lstCustomers.BackColor = System.Drawing.Color.WhiteSmoke
        Me.lstCustomers.BackgroundImage = CType(resources.GetObject("lstCustomers.BackgroundImage"), System.Drawing.Image)
        Me.lstCustomers.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.lstCustomers.ColumnWidth = CType(resources.GetObject("lstCustomers.ColumnWidth"), Integer)
        Me.lstCustomers.Dock = CType(resources.GetObject("lstCustomers.Dock"), System.Windows.Forms.DockStyle)
        Me.lstCustomers.Enabled = CType(resources.GetObject("lstCustomers.Enabled"), Boolean)
        Me.lstCustomers.Font = CType(resources.GetObject("lstCustomers.Font"), System.Drawing.Font)
        Me.lstCustomers.HorizontalExtent = CType(resources.GetObject("lstCustomers.HorizontalExtent"), Integer)
        Me.lstCustomers.HorizontalScrollbar = CType(resources.GetObject("lstCustomers.HorizontalScrollbar"), Boolean)
        Me.lstCustomers.ImeMode = CType(resources.GetObject("lstCustomers.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lstCustomers.IntegralHeight = CType(resources.GetObject("lstCustomers.IntegralHeight"), Boolean)
        Me.lstCustomers.Location = CType(resources.GetObject("lstCustomers.Location"), System.Drawing.Point)
        Me.lstCustomers.Name = "lstCustomers"
        Me.lstCustomers.RightToLeft = CType(resources.GetObject("lstCustomers.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lstCustomers.ScrollAlwaysVisible = CType(resources.GetObject("lstCustomers.ScrollAlwaysVisible"), Boolean)
        Me.lstCustomers.Size = CType(resources.GetObject("lstCustomers.Size"), System.Drawing.Size)
        Me.lstCustomers.Sorted = True
        Me.lstCustomers.TabIndex = CType(resources.GetObject("lstCustomers.TabIndex"), Integer)
        Me.lstCustomers.Visible = CType(resources.GetObject("lstCustomers.Visible"), Boolean)
        '
        'Label3
        '
        Me.Label3.AccessibleDescription = resources.GetString("Label3.AccessibleDescription")
        Me.Label3.AccessibleName = resources.GetString("Label3.AccessibleName")
        Me.Label3.Anchor = CType(resources.GetObject("Label3.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.Label3.AutoSize = CType(resources.GetObject("Label3.AutoSize"), Boolean)
        Me.Label3.Dock = CType(resources.GetObject("Label3.Dock"), System.Windows.Forms.DockStyle)
        Me.Label3.Enabled = CType(resources.GetObject("Label3.Enabled"), Boolean)
        Me.Label3.Font = CType(resources.GetObject("Label3.Font"), System.Drawing.Font)
        Me.Label3.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label3.Image = CType(resources.GetObject("Label3.Image"), System.Drawing.Image)
        Me.Label3.ImageAlign = CType(resources.GetObject("Label3.ImageAlign"), System.Drawing.ContentAlignment)
        Me.Label3.ImageIndex = CType(resources.GetObject("Label3.ImageIndex"), Integer)
        Me.Label3.ImeMode = CType(resources.GetObject("Label3.ImeMode"), System.Windows.Forms.ImeMode)
        Me.Label3.Location = CType(resources.GetObject("Label3.Location"), System.Drawing.Point)
        Me.Label3.Name = "Label3"
        Me.Label3.RightToLeft = CType(resources.GetObject("Label3.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.Label3.Size = CType(resources.GetObject("Label3.Size"), System.Drawing.Size)
        Me.Label3.TabIndex = CType(resources.GetObject("Label3.TabIndex"), Integer)
        Me.Label3.Text = resources.GetString("Label3.Text")
        Me.Label3.TextAlign = CType(resources.GetObject("Label3.TextAlign"), System.Drawing.ContentAlignment)
        Me.Label3.Visible = CType(resources.GetObject("Label3.Visible"), Boolean)
        '
        'lstProducts
        '
        Me.lstProducts.AccessibleDescription = CType(resources.GetObject("lstProducts.AccessibleDescription"), String)
        Me.lstProducts.AccessibleName = CType(resources.GetObject("lstProducts.AccessibleName"), String)
        Me.lstProducts.Anchor = CType(resources.GetObject("lstProducts.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lstProducts.BackColor = System.Drawing.Color.WhiteSmoke
        Me.lstProducts.BackgroundImage = CType(resources.GetObject("lstProducts.BackgroundImage"), System.Drawing.Image)
        Me.lstProducts.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.lstProducts.ColumnWidth = CType(resources.GetObject("lstProducts.ColumnWidth"), Integer)
        Me.lstProducts.Dock = CType(resources.GetObject("lstProducts.Dock"), System.Windows.Forms.DockStyle)
        Me.lstProducts.Enabled = CType(resources.GetObject("lstProducts.Enabled"), Boolean)
        Me.lstProducts.Font = CType(resources.GetObject("lstProducts.Font"), System.Drawing.Font)
        Me.lstProducts.HorizontalExtent = CType(resources.GetObject("lstProducts.HorizontalExtent"), Integer)
        Me.lstProducts.HorizontalScrollbar = CType(resources.GetObject("lstProducts.HorizontalScrollbar"), Boolean)
        Me.lstProducts.ImeMode = CType(resources.GetObject("lstProducts.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lstProducts.IntegralHeight = CType(resources.GetObject("lstProducts.IntegralHeight"), Boolean)
        Me.lstProducts.Location = CType(resources.GetObject("lstProducts.Location"), System.Drawing.Point)
        Me.lstProducts.Name = "lstProducts"
        Me.lstProducts.RightToLeft = CType(resources.GetObject("lstProducts.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lstProducts.ScrollAlwaysVisible = CType(resources.GetObject("lstProducts.ScrollAlwaysVisible"), Boolean)
        Me.lstProducts.Size = CType(resources.GetObject("lstProducts.Size"), System.Drawing.Size)
        Me.lstProducts.TabIndex = CType(resources.GetObject("lstProducts.TabIndex"), Integer)
        Me.lstProducts.Visible = CType(resources.GetObject("lstProducts.Visible"), Boolean)
        '
        'GroupBox1
        '
        Me.GroupBox1.AccessibleDescription = resources.GetString("GroupBox1.AccessibleDescription")
        Me.GroupBox1.AccessibleName = resources.GetString("GroupBox1.AccessibleName")
        Me.GroupBox1.Anchor = CType(resources.GetObject("GroupBox1.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.GroupBox1.BackgroundImage = CType(resources.GetObject("GroupBox1.BackgroundImage"), System.Drawing.Image)
        Me.GroupBox1.ContextMenu = Me.ContextMenu1
        Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.LinkLabel1, Me.grdInvoice})
        Me.GroupBox1.Dock = CType(resources.GetObject("GroupBox1.Dock"), System.Windows.Forms.DockStyle)
        Me.GroupBox1.Enabled = CType(resources.GetObject("GroupBox1.Enabled"), Boolean)
        Me.GroupBox1.Font = CType(resources.GetObject("GroupBox1.Font"), System.Drawing.Font)
        Me.GroupBox1.ImeMode = CType(resources.GetObject("GroupBox1.ImeMode"), System.Windows.Forms.ImeMode)
        Me.GroupBox1.Location = CType(resources.GetObject("GroupBox1.Location"), System.Drawing.Point)
        Me.GroupBox1.Name = "GroupBox1"
        Me.GroupBox1.RightToLeft = CType(resources.GetObject("GroupBox1.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.GroupBox1.Size = CType(resources.GetObject("GroupBox1.Size"), System.Drawing.Size)
        Me.GroupBox1.TabIndex = CType(resources.GetObject("GroupBox1.TabIndex"), Integer)
        Me.GroupBox1.TabStop = False
        Me.GroupBox1.Text = resources.GetString("GroupBox1.Text")
        Me.GroupBox1.Visible = CType(resources.GetObject("GroupBox1.Visible"), Boolean)
        '
        'ContextMenu1
        '
        Me.ContextMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.ctxEdit, Me.ctxPPrv, Me.ctxPrnt})
        Me.ContextMenu1.RightToLeft = CType(resources.GetObject("ContextMenu1.RightToLeft"), System.Windows.Forms.RightToLeft)
        '
        'ctxEdit
        '
        Me.ctxEdit.Enabled = CType(resources.GetObject("ctxEdit.Enabled"), Boolean)
        Me.ctxEdit.Index = 0
        Me.ctxEdit.Shortcut = CType(resources.GetObject("ctxEdit.Shortcut"), System.Windows.Forms.Shortcut)
        Me.ctxEdit.ShowShortcut = CType(resources.GetObject("ctxEdit.ShowShortcut"), Boolean)
        Me.ctxEdit.Text = resources.GetString("ctxEdit.Text")
        Me.ctxEdit.Visible = CType(resources.GetObject("ctxEdit.Visible"), Boolean)
        '
        'ctxPPrv
        '