📄 工资结算_dm.frm
字号:
Else
Rs03!奖赔 = Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品数 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.9 - Rs03!欠交数))
Count = Count + Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品数 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.9 - Rs03!欠交数))
End If
ElseIf Rs01!成品率 = TS(20) * 1 Or Rs01!成品率 = TS(21) * 1 Or Rs01!成品率 = TS(22) Then
Rs03!实际废品 = Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.85
Rs03!差额1 = CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.85 - Rs03!欠交数)
If Rs01!原材料价 = 3 Or Rs01!原材料价 = 5 Then
Rs03!奖赔 = Rs01!原材料价 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.85 - Rs03!欠交数))
Count = Count + Rs01!原材料价 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.85 - Rs03!欠交数))
Else
Rs03!奖赔 = Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.85 - Rs03!欠交数))
Count = Count + Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.85 - Rs03!欠交数))
End If
Else
Rs03!实际废品 = Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.9 - Rs03!欠交数
Rs03!差额1 = CLng(Rs01!一废品率 / 100 * Rs03!领一级) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.9 - Rs03!欠交数)
If Rs01!原材料价 = 3 Or Rs01!原材料价 = 5 Then
Rs03!奖赔 = Rs01!原材料价 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 / 100 * Rs03!领二级) - Rs03!实际废品)
Count = Count + Rs01!原材料价 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 / 100 * Rs03!领二级) - Rs03!实际废品)
Else
Rs03!奖赔 = Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 / 100 * Rs03!领二级) - Rs03!实际废品)
Count = Count + Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 / 100 * Rs03!领二级) - Rs03!实际废品)
End If
End If
If Rs01!成品率 = TS(10) * 1 Or Rs01!成品率 = TS(11) * 1 Or Rs01!成品率 = TS(12) * 1 Or Rs01!成品率 = TS(13) * 1 Or Rs01!成品率 = TS(14) * 1 Or Rs01!成品率 = TS(15) * 1 Or Rs01!成品率 = TS(16) * 1 Or Rs01!成品率 = TS(17) * 1 Or Rs01!成品率 = TS(18) * 1 Or Rs01!成品率 = TS(19) * 1 Then
If Rs01!一级品价 * 1 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废) >= 0 Then
Rs03!金额2 = Rs01!一级品价 * 1 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废) * (-1)
Count = Count - Rs01!一级品价 * 1 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废)
Else
Rs03!金额2 = Rs01!一级品价 * 1 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废) * (-1)
Count = Count - Rs01!一级品价 * 1 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废)
''Rs03!金额2 = "0"
End If
Else
If Rs01!一级品价 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废) >= 0 Then
Rs03!金额2 = Rs01!一级品价 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废) * (-1)
Count = Count - Rs01!一级品价 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废)
Else
Rs03!金额2 = "0"
End If
End If
If ChkJe3.Value = 0 Then
If Rs01!原材料价 * Rs03!欠交数 >= 0 Then
If Rs01!原材料价 = 3 Or Rs01!原材料价 = 5 Then
Rs03!金额3 = Rs01!原材料价 * 2 * Rs03!欠交数 * (-1)
Count = Count - Rs01!原材料价 * 2 * Rs03!欠交数
Else
Rs03!金额3 = Rs01!原材料价 * 0.5 * Rs03!欠交数 * (-1)
Count = Count - Rs01!原材料价 * 0.5 * Rs03!欠交数
End If
Else
Rs03!金额3 = "0"
End If
Else
If Rs01!原材料价 = 3 Or Rs01!原材料价 = 5 Then
Rs03!金额3 = Rs01!原材料价 * 2 * Rs03!欠交数 * (-1)
Count = Count - Rs01!原材料价 * 2 * Rs03!欠交数
Else
Rs03!金额3 = Rs01!原材料价 * 0.5 * Rs03!欠交数 * (-1)
Count = Count - Rs01!原材料价 * 0.5 * Rs03!欠交数
End If
End If
Rs03!合计 = Count
Rs03.Update
Else
Count = "0.0"
Rs03!一级品价 = Rs01!一级品价
Rs03!二级品价 = Rs01!二级品价
Rs03!料质价 = Rs01!料质价
Rs03!金额1 = Rs01!一级品价 * Rs03!一级品 + Rs03!留用数 * Rs01!一级品价 + Rs01!二级品价 * Rs03!擦二级 + Rs01!二级品价 * Rs03!擦报废
Count = Rs01!一级品价 * Rs03!一级品 + Rs03!留用数 * Rs01!一级品价 + Rs01!二级品价 * Rs03!擦二级 + Rs01!二级品价 * Rs03!擦报废
Rs03!应交废品 = CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100)
Rs03!原材料价 = Rs01!原材料价
Rs03!应交正品 = CLng(Rs03!送检数 * Rs01!成品率 / 100)
Rs03!差额2 = CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废
If Rs01!成品率 = TS(0) * 1 Or Rs01!成品率 = TS(1) * 1 Or Rs01!成品率 = TS(2) * 1 Or Rs01!成品率 = TS(3) * 1 Or Rs01!成品率 = TS(4) * 1 Or Rs01!成品率 = TS(5) * 1 Or Rs01!成品率 = TS(6) * 1 Or Rs01!成品率 = TS(7) * 1 Or Rs01!成品率 = TS(8) * 1 Or Rs01!成品率 = TS(9) * 1 Then
Rs03!实际废品 = Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.9
Rs03!差额1 = CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品数 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.9 - Rs03!欠交数)
If Rs01!原材料价 = 3 Or Rs01!原材料价 = 5 Then
Rs03!奖赔 = Rs01!原材料价 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品数 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.9 - Rs03!欠交数))
Count = Count + Rs01!原材料价 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品数 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.9 - Rs03!欠交数))
Else
Rs03!奖赔 = Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品数 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.9 - Rs03!欠交数))
Count = Count + Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品数 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.9 - Rs03!欠交数))
End If
ElseIf Rs01!成品率 = TS(20) * 1 Or Rs01!成品率 = TS(21) * 1 Or Rs01!成品率 = TS(22) Then
Rs03!实际废品 = Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.85
Rs03!差额1 = CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.85 - Rs03!欠交数)
If Rs01!原材料价 = 3 Or Rs01!原材料价 = 5 Then
Rs03!奖赔 = Rs01!原材料价 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.85 - Rs03!欠交数))
Count = Count + Rs01!原材料价 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.85 - Rs03!欠交数))
Else
Rs03!奖赔 = Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.85 - Rs03!欠交数))
Count = Count + Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.85 - Rs03!欠交数))
End If
Else
Rs03!实际废品 = Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废 - Rs03!站二级 * 0.9 - Rs03!欠交数
Rs03!差额1 = CLng(Rs01!一废品率 / 100 * Rs03!领一级) + CLng(Rs01!二废品率 * Rs03!领二级 / 100) - (Rs03!领一级 + Rs03!领二级 - Rs03!一级品 - Rs03!留用数 - Rs03!站二级 - Rs03!站报废 - Rs03!擦二级 * 0.9 - Rs03!欠交数)
If Rs01!原材料价 = 3 Or Rs01!原材料价 = 5 Then
Rs03!奖赔 = Rs01!原材料价 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 / 100 * Rs03!领二级) - Rs03!实际废品)
Count = Count + Rs01!原材料价 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 / 100 * Rs03!领二级) - Rs03!实际废品)
Else
Rs03!奖赔 = Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 / 100 * Rs03!领二级) - Rs03!实际废品)
Count = Count + Rs01!原材料价 * 0.5 * (CLng(Rs01!一废品率 * Rs03!领一级 / 100) + CLng(Rs01!二废品率 / 100 * Rs03!领二级) - Rs03!实际废品)
End If
End If
If Rs01!成品率 = TS(10) * 1 Or Rs01!成品率 = TS(11) * 1 Or Rs01!成品率 = TS(12) * 1 Or Rs01!成品率 = TS(13) * 1 Or Rs01!成品率 = TS(14) * 1 Or Rs01!成品率 = TS(15) * 1 Or Rs01!成品率 = TS(16) * 1 Or Rs01!成品率 = TS(17) * 1 Or Rs01!成品率 = TS(18) * 1 Or Rs01!成品率 = TS(19) * 1 Then
If Rs01!一级品价 * 1 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废) >= 0 Then
Rs03!金额2 = Rs01!一级品价 * 1 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废) * (-1)
Count = Count - Rs01!一级品价 * 1 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废)
Else
Rs03!金额2 = Rs01!一级品价 * 1 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废) * (-1)
Count = Count - Rs01!一级品价 * 1 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废)
''Rs03!金额2 = "0"
End If
Else
If Rs01!一级品价 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废) >= 0 Then
Rs03!金额2 = Rs01!一级品价 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废) * (-1)
Count = Count - Rs01!一级品价 * (CLng(Rs03!送检数 * Rs01!成品率 / 100) - Rs03!一级品 - Rs03!留用数 - Rs03!擦二级 - Rs03!擦报废)
Else
Rs03!金额2 = "0"
End If
End If
If ChkJe3.Value = 0 Then
If Rs01!原材料价 * Rs03!欠交数 >= 0 Then
If Rs01!原材料价 = 3 Or Rs01!原材料价 = 5 Then
Rs03!金额3 = Rs01!原材料价 * 2 * Rs03!欠交数 * (-1)
Count = Count - Rs01!原材料价 * 2 * Rs03!欠交数
Else
Rs03!金额3 = Rs01!原材料价 * 0.5 * Rs03!欠交数 * (-1)
Count = Count - Rs01!原材料价 * 0.5 * Rs03!欠交数
End If
Else
Rs03!金额3 = "0"
End If
Else
If Rs01!原材料价 = 3 Or Rs01!原材料价 = 5 Then
Rs03!金额3 = Rs01!原材料价 * 2 * Rs03!欠交数 * (-1)
Count = Count - Rs01!原材料价 * 2 * Rs03!欠交数
Else
Rs03!金额3 = Rs01!原材料价 * 0.5 * Rs03!欠交数 * (-1)
Count = Count - Rs01!原材料价 * 0.5 * Rs03!欠交数
End If
End If
Rs03!合计 = Count
Rs03.Update
End If
Rs03.MoveNext
Loop
Rs03.Close
Rs01.MoveNext
Loop
Rs01.Close
CmdZnjs.Caption = "完成结算"
'====================
Call LoadTree
End Sub
Private Sub LoadTree()
'添加车间列表
Dim topNode As Node
Dim Rsb As ADODB.Recordset
Set Rsb = New ADODB.Recordset
Rsb.Open "select distinct 部门名称 from Gz_工资结算Dm where 方案名称='" & CmbJsfa.Text & "'", Cw_DataEnvi.DataConnect, adOpenStatic, adLockReadOnly, adCmdText
TV.Nodes.Clear
CmbBmmc.Clear
i = 0
Do While Not Rsb.EOF
Set topNode = TV.Nodes.Add(, , "A" & CStr(Rsb!部门名称), Rsb!部门名称, "Root")
topNode.Tag = Rsb!部门名称
CmbBmmc.AddItem Rsb!部门名称
LoadChild (Rsb!部门名称)
Rsb.MoveNext
Loop
If Rsb.State <> adStateClosed Then Rsb.Close
End Sub
Private Sub LoadChild(Lbj As String)
Dim child As Node
Dim Rsyg As ADODB.Recordset
Set Rsyg = New ADODB.Recordset
Rsyg.Open "select distinct 员工姓名 from Gz_工资结算Dm where 方案名称='" & CmbJsfa.Text & "' and 部门名称 = '" & Lbj & "'", Cw_DataEnvi.DataConnect, adOpenStatic, adLockReadOnly, adCmdText
Do While Not Rsyg.EOF
Set child = TV.Nodes.Add("A" & Lbj, tvwChild, "B" & CStr(i), Rsyg!员工姓名, "Child")
child.Tag = Rsyg!员工姓名
i = i + 1
Rsyg.MoveNext
Loop
If Rsyg.State <> adStateClosed Then Rsyg.Close
End Sub
Private Sub Form_Load()
Set RsFamc = New ADODB.Recordset
RsFamc.Open "select * from Gz_结算方案 order by 创建日期 desc", Cw_DataEnvi.DataConnect, adOpenStatic, adLockPessimistic, adCmdText
CmbJsfa.Clear
Do While Not RsFamc.EOF
CmbJsfa.AddItem RsFamc!方案名称
RsFamc.MoveNext
Loop
If RsFamc.State <> adStateClosed Then RsFamc.Close
Dim Rs As ADODB.Recordset
Set Rs = New ADODB.Recordset
Rs.Open "Gz_特征数据", Cw_DataEnvi.DataConnect, adOpenStatic, adLockPessimistic, adCmdTable
If Rs.BOF And Rs.EOF Then
MsgBox "工资_特征数据为空！", vbCritical, "错误提示"
Else
For i = 0 To 22
TS(i) = Rs.Fields(i)
Next i
End If
Rs.Close
End Sub
Private Sub tv_NodeClick(ByVal Node As MSComctlLib.Node)
On Error Resume Next
Dim txtSQLBJ As String
If Left(Node.Key, 1) = "B" Then
YGXM = Node.Tag
CJMC = Node.Parent.Tag
TxtSql = "select * from Gz_工资结算Dm where 方案名称='" & CmbJsfa.Text & "' and 部门名称 = '" & CJMC & "' and 员工姓名= '" & YGXM & "' order by 工序名称,图号,品名,规格"
Set Rstmp = New ADODB.Recordset
Rstmp.Open TxtSql, Cw_DataEnvi.DataConnect, adOpenStatic, adLockPessimistic, adCmdText
Set DGList.DataSource = Rstmp
' Rstmp.Close
' Set Rstmp = Nothing
OutTxt.Text = "C:\" & CmbJsfa.Text & CJMC & "-" & YGXM & "2.xls"
ElseIf Left(Node.Key, 1) = "A" Then
CJMC = Node.Tag
TxtSql = "select * from Gz_工资结算Dm where 方案名称='" & CmbJsfa.Text & "' and 部门名称 = '" & CJMC & "' order by 工序名称,图号,品名,规格"
Set Rstmp = New ADODB.Recordset
Rstmp.Open TxtSql, Cw_DataEnvi.DataConnect, adOpenStatic, adLockPessimistic, adCmdText
Set DGList.DataSource = Rstmp
' Rstmp.Close
' Set Rstmp = Nothing
OutTxt.Text = "C:\" & CmbJsfa.Text & "-" & combo2.Text & "2.xls"
End If
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -