dunestorm/GBM
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Moved strings to resource (frmAddWizard)

Browse Source
This commit is contained in:
Michael J. Seiferling
2015-12-22 13:31:15 -06:00
parent 83e14a20ad
commit 96ca94a3ac
5 changed files with 1009 additions and 240 deletions
Download Patch File Download Diff File Expand all files Collapse all files
GBM/Managers/mgrCommon.vb
+4 -4
View File
@@ -188,16 +188,16 @@ Public Class mgrCommon
Next
ElseIf TypeOf ctl Is Label Then
sResource &= sFormName & "_" & ctl.Name & vbTab & ctl.Text & vbCrLf
sCode &= ctl.Name & ".Text = My.Resources." & sFormName & "_" & ctl.Name & vbCrLf
sCode &= ctl.Name & ".Text = " & sFormName & "_" & ctl.Name & vbCrLf
ElseIf TypeOf ctl Is Button Then
sResource &= sFormName & "_" & ctl.Name & vbTab & ctl.Text & vbCrLf
sCode &= ctl.Name & ".Text = My.Resources." & sFormName & "_" & ctl.Name & vbCrLf
sCode &= ctl.Name & ".Text = " & sFormName & "_" & ctl.Name & vbCrLf
ElseIf TypeOf ctl Is RadioButton Then
sResource &= sFormName & "_" & ctl.Name & vbTab & ctl.Text & vbCrLf
sCode &= ctl.Name & ".Text = My.Resources." & sFormName & "_" & ctl.Name & vbCrLf
sCode &= ctl.Name & ".Text = " & sFormName & "_" & ctl.Name & vbCrLf
ElseIf TypeOf ctl Is CheckBox Then
sResource &= sFormName & "_" & ctl.Name & vbTab & ctl.Text & vbCrLf
sCode &= ctl.Name & ".Text = My.Resources." & sFormName & "_" & ctl.Name & vbCrLf
sCode &= ctl.Name & ".Text = " & sFormName & "_" & ctl.Name & vbCrLf
End If
Next
End Sub