代码搜索:VB
找到约 10,000 项符合「VB」的源代码
代码结果 10,000
www.eeworm.com/read/431844/8649614
vb frmsalaryedit.vb
Class FrmSalaryEdit
Inherits System.Windows.Forms.Form
Public OriEmpId As Short
Public TmpSfgz As Single
Private Sub Cmd_Cancel_Click(ByVal sender As System.Object, ByVal e As
www.eeworm.com/read/431844/8649617
vb frmsalaryman.vb
Friend Class FrmSalaryMan
Inherits System.Windows.Forms.Form
Private Sub CreateSalary()
Dim i As Object
Dim TmpMonth As String
Dim TmpTax As Single
Dim DayPay As Single '日工资
www.eeworm.com/read/431844/8649633
vb variable.vb
Module Variable
Public User As ClsUser
Public MyDep As New ClsDepartment
Public CurDep As New ClsDepartment
Public MyEmp As New ClsEmployees
Public CurEmp As New ClsEmployee
www.eeworm.com/read/431844/8649635
vb clssalaryrules.vb
Class ClsSalaryRules
'1 RuleType Int 规则类型,1 -迟到扣款(单位是元/次),2 -差旅补助(单位是元/天),3 -养老代扣系数,4 -基本医疗代扣系数,5 -失业保险代扣系数,6 -住房公积金代扣系数
'1 RuleAmount Decimal (10,2) 对应的金额或系数
Public RuleType As
www.eeworm.com/read/431844/8649653
vb frmdepsel.vb
Imports VB = Microsoft.VisualBasic
Friend Class FrmDepSel
Inherits System.Windows.Forms.Form
Private Sub Cmd_Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles
www.eeworm.com/read/431844/8649662
vb frmtrans.vb
Option Strict Off
Option Explicit On
Friend Class FrmTrans
Inherits System.Windows.Forms.Form
Public TmpOk As Boolean
Private Sub CmdCancel_Click(ByVal sender As System.Object, ByVal e A
www.eeworm.com/read/431844/8649663
vb clsexperience.vb
Class ClsExperience
'1 Id TinyInt Id
'2 Emp_Id Int 员工id号
'3 Start_Date Varchar 10 开始日期
'4 End_Date Varchar 10 终止日期
'5 School_Org Varchar 50 学校/单位
'6 Title Varch
www.eeworm.com/read/431844/8649697
vb frmexpedit.vb
Class FrmExpEdit
Inherits System.Windows.Forms.Form
Public Modify As Boolean '插入=false,修改=true
Public VarEmpId As Integer
Public OriId As Short
Private Sub Cmd_Cancel_Clic
www.eeworm.com/read/431844/8649700
vb frmuserman.vb
Public Class FrmUserMan
Private Sub BtOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtSaveEdit.Click
If Trim(TxtUserName.Text) = "" Then
www.eeworm.com/read/431844/8649712
vb frmfamilyman.vb
Class FrmFamilyMan
Inherits System.Windows.Forms.Form
Public OriEmpId As Short
Private Sub Cmd_Back_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cmd_B