From 4d805c7d174c7c3d4b4bb0f8dbf3cdcb2ed015b7 Mon Sep 17 00:00:00 2001 From: Yami An Date: Wed, 9 Nov 2022 16:06:56 +0700 Subject: [PATCH] edit name. info, add hint --- Rebar Weight/Control/FrmMain.Designer.vb | 4 ++++ Rebar Weight/Control/FrmMain.vb | 18 +++++++++--------- Rebar Weight/My Project/Resources.resx | 6 +++--- 3 files changed, 16 insertions(+), 12 deletions(-) diff --git a/Rebar Weight/Control/FrmMain.Designer.vb b/Rebar Weight/Control/FrmMain.Designer.vb index e23fb7b..3a440ca 100644 --- a/Rebar Weight/Control/FrmMain.Designer.vb +++ b/Rebar Weight/Control/FrmMain.Designer.vb @@ -235,6 +235,7 @@ Partial Class FrmMain Me.nudDeg.Size = New System.Drawing.Size(100, 20) Me.nudDeg.TabIndex = 1 Me.nudDeg.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + Me.tipMain.SetToolTip(Me.nudDeg, "R") Me.nudDeg.Value = New Decimal(New Integer() {45, 0, 0, 0}) ' 'lblDeg @@ -270,6 +271,7 @@ Partial Class FrmMain Me.nudH.TabIndex = 1 Me.nudH.TextAlign = System.Windows.Forms.HorizontalAlignment.Center Me.nudH.ThousandsSeparator = True + Me.tipMain.SetToolTip(Me.nudH, "H") Me.nudH.Value = New Decimal(New Integer() {100, 0, 0, 0}) ' 'lblH @@ -319,6 +321,7 @@ Partial Class FrmMain Me.nudL.TabIndex = 1 Me.nudL.TextAlign = System.Windows.Forms.HorizontalAlignment.Center Me.nudL.ThousandsSeparator = True + Me.tipMain.SetToolTip(Me.nudL, "L") Me.nudL.Value = New Decimal(New Integer() {5500, 0, 0, 0}) ' 'lblL @@ -350,6 +353,7 @@ Partial Class FrmMain Me.nudD.Size = New System.Drawing.Size(100, 20) Me.nudD.TabIndex = 1 Me.nudD.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + Me.tipMain.SetToolTip(Me.nudD, "D") Me.nudD.Value = New Decimal(New Integer() {16, 0, 0, 0}) ' 'lblD diff --git a/Rebar Weight/Control/FrmMain.vb b/Rebar Weight/Control/FrmMain.vb index f5e8cc4..9f53eb1 100644 --- a/Rebar Weight/Control/FrmMain.vb +++ b/Rebar Weight/Control/FrmMain.vb @@ -137,7 +137,7 @@ Public Class FrmMain Select Case e.KeyCode Case Space e.SuppressKeyPress = True - ResetL() + RstL() Case D0 To D9, NumPad0 To NumPad9 _lock = False End Select @@ -153,7 +153,7 @@ Public Class FrmMain Dim l = Integer.Parse(str) _l += l If _l > L_MAX Then - LimitL() + LmtL() Else e.SuppressKeyPress = True DispRsltL(l) @@ -168,7 +168,7 @@ Public Class FrmMain Dim l = nudL.Value _l += l If _l > L_MAX Then - LimitL() + LmtL() Else e.SuppressKeyPress = True DispRsltL(l) @@ -178,7 +178,7 @@ Public Class FrmMain nudL.Value = _l nudL.Text = String.Format("{0:n0}", _l) nudL.Select(0, nudL.Text.Length) - SemiResetL() + SemiRstL() End If End If End If @@ -224,25 +224,25 @@ Public Class FrmMain End Sub ' Semi reset L - Private Sub SemiResetL() + Private Sub SemiRstL() _bending = False _l = 0 _sL = "" End Sub ' Reset L - Private Sub ResetL() + Private Sub RstL() _lock = False - SemiResetL() + SemiRstL() nudL.ResetText() End Sub ' Limit L - Private Sub LimitL() + Private Sub LmtL() lblRsltL.Text = "LIMIT" lblRsltM.Text = "-----" lblRsltY.Text = "-----" - ResetL() + RstL() End Sub #End Region End Class \ No newline at end of file diff --git a/Rebar Weight/My Project/Resources.resx b/Rebar Weight/My Project/Resources.resx index c046740..2f86d53 100644 --- a/Rebar Weight/My Project/Resources.resx +++ b/Rebar Weight/My Project/Resources.resx @@ -119,7 +119,7 @@ Rebar Weight - tến phần mềm + tên phần mềm 鉄筋重量 @@ -146,7 +146,7 @@ https://raw.githubusercontent.com/Tynab/Tynab/main/app/Rebar%20Weight - đường dẫn tải phần mềm trên pastebin + đường dẫn tải phần mềm trên server https://www.google.com/ @@ -154,6 +154,6 @@ https://raw.githubusercontent.com/Tynab/Tynab/main/ver/Rebar%20Weight - đường dẫn kiểm tra phiên bản trên pastebin + đường dẫn kiểm tra phiên bản trên server \ No newline at end of file