📄 frmreaderdoc.vb
字号:
Me.txbNumber.Name = "txbNumber"
Me.txbNumber.Size = New System.Drawing.Size(88, 21)
Me.txbNumber.TabIndex = 3
Me.txbNumber.Text = ""
'
'Label5
'
Me.Label5.Location = New System.Drawing.Point(104, 13)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(56, 16)
Me.Label5.TabIndex = 2
Me.Label5.Text = "编号"
'
'txbCode
'
Me.txbCode.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "读者信息.条形码"))
Me.txbCode.Location = New System.Drawing.Point(8, 31)
Me.txbCode.Name = "txbCode"
Me.txbCode.Size = New System.Drawing.Size(88, 21)
Me.txbCode.TabIndex = 1
Me.txbCode.Text = ""
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(8, 13)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(56, 16)
Me.Label4.TabIndex = 0
Me.Label4.Text = "条形码"
'
'SqlDataAdapter1
'
Me.SqlDataAdapter1.DeleteCommand = Me.SqlDeleteCommand1
Me.SqlDataAdapter1.InsertCommand = Me.SqlInsertCommand1
Me.SqlDataAdapter1.SelectCommand = Me.SqlSelectCommand1
Me.SqlDataAdapter1.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "读者信息", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("条形码", "条形码"), New System.Data.Common.DataColumnMapping("编号", "编号"), New System.Data.Common.DataColumnMapping("姓名", "姓名"), New System.Data.Common.DataColumnMapping("性别", "性别"), New System.Data.Common.DataColumnMapping("类型", "类型"), New System.Data.Common.DataColumnMapping("有效证件", "有效证件"), New System.Data.Common.DataColumnMapping("证件号码", "证件号码"), New System.Data.Common.DataColumnMapping("联系方式", "联系方式"), New System.Data.Common.DataColumnMapping("登记日期", "登记日期"), New System.Data.Common.DataColumnMapping("有限期至", "有限期至"), New System.Data.Common.DataColumnMapping("是否挂失", "是否挂失"), New System.Data.Common.DataColumnMapping("图书借阅次数", "图书借阅次数"), New System.Data.Common.DataColumnMapping("期刊借阅次数", "期刊借阅次数"), New System.Data.Common.DataColumnMapping("操作员", "操作员"), New System.Data.Common.DataColumnMapping("出生日期", "出生日期"), New System.Data.Common.DataColumnMapping("备注", "备注")})})
Me.SqlDataAdapter1.UpdateCommand = Me.SqlUpdateCommand1
'
'SqlDeleteCommand1
'
Me.SqlDeleteCommand1.CommandText = "DELETE FROM 读者信息 WHERE (编号 = @Original_编号) AND (出生日期 = @Original_出生日期 OR @Origina" & _
"l_出生日期 IS NULL AND 出生日期 IS NULL) AND (图书借阅次数 = @Original_图书借阅次数 OR @Original_图书借" & _
"阅次数 IS NULL AND 图书借阅次数 IS NULL) AND (备注 = @Original_备注 OR @Original_备注 IS NULL A" & _
"ND 备注 IS NULL) AND (姓名 = @Original_姓名 OR @Original_姓名 IS NULL AND 姓名 IS NULL) AN" & _
"D (性别 = @Original_性别 OR @Original_性别 IS NULL AND 性别 IS NULL) AND (操作员 = @Origina" & _
"l_操作员 OR @Original_操作员 IS NULL AND 操作员 IS NULL) AND (是否挂失 = @Original_是否挂失) AND " & _
"(有效证件 = @Original_有效证件 OR @Original_有效证件 IS NULL AND 有效证件 IS NULL) AND (有限期至 = @" & _
"Original_有限期至 OR @Original_有限期至 IS NULL AND 有限期至 IS NULL) AND (期刊借阅次数 = @Origina" & _
"l_期刊借阅次数 OR @Original_期刊借阅次数 IS NULL AND 期刊借阅次数 IS NULL) AND (条形码 = @Original_条形" & _
"码 OR @Original_条形码 IS NULL AND 条形码 IS NULL) AND (登记日期 = @Original_登记日期 OR @Origi" & _
"nal_登记日期 IS NULL AND 登记日期 IS NULL) AND (类型 = @Original_类型) AND (联系方式 = @Original" & _
"_联系方式 OR @Original_联系方式 IS NULL AND 联系方式 IS NULL) AND (证件号码 = @Original_证件号码 OR " & _
"@Original_证件号码 IS NULL AND 证件号码 IS NULL)"
Me.SqlDeleteCommand1.Connection = Me.SqlConnection1
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_编号", System.Data.SqlDbType.VarChar, 20, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "编号", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_出生日期", System.Data.SqlDbType.DateTime, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "出生日期", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_图书借阅次数", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "图书借阅次数", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_备注", System.Data.SqlDbType.VarChar, 100, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "备注", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_姓名", System.Data.SqlDbType.VarChar, 20, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "姓名", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_性别", System.Data.SqlDbType.VarChar, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "性别", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_操作员", System.Data.SqlDbType.VarChar, 20, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "操作员", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_是否挂失", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "是否挂失", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_有效证件", System.Data.SqlDbType.VarChar, 60, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "有效证件", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_有限期至", System.Data.SqlDbType.DateTime, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "有限期至", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_期刊借阅次数", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "期刊借阅次数", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_条形码", System.Data.SqlDbType.VarChar, 40, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "条形码", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_登记日期", System.Data.SqlDbType.DateTime, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "登记日期", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_类型", System.Data.SqlDbType.VarChar, 20, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "类型", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_联系方式", System.Data.SqlDbType.VarChar, 100, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "联系方式", System.Data.DataRowVersion.Original, Nothing))
Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_证件号码", System.Data.SqlDbType.VarChar, 60, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "证件号码", System.Data.DataRowVersion.Original, Nothing))
'
'SqlConnection1
'
Me.SqlConnection1.ConnectionString = "workstation id=CS;packet size=4096;integrated security=SSPI;data source=CS;persis" & _
"t security info=False;initial catalog=libbook"
'
'SqlInsertCommand1
'
Me.SqlInsertCommand1.CommandText = "INSERT INTO 读者信息(条形码, 编号, 姓名, 性别, 类型, 有效证件, 证件号码, 联系方式, 登记日期, 有限期至, 是否挂失, 图书借阅次数," & _
" 期刊借阅次数, 操作员, 出生日期, 备注) VALUES (@条形码, @编号, @姓名, @性别, @类型, @有效证件, @证件号码, @联系方式, @" & _
"登记日期, @有限期至, @是否挂失, @图书借阅次数, @期刊借阅次数, @操作员, @出生日期, @备注); SELECT 条形码, 编号, 姓名, 性别," & _
" 类型, 有效证件, 证件号码, 联系方式, 登记日期, 有限期至, 是否挂失, 图书借阅次数, 期刊借阅次数, 操作员, 出生日期, 备注 FROM 读者信息" & _
" WHERE (编号 = @编号)"
Me.SqlInsertCommand1.Connection = Me.SqlConnection1
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@条形码", System.Data.SqlDbType.VarChar, 40, "条形码"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@编号", System.Data.SqlDbType.VarChar, 20, "编号"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@姓名", System.Data.SqlDbType.VarChar, 20, "姓名"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@性别", System.Data.SqlDbType.VarChar, 8, "性别"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@类型", System.Data.SqlDbType.VarChar, 20, "类型"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@有效证件", System.Data.SqlDbType.VarChar, 60, "有效证件"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@证件号码", System.Data.SqlDbType.VarChar, 60, "证件号码"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@联系方式", System.Data.SqlDbType.VarChar, 100, "联系方式"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@登记日期", System.Data.SqlDbType.DateTime, 4, "登记日期"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@有限期至", System.Data.SqlDbType.DateTime, 4, "有限期至"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@是否挂失", System.Data.SqlDbType.Bit, 1, "是否挂失"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@图书借阅次数", System.Data.SqlDbType.Int, 4, "图书借阅次数"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@期刊借阅次数", System.Data.SqlDbType.Int, 4, "期刊借阅次数"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@操作员", System.Data.SqlDbType.VarChar, 20, "操作员"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@出生日期", System.Data.SqlDbType.DateTime, 4, "出生日期"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@备注", System.Data.SqlDbType.VarChar, 100, "备注"))
'
'SqlSelectCommand1
'
Me.SqlSelectCommand1.CommandText = "SELECT 条形码, 编号, 姓名, 性别, 类型, 有效证件, 证件号码, 联系方式, 登记日期, 有限期至, 是否挂失, 图书借阅次数, 期刊借阅次数, 操" & _
"作员, 出生日期, 备注 FROM 读者信息"
Me.SqlSelectCommand1.Connection = Me.SqlConnection1
'
'SqlUpdateCommand1
'
Me.SqlUpdateCommand1.CommandText = "UPDATE 读者信息 SET 条形码 = @条形码, 编号 = @编号, 姓名 = @姓名, 性别 = @性别, 类型 = @类型, 有效证件 = @有效证件," & _
" 证件号码 = @证件号码, 联系方式 = @联系方式, 登记日期 = @登记日期, 有限期至 = @有限期至, 是否挂失 = @是否挂失, 图书借阅次数 = " & _
"@图书借阅次数, 期刊借阅次数 = @期刊借阅次数, 操作员 = @操作员, 出生日期 = @出生日期, 备注 = @备注 WHERE (编号 = @Origi" & _
"nal_编号) AND (出生日期 = @Original_出生日期 OR @Original_出生日期 IS NULL AND 出生日期 IS NULL) A" & _
"ND (图书借阅次数 = @Original_图书借阅次数 OR @Original_图书借阅次数 IS NULL AND 图书借阅次数 IS NULL) AN" & _
"D (备注 = @Original_备注 OR @Original_备注 IS NULL AND 备注 IS NULL) AND (姓名 = @Original" & _
"_姓名 OR @Original_姓名 IS NULL AND 姓名 IS NULL) AND (性别 = @Original_性别 OR @Original_" & _
"性别 IS NULL AND 性别 IS NULL) AND (操作员 = @Original_操作员 OR @Original_操作员 IS NULL AND" & _
" 操作员 IS NULL) AND (是否挂失 = @Original_是否挂失) AND (有效证件 = @Original_有效证件 OR @Origina" & _
"l_有效证件 IS NULL AND 有效证件 IS NULL) AND (有限期至 = @Original_有限期至 OR @Original_有限期至 IS" & _
" NULL AND 有限期至 IS NULL) AND (期刊借阅次数 = @Original_期刊借阅次数 OR @Original_期刊借阅次数 IS NU" & _
"LL AND 期刊借阅次数 IS NULL) AND (条形码 = @Original_条形码 OR @Original_条形码 IS NULL AND 条形码" & _
" IS NULL) AND (登记日期 = @Original_登记日期 OR @Original_登记日期 IS NULL AND 登记日期 IS NULL)" & _
" AND (类型 = @Original_类型) AND (联系方式 = @Original_联系方式 OR @Original_联系方式 IS NULL AN" & _
"D 联系方式 IS NULL) AND (证件号码 = @Original_证件号码 OR @Original_证件号码 IS NULL AND 证件号码 IS" & _
" NULL); SELECT 条形码, 编号, 姓名, 性别, 类型, 有效证件, 证件号码, 联系方式, 登记日期, 有限期至, 是否挂失, 图书借阅次数, " & _
"期刊借阅次数, 操作员, 出生日期, 备注 FROM 读者信息 WHERE (编号 = @编号)"
Me.SqlUpdateCommand1.Connection = Me.SqlConnection1
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@条形码", System.Data.SqlDbType.VarChar, 40, "条形码"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@编号", System.Data.SqlDbType.VarChar, 20, "编号"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@姓名", System.Data.SqlDbType.VarChar, 20, "姓名"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@性别", System.Data.SqlDbType.VarChar, 8, "性别"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@类型", System.Data.SqlDbType.VarChar, 20, "类型"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@有效证件", System.Data.SqlDbType.VarChar, 60, "有效证件"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@证件号码", System.Data.SqlDbType.VarChar, 60, "证件号码"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@联系方式", System.Data.SqlDbType.VarChar, 100, "联系方式"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@登记日期", System.Data.SqlDbType.DateTime, 4, "登记日期"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@有限期至", System.Data.SqlDbType.DateTime, 4, "有限期至"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@是否挂失", System.Data.SqlDbType.Bit, 1, "是否挂失"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@图书借阅次数", System.Data.SqlDbType.Int, 4, "图书借阅次数"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@期刊借阅次数", System.Data.SqlDbType.Int, 4, "期刊借阅次数"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@操作员", System.Data.SqlDbType.VarChar, 20, "操作员"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@出生日期", System.Data.SqlDbType.DateTime, 4, "出生日期"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@备注", System.Data.SqlDbType.VarChar, 100, "备注"))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_编号", System.Data.SqlDbType.VarChar, 20, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "编号", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_出生日期", System.Data.SqlDbType.DateTime, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "出生日期", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_图书借阅次数", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "图书借阅次数", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_备注", System.Data.SqlDbType.VarChar, 100, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "备注", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_姓名", System.Data.SqlDbType.VarChar, 20, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "姓名", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_性别", System.Data.SqlDbType.VarChar, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "性别", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_操作员", System.Data.SqlDbType.VarChar, 20, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "操作员", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_是否挂失", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "是否挂失", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_有效证件", System.Data.SqlDbType.VarChar, 60, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "有效证件", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_有限期至", System.Data.SqlDbType.DateTime, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "有限期至", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_期刊借阅次数", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "期刊借阅次数", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_条形码", System.Data.SqlDbType.VarChar, 40, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "条形码", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_登记日期", System.Data.SqlDbType.DateTime, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "登记日期", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_类型", System.Data.SqlDbType.VarChar, 20, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "类型", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_联系方式", System.Data.SqlDbType.VarChar, 100, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "联系方式", System.Data.DataRowVersion.Original, Nothing))
Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_证件号码", System.Data.SqlDbType.VarChar, 60, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "证件号码", System.Data.DataRowVersion.Original, Nothing))
'
'cbbGuaShi
'
Me.cbbGuaShi.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Me.DataSet11, "读者信息.是否挂失"))
Me.cbbGuaShi.Location = New System.Drawing.Point(512, 28)
Me.cbbGuaShi.Name = "cbbGuaShi"
Me.cbbGuaShi.Size = New System.Drawing.Size(80, 24)
Me.cbbGuaShi.TabIndex = 28
Me.cbbGuaShi.Text = "是否挂失"
'
'frmReaderDoc
'
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
Me.ClientSize = New System.Drawing.Size(608, 317)
Me.Controls.Add(Me.GroupBox1)
Me.Name = "frmReaderDoc"
Me.Controls.SetChildIndex(Me.GroupBox1, 0)
Me.GroupBox1.ResumeLayout(False)
CType(Me.DataSet11, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -