Piece Work C Visual Studio BASIC
jvlieti4440
juliet_mercado_piece_work_b.zipPieceWorkPayments.sln
Microsoft Visual Studio Solution File, Format Version 12.00 # Visual Studio 14 VisualStudioVersion = 14.0.25420.1 MinimumVisualStudioVersion = 10.0.40219.1 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "PieceWorkPayments_B", "PieceWorkPayments\PieceWorkPayments_B.vbproj", "{F29F944B-8D8B-4114-B2E0-D31C8DA10AA1}" EndProject Global GlobalSection(SolutionConfigurationPlatforms) = preSolution Debug|Any CPU = Debug|Any CPU Release|Any CPU = Release|Any CPU EndGlobalSection GlobalSection(ProjectConfigurationPlatforms) = postSolution {F29F944B-8D8B-4114-B2E0-D31C8DA10AA1}.Debug|Any CPU.ActiveCfg = Debug|Any CPU {F29F944B-8D8B-4114-B2E0-D31C8DA10AA1}.Debug|Any CPU.Build.0 = Debug|Any CPU {F29F944B-8D8B-4114-B2E0-D31C8DA10AA1}.Release|Any CPU.ActiveCfg = Release|Any CPU {F29F944B-8D8B-4114-B2E0-D31C8DA10AA1}.Release|Any CPU.Build.0 = Release|Any CPU EndGlobalSection GlobalSection(SolutionProperties) = preSolution HideSolutionNode = FALSE EndGlobalSection EndGlobal
PieceWorkPayments/App.config
PieceWorkPayments/bin/Debug/PieceWorkPayments.exe
PieceWorkPayments/bin/Debug/PieceWorkPayments.exe.config
PieceWorkPayments/bin/Debug/PieceWorkPayments.pdb
PieceWorkPayments/bin/Debug/PieceWorkPayments.vshost.exe
PieceWorkPayments/bin/Debug/PieceWorkPayments.vshost.exe.config
PieceWorkPayments/bin/Debug/PieceWorkPayments.vshost.exe.manifest
PieceWorkPayments/bin/Debug/PieceWorkPayments.xml
PieceWorkPayments A strongly-typed resource class, for looking up localized strings, etc. Returns the cached ResourceManager instance used by this class. Overrides the current thread's CurrentUICulture property for all resource lookups using this strongly typed resource class. Looks up a localized resource of type System.Drawing.Bitmap. Looks up a localized resource of type System.Drawing.Bitmap. Looks up a localized resource of type System.Drawing.Bitmap. Looks up a localized resource of type System.Drawing.Bitmap. Looks up a localized resource of type System.Drawing.Bitmap. Looks up a localized resource of type System.Drawing.Bitmap.
PieceWorkPayments/Form1.Designer.vb
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ Partial Class Form1 Inherits System.Windows.Forms.Form 'Form overrides dispose to clean up the component list. <System.Diagnostics.DebuggerNonUserCode()> _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Required by the Windows Form Designer Private components As System.ComponentModel.IContainer 'NOTE: The following procedure is required by the Windows Form Designer 'It can be modified using the Windows Form Designer. 'Do not modify it using the code editor. <System.Diagnostics.DebuggerStepThrough()> _ Private Sub InitializeComponent() Me.Label1 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label() Me.emName = New System.Windows.Forms.TextBox() Me.pieces = New System.Windows.Forms.TextBox() Me.totalPaid = New System.Windows.Forms.Label() Me.averagePaid = New System.Windows.Forms.Label() Me.clearInput = New System.Windows.Forms.Button() Me.summBtn = New System.Windows.Forms.Button() Me.calcBtn = New System.Windows.Forms.Button() Me.PictureBox1 = New System.Windows.Forms.PictureBox() Me.msgLbl = New System.Windows.Forms.Label() Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() Me.FIleToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ExitToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ClearToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ClearAllToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.AboutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() Me.MenuStrip1.SuspendLayout() Me.SuspendLayout() ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label1.Location = New System.Drawing.Point(97, 34) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(271, 29) Me.Label1.TabIndex = 1 Me.Label1.Text = "Employee Piece Work" ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Location = New System.Drawing.Point(12, 92) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(84, 13) Me.Label2.TabIndex = 2 Me.Label2.Text = "Employee Name" ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Font = New System.Drawing.Font("Calibri", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label3.Location = New System.Drawing.Point(130, 63) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(199, 23) Me.Label3.TabIndex = 3 Me.Label3.Text = "Rate Per piece :$0.5525" ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Location = New System.Drawing.Point(12, 124) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(68, 13) Me.Label4.TabIndex = 4 Me.Label4.Text = "Pieces Done" ' 'emName ' Me.emName.Location = New System.Drawing.Point(102, 89) Me.emName.Name = "emName" Me.emName.Size = New System.Drawing.Size(244, 20) Me.emName.TabIndex = 5 ' 'pieces ' Me.pieces.Location = New System.Drawing.Point(103, 121) Me.pieces.Name = "pieces" Me.pieces.Size = New System.Drawing.Size(244, 20) Me.pieces.TabIndex = 6 ' 'totalPaid ' Me.totalPaid.AutoSize = True Me.totalPaid.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.totalPaid.Location = New System.Drawing.Point(399, 221) Me.totalPaid.Name = "totalPaid" Me.totalPaid.Size = New System.Drawing.Size(0, 13) Me.totalPaid.TabIndex = 16 ' 'averagePaid ' Me.averagePaid.AutoSize = True Me.averagePaid.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.averagePaid.Location = New System.Drawing.Point(399, 243) Me.averagePaid.Name = "averagePaid" Me.averagePaid.Size = New System.Drawing.Size(0, 13) Me.averagePaid.TabIndex = 17 ' 'clearInput ' Me.clearInput.Image = Global.PieceWorkPayments.My.Resources.Resources.package_delete Me.clearInput.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.clearInput.Location = New System.Drawing.Point(320, 163) Me.clearInput.Name = "clearInput" Me.clearInput.Size = New System.Drawing.Size(106, 23) Me.clearInput.TabIndex = 9 Me.clearInput.Text = " Clear Input" Me.clearInput.UseVisualStyleBackColor = True ' 'summBtn ' Me.summBtn.Enabled = False Me.summBtn.Image = Global.PieceWorkPayments.My.Resources.Resources.report_go Me.summBtn.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.summBtn.Location = New System.Drawing.Point(184, 163) Me.summBtn.Name = "summBtn" Me.summBtn.Size = New System.Drawing.Size(92, 23) Me.summBtn.TabIndex = 8 Me.summBtn.Text = " Summary" Me.summBtn.UseVisualStyleBackColor = True ' 'calcBtn ' Me.calcBtn.Image = Global.PieceWorkPayments.My.Resources.Resources.add Me.calcBtn.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.calcBtn.Location = New System.Drawing.Point(44, 163) Me.calcBtn.Name = "calcBtn" Me.calcBtn.Size = New System.Drawing.Size(89, 23) Me.calcBtn.TabIndex = 7 Me.calcBtn.Text = " Calculate" Me.calcBtn.UseVisualStyleBackColor = True ' 'PictureBox1 ' Me.PictureBox1.Image = Global.PieceWorkPayments.My.Resources.Resources.office_environ Me.PictureBox1.Location = New System.Drawing.Point(0, 259) Me.PictureBox1.Name = "PictureBox1" Me.PictureBox1.Size = New System.Drawing.Size(439, 103) Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage Me.PictureBox1.TabIndex = 0 Me.PictureBox1.TabStop = False ' 'msgLbl ' Me.msgLbl.AutoSize = True Me.msgLbl.Font = New System.Drawing.Font("Calibri", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.msgLbl.ForeColor = System.Drawing.Color.Blue Me.msgLbl.Location = New System.Drawing.Point(12, 221) Me.msgLbl.Name = "msgLbl" Me.msgLbl.Size = New System.Drawing.Size(0, 18) Me.msgLbl.TabIndex = 18 ' 'MenuStrip1 ' Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.FIleToolStripMenuItem, Me.ClearToolStripMenuItem, Me.AboutToolStripMenuItem}) Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) Me.MenuStrip1.Name = "MenuStrip1" Me.MenuStrip1.Size = New System.Drawing.Size(439, 24) Me.MenuStrip1.TabIndex = 19 Me.MenuStrip1.Text = "MenuStrip1" ' 'FIleToolStripMenuItem ' Me.FIleToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ExitToolStripMenuItem}) Me.FIleToolStripMenuItem.Name = "FIleToolStripMenuItem" Me.FIleToolStripMenuItem.Size = New System.Drawing.Size(37, 20) Me.FIleToolStripMenuItem.Text = "FIle" ' 'ExitToolStripMenuItem ' Me.ExitToolStripMenuItem.Image = Global.PieceWorkPayments.My.Resources.Resources.cancel Me.ExitToolStripMenuItem.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.ExitToolStripMenuItem.Name = "ExitToolStripMenuItem" Me.ExitToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.ExitToolStripMenuItem.Text = "Exit (alt+x)" ' 'ClearToolStripMenuItem ' Me.ClearToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ClearAllToolStripMenuItem}) Me.ClearToolStripMenuItem.Name = "ClearToolStripMenuItem" Me.ClearToolStripMenuItem.Size = New System.Drawing.Size(46, 20) Me.ClearToolStripMenuItem.Text = "Clear" ' 'ClearAllToolStripMenuItem ' Me.ClearAllToolStripMenuItem.Image = Global.PieceWorkPayments.My.Resources.Resources.bin_closed Me.ClearAllToolStripMenuItem.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.ClearAllToolStripMenuItem.Name = "ClearAllToolStripMenuItem" Me.ClearAllToolStripMenuItem.Size = New System.Drawing.Size(156, 22) Me.ClearAllToolStripMenuItem.Text = "Clear All (alt+c)" ' 'AboutToolStripMenuItem ' Me.AboutToolStripMenuItem.Name = "AboutToolStripMenuItem" Me.AboutToolStripMenuItem.Size = New System.Drawing.Size(52, 20) Me.AboutToolStripMenuItem.Text = "About" ' 'Form1 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) Me.ClientSize = New System.Drawing.Size(439, 362) Me.Controls.Add(Me.msgLbl) Me.Controls.Add(Me.averagePaid) Me.Controls.Add(Me.totalPaid) Me.Controls.Add(Me.clearInput) Me.Controls.Add(Me.summBtn) Me.Controls.Add(Me.calcBtn) Me.Controls.Add(Me.pieces) Me.Controls.Add(Me.emName) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.PictureBox1) Me.Controls.Add(Me.MenuStrip1) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle Me.MainMenuStrip = Me.MenuStrip1 Me.MaximizeBox = False Me.Name = "Form1" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Employee Payment" CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() Me.MenuStrip1.ResumeLayout(False) Me.MenuStrip1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents Label2 As System.Windows.Forms.Label Friend WithEvents Label3 As System.Windows.Forms.Label Friend WithEvents Label4 As System.Windows.Forms.Label Friend WithEvents emName As System.Windows.Forms.TextBox Friend WithEvents pieces As System.Windows.Forms.TextBox Friend WithEvents calcBtn As System.Windows.Forms.Button Friend WithEvents summBtn As System.Windows.Forms.Button Friend WithEvents clearInput As System.Windows.Forms.Button Friend WithEvents clearAll As System.Windows.Forms.Button Friend WithEvents ExitBtn As System.Windows.Forms.Button Friend WithEvents totalPaid As System.Windows.Forms.Label Friend WithEvents averagePaid As System.Windows.Forms.Label Friend WithEvents msgLbl As System.Windows.Forms.Label Friend WithEvents MenuStrip1 As MenuStrip Friend WithEvents FIleToolStripMenuItem As ToolStripMenuItem Friend WithEvents ExitToolStripMenuItem As ToolStripMenuItem Friend WithEvents ClearToolStripMenuItem As ToolStripMenuItem Friend WithEvents ClearAllToolStripMenuItem As ToolStripMenuItem Friend WithEvents AboutToolStripMenuItem As ToolStripMenuItem End Class
PieceWorkPayments/Form1.resx
text/microsoft-resx 2.0 System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 17, 17
PieceWorkPayments/Form1.vb
Public Class Form1 Private myData As ArrayList = New ArrayList() Private payRate As Double = 0.5525 Private Sub calcBtn_Click(sender As Object, e As EventArgs) Handles calcBtn.Click Dim paidAmount As Double Dim piecesDone As Double If emName.Text <> "" And pieces.Text <> "" Then If Double.TryParse(pieces.Text, piecesDone) Then paidAmount = Me.calculatePay(piecesDone) Me.myData.Add(paidAmount) msgLbl.Text = emName.Text + " will be paid a total of $" + Convert.ToString(paidAmount) summBtn.Enabled = True Else MessageBox.Show("Enter Numeric values for pieces done", "Error!", MessageBoxButtons.OK, MessageBoxIcon.Error) End If End If End Sub Private Function calculatePay(ByVal piecesDone) As Double Dim earnedAmount = Math.Round(Me.payRate * piecesDone, 2) Return earnedAmount End Function Private Sub summBtn_Click(sender As Object, e As EventArgs) Handles summBtn.Click Dim outputString As String outputString = "Total Paid: $" + Convert.ToString(Me.sumItems()) + vbCrLf + "Average Paid: $" + Convert.ToString(Me.calculateAverage()) MessageBox.Show(outputString, "Summary Data", MessageBoxButtons.OK, MessageBoxIcon.Information) End Sub Private Sub clearInput_Click(sender As Object, e As EventArgs) Handles clearInput.Click emName.Text = "" pieces.Text = "" End Sub Private Function sumItems() As Double Dim summation As Integer = 0 For Each payment As Double In Me.myData summation += payment Next Return summation End Function Private Function calculateAverage() As Double Return Math.Round(Me.sumItems() / Me.myData.Count, 2) End Function Private Sub ExitToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ExitToolStripMenuItem.Click Me.Close() End Sub Private Sub ClearAllToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ClearAllToolStripMenuItem.Click Me.confirmAndClear() End Sub Private Sub AboutToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AboutToolStripMenuItem.Click MessageBox.Show("Program Name: Employee Piecework" + vbCrLf + "Student Name: ", "About", MessageBoxButtons.OK, MessageBoxIcon.Information) End Sub 'new methods below Private Sub confirmAndClear() Dim result As DialogResult = MessageBox.Show("Are you sure you want to clear data?", "Confirmation", MessageBoxButtons.OKCancel, MessageBoxIcon.Question) If result = DialogResult.OK Then Me.myData.Clear() emName.Text = "" pieces.Text = "" totalPaid.Text = "" averagePaid.Text = "" msgLbl.Text = "" summBtn.Enabled = False End If End Sub Private Sub registerKeyHandler(sender As Object, e As EventArgs) Handles MyBase.Load Me.KeyPreview = True End Sub Private Sub listenToKeys(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown If (e.Alt AndAlso (e.KeyCode = Keys.X)) Then Me.Close() ElseIf (e.Alt AndAlso (e.KeyCode = Keys.C)) Then Me.confirmAndClear() End If End Sub End Class
PieceWorkPayments/My Project/Application.Designer.vb
'------------------------------------------------------------------------------ ' <auto-generated> ' This code was generated by a tool. ' Runtime Version:4.0.30319.34014 ' ' Changes to this file may cause incorrect behavior and will be lost if ' the code is regenerated. ' </auto-generated> '------------------------------------------------------------------------------ Option Strict On Option Explicit On Namespace My 'NOTE: This file is auto-generated; do not modify it directly. To make changes, ' or if you encounter build errors in this file, go to the Project Designer ' (go to Project Properties or double-click the My Project node in ' Solution Explorer), and make changes on the Application tab. ' Partial Friend Class MyApplication <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _ Public Sub New() MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows) Me.IsSingleInstance = false Me.EnableVisualStyles = true Me.SaveMySettingsOnExit = true Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses End Sub <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _ Protected Overrides Sub OnCreateMainForm() Me.MainForm = Global.PieceWorkPayments.Form1 End Sub End Class End Namespace
PieceWorkPayments/My Project/Application.myapp
true Form1 false 0 true 0 0 true
PieceWorkPayments/My Project/AssemblyInfo.vb
Imports System Imports System.Reflection Imports System.Runtime.InteropServices ' General Information about an assembly is controlled through the following ' set of attributes. Change these attribute values to modify the information ' associated with an assembly. ' Review the values of the assembly attributes <Assembly: AssemblyTitle("PieceWorkPayments")> <Assembly: AssemblyDescription("")> <Assembly: AssemblyCompany("")> <Assembly: AssemblyProduct("PieceWorkPayments")> <Assembly: AssemblyCopyright("Copyright © 2017")> <Assembly: AssemblyTrademark("")> <Assembly: ComVisible(False)> 'The following GUID is for the ID of the typelib if this project is exposed to COM <Assembly: Guid("711e9ba7-03f4-49b0-a3b0-42aba0bed13d")> ' Version information for an assembly consists of the following four values: ' ' Major Version ' Minor Version ' Build Number ' Revision ' ' You can specify all the values or you can default the Build and Revision Numbers ' by using the '*' as shown below: ' <Assembly: AssemblyVersion("1.0.*")> <Assembly: AssemblyVersion("1.0.0.0")> <Assembly: AssemblyFileVersion("1.0.0.0")>
PieceWorkPayments/My Project/Resources.Designer.vb
'------------------------------------------------------------------------------ ' <auto-generated> ' This code was generated by a tool. ' Runtime Version:4.0.30319.34014 ' ' Changes to this file may cause incorrect behavior and will be lost if ' the code is regenerated. ' </auto-generated> '------------------------------------------------------------------------------ Option Strict On Option Explicit On Imports System Namespace My.Resources 'This class was auto-generated by the StronglyTypedResourceBuilder 'class via a tool like ResGen or Visual Studio. 'To add or remove a member, edit your .ResX file then rerun ResGen 'with the /str option, or rebuild your VS project. '''<summary> ''' A strongly-typed resource class, for looking up localized strings, etc. '''</summary> <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _ Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _ Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _ Friend Module Resources Private resourceMan As Global.System.Resources.ResourceManager Private resourceCulture As Global.System.Globalization.CultureInfo '''<summary> ''' Returns the cached ResourceManager instance used by this class. '''</summary> <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager Get If Object.ReferenceEquals(resourceMan, Nothing) Then Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("PieceWorkPayments.Resources", GetType(Resources).Assembly) resourceMan = temp End If Return resourceMan End Get End Property '''<summary> ''' Overrides the current thread's CurrentUICulture property for all ''' resource lookups using this strongly typed resource class. '''</summary> <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ Friend Property Culture() As Global.System.Globalization.CultureInfo Get Return resourceCulture End Get Set resourceCulture = value End Set End Property '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> Friend ReadOnly Property add() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("add", resourceCulture) Return CType(obj,System.Drawing.Bitmap) End Get End Property '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> Friend ReadOnly Property bin_closed() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("bin_closed", resourceCulture) Return CType(obj,System.Drawing.Bitmap) End Get End Property '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> Friend ReadOnly Property cancel() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("cancel", resourceCulture) Return CType(obj,System.Drawing.Bitmap) End Get End Property '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> Friend ReadOnly Property office_environ() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("office environ", resourceCulture) Return CType(obj,System.Drawing.Bitmap) End Get End Property '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> Friend ReadOnly Property package_delete() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("package_delete", resourceCulture) Return CType(obj,System.Drawing.Bitmap) End Get End Property '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> Friend ReadOnly Property report_go() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("report_go", resourceCulture) Return CType(obj,System.Drawing.Bitmap) End Get End Property End Module End Namespace
PieceWorkPayments/My Project/Resources.resx
text/microsoft-resx 2.0 System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 ..\Resources\cancel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\package_delete.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\bin_closed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\add.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\report_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\office environ.jpeg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
PieceWorkPayments/My Project/Settings.Designer.vb
'------------------------------------------------------------------------------ ' <auto-generated> ' This code was generated by a tool. ' Runtime Version:4.0.30319.34014 ' ' Changes to this file may cause incorrect behavior and will be lost if ' the code is regenerated. ' </auto-generated> '------------------------------------------------------------------------------ Option Strict On Option Explicit On Namespace My <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0"), _ Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ Partial Friend NotInheritable Class MySettings Inherits Global.System.Configuration.ApplicationSettingsBase Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings) #Region "My.Settings Auto-Save Functionality" #If _MyType = "WindowsForms" Then Private Shared addedHandler As Boolean Private Shared addedHandlerLockObject As New Object <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs) If My.Application.SaveMySettingsOnExit Then My.Settings.Save() End If End Sub #End If #End Region Public Shared ReadOnly Property [Default]() As MySettings Get #If _MyType = "WindowsForms" Then If Not addedHandler Then SyncLock addedHandlerLockObject If Not addedHandler Then AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings addedHandler = True End If End SyncLock End If #End If Return defaultInstance End Get End Property End Class End Namespace Namespace My <Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _ Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _ Friend Module MySettingsProperty <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _ Friend ReadOnly Property Settings() As Global.PieceWorkPayments.My.MySettings Get Return Global.PieceWorkPayments.My.MySettings.Default End Get End Property End Module End Namespace
PieceWorkPayments/My Project/Settings.settings
PieceWorkPayments/obj/Debug/DesignTimeResolveAssemblyReferences.cache
PieceWorkPayments/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache
PieceWorkPayments/obj/Debug/PieceWorkPayments.exe
PieceWorkPayments/obj/Debug/PieceWorkPayments.Form1.resources
PieceWorkPayments/obj/Debug/PieceWorkPayments.pdb
PieceWorkPayments/obj/Debug/PieceWorkPayments.Resources.resources
PieceWorkPayments/obj/Debug/PieceWorkPayments.vbproj.FileListAbsolute.txt
C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\bin\Debug\PieceWorkPayments.exe.config C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\bin\Debug\PieceWorkPayments.exe C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\bin\Debug\PieceWorkPayments.pdb C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\bin\Debug\PieceWorkPayments.xml C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.Form1.resources C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.Resources.resources C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.vbproj.GenerateResource.Cache C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.exe C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.xml C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.pdb C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.vbprojResolveAssemblyReference.cache
PieceWorkPayments/obj/Debug/PieceWorkPayments.vbproj.GenerateResource.Cache
PieceWorkPayments/obj/Debug/PieceWorkPayments.vbprojResolveAssemblyReference.cache
PieceWorkPayments/obj/Debug/PieceWorkPayments.xml
PieceWorkPayments A strongly-typed resource class, for looking up localized strings, etc. Returns the cached ResourceManager instance used by this class. Overrides the current thread's CurrentUICulture property for all resource lookups using this strongly typed resource class. Looks up a localized resource of type System.Drawing.Bitmap. Looks up a localized resource of type System.Drawing.Bitmap. Looks up a localized resource of type System.Drawing.Bitmap. Looks up a localized resource of type System.Drawing.Bitmap. Looks up a localized resource of type System.Drawing.Bitmap. Looks up a localized resource of type System.Drawing.Bitmap.
PieceWorkPayments/obj/Debug/PieceWorkPayments_B.vbproj.FileListAbsolute.txt
C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\bin\Debug\PieceWorkPayments.exe.config C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\bin\Debug\PieceWorkPayments.exe C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\bin\Debug\PieceWorkPayments.pdb C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\bin\Debug\PieceWorkPayments.xml C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.Form1.resources C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.Resources.resources C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments_B.vbproj.GenerateResource.Cache C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.exe C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.xml C:\Users\Astroguy.pc\Desktop\StudentLance\PieceWorkPayments\PieceWorkPayments\obj\Debug\PieceWorkPayments.pdb
PieceWorkPayments/obj/Debug/PieceWorkPayments_B.vbproj.GenerateResource.Cache
PieceWorkPayments/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll
PieceWorkPayments/PieceWorkPayments_B.vbproj
Debug AnyCPU {F29F944B-8D8B-4114-B2E0-D31C8DA10AA1} WinExe PieceWorkPayments.My.MyApplication PieceWorkPayments PieceWorkPayments 512 WindowsForms v4.5 AnyCPU true full true true bin\Debug\ PieceWorkPayments.xml 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 AnyCPU pdbonly false true true bin\Release\ PieceWorkPayments.xml 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 On Binary Off On Form Form1.vb Form True Application.myapp True True Resources.resx True Settings.settings True Form1.vb VbMyResourcesResXFileCodeGenerator Resources.Designer.vb My.Resources Designer MyApplicationCodeGenerator Application.Designer.vb SettingsSingleFileGenerator My Settings.Designer.vb
