摘要:
'************************************************** '*过程名称:DT_PAFORMAL '*功能说明:员工类别 '************************************************** Public Function 阅读全文
摘要:
Private Sub PAPHOTO_SEL() Try Dim objCon As SqlConnection Dim objCmd As SqlCommand '打开数据库 objCon = New SqlConnection(PA001H_INSERT.strConn) objCon.Ope 阅读全文
摘要:
Private Sub BT_PHOTOADDRESS_Click(sender As Object, e As EventArgs) Handles BT_PHOTOADDRESS.Click Dim dvic As DataGridViewImageColumn = New DataGridVi 阅读全文
摘要:
Private Sub PAPHOTO_SAVE() Try If TxtPictureURL.Text.ToString <> "" Then Dim SQL_String As String = "" '定义SQL字符串 If PA001H_INSERT.Isexists(" LJPA005H" 阅读全文
摘要:
Private Sub BT_DPNO1_Click(sender As Object, e As EventArgs) Handles BT_DPNO1.Click Dim LJPA003H_SELECT As New LJPA003H.LJPA003H_SELECT With { .frmnam 阅读全文
摘要:
Private Sub BT_PHOTOADDRESS_Click(sender As Object, e As EventArgs) Handles BT_PHOTOADDRESS.Click Dim dvic As DataGridViewImageColumn = New DataGridVi 阅读全文
摘要:
Private Sub ToolStrip1_ItemClicked(sender As Object, e As ToolStripItemClickedEventArgs) Handles ToolStrip1.ItemClicked Select Case e.ClickedItem.Name 阅读全文
摘要:
ALTER TABLE LJPA001H DROP CONSTRAINT DF_LJPA001H_pa_sex_1 ALTER TABLE LJPA001H ALTER COLUMN pa_sex VARCHAR(1) 阅读全文