Visual Basic Homework

Read the folder for everything you need to know. I need it by 9 PM EST Tuesday. 

Chapter 8/~$AD FOR WHAT TO DO x

Chapter 8/CityNamesSolution.zip

City Names Solution/City Names Project/App.config

City Names Solution/City Names Project/bin/Debug/City Names Project.exe.config

City Names Solution/City Names Project/bin/Debug/City Names Project.vshost.exe

City Names Solution/City Names Project/bin/Debug/City Names Project.vshost.exe.config

City Names Solution/City Names Project/bin/Debug/City Names Project.vshost.exe.manifest

City Names Solution/City Names Project/City Names Project.vbproj

Debug
AnyCPU
{9C18CF5B-3121-4E42-9F90-AE05E684E38F}
WinExe
City_Names_Project.My.MyApplication
City_Names_Project
City Names Project
512
WindowsForms
v4.5

AnyCPU
true
full
true
true
bin\Debug\
City Names Project.xml
42016,41999,42017,42018,42019,42032,42036,42020,42021,42022

AnyCPU
pdbonly
false
true
true
bin\Release\
City Names Project.xml
42016,41999,42017,42018,42019,42032,42036,42020,42021,42022

On

Binary

Off

On

Form

Main Form.vb
Form

True
Application.myapp

True
True
Resources.resx

True
Settings.settings
True

Main Form.vb

VbMyResourcesResXFileCodeGenerator
Resources.Designer.vb
My.Resources
Designer

MyApplicationCodeGenerator
Application.Designer.vb

SettingsSingleFileGenerator
My
Settings.Designer.vb

City Names Solution/City Names Project/Main Form.Designer.vb

_
Partial Public Class frmMain
Inherits System.Windows.Forms.Form
‘Form overrides dispose to clean up the component list.
_
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
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.
_
Private Sub InitializeComponent()
Me.Label1 = New System.Windows.Forms.Label()
Me.cboCityNames = New System.Windows.Forms.ComboBox()
Me.btnAdd = New System.Windows.Forms.Button()
Me.btnExit = New System.Windows.Forms.Button()
Me.SuspendLayout()

‘Label1

Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(12, 8)
Me.Label1.Margin = New System.Windows.Forms.Padding(2, 0, 2, 0)
Me.Label1.Name = “Label1”
Me.Label1.Size = New System.Drawing.Size(74, 17)
Me.Label1.TabIndex = 0
Me.Label1.Text = “&City names:”

‘cboCityNames

Me.cboCityNames.DropDownStyle = System.Windows.Forms.ComboBoxStyle.Simple
Me.cboCityNames.FormattingEnabled = True
Me.cboCityNames.Location = New System.Drawing.Point(15, 27)
Me.cboCityNames.Margin = New System.Windows.Forms.Padding(2)
Me.cboCityNames.Name = “cboCityNames”
Me.cboCityNames.Size = New System.Drawing.Size(118, 162)
Me.cboCityNames.Sorted = True
Me.cboCityNames.TabIndex = 1

‘btnAdd

Me.btnAdd.Location = New System.Drawing.Point(150, 34)
Me.btnAdd.Margin = New System.Windows.Forms.Padding(2)
Me.btnAdd.Name = “btnAdd”
Me.btnAdd.Size = New System.Drawing.Size(94, 35)
Me.btnAdd.TabIndex = 2
Me.btnAdd.Text = “&Add Name”

‘btnExit

Me.btnExit.Location = New System.Drawing.Point(150, 73)
Me.btnExit.Margin = New System.Windows.Forms.Padding(2)
Me.btnExit.Name = “btnExit”
Me.btnExit.Size = New System.Drawing.Size(94, 35)
Me.btnExit.TabIndex = 3
Me.btnExit.Text = “E&xit”

‘frmMain

Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 17.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(262, 199)
Me.Controls.Add(Me.btnExit)
Me.Controls.Add(Me.btnAdd)
Me.Controls.Add(Me.cboCityNames)
Me.Controls.Add(Me.Label1)
Me.Font = New System.Drawing.Font(“Segoe UI”, 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Margin = New System.Windows.Forms.Padding(3, 5, 3, 5)
Me.MaximizeBox = False
Me.Name = “frmMain”
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = “City Names”
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents cboCityNames As System.Windows.Forms.ComboBox
Friend WithEvents btnAdd As System.Windows.Forms.Button
Friend WithEvents btnExit As System.Windows.Forms.Button
End Class

City Names Solution/City Names Project/Main Form.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

True

True

True

True

True

City Names Solution/City Names Project/Main Form.vb

‘ Name: City Names Project
‘ Purpose: Adds city names to a combo box
‘ Programmer: on
Option Explicit On
Option Strict On
Option Infer Off
Public Class frmMain
Private Sub btnExit_Click(sender As Object, e As EventArgs) Handles btnExit.Click
Me.Close()
End Sub
End Class

City Names Solution/City Names Project/My Project/Application.Designer.vb

‘——————————————————————————

‘ This code was generated by a tool.
‘ Runtime Version:4.0.30319.17929

‘ Changes to this file may cause incorrect behavior and will be lost if
‘ the code is regenerated.

‘——————————————————————————
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

_
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

_
Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.City_Names_Project.frmMain
End Sub
End Class
End Namespace

City Names Solution/City Names Project/My Project/Application.myapp



true
frmMain
false
0
true
0
true

City Names Solution/City Names Project/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







‘The following GUID is for the ID of the typelib if this project is exposed to COM

‘ 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:


City Names Solution/City Names Project/My Project/Resources.Designer.vb

‘——————————————————————————

‘ This code was generated by a tool.
‘ Runtime Version:4.0.30319.17929

‘ Changes to this file may cause incorrect behavior and will be lost if
‘ the code is regenerated.

‘——————————————————————————
Option Strict On
Option Explicit On

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.
”’

”’ A strongly-typed resource class, for looking up localized strings, etc.
”’

_
Friend Module Resources
Private resourceMan As Global.System.Resources.ResourceManager
Private resourceCulture As Global.System.Globalization.CultureInfo
”’

”’ Returns the cached ResourceManager instance used by this class.
”’

_
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(“City_Names_Project.Resources”, GetType(Resources).Assembly)
resourceMan = temp
End If
Return resourceMan
End Get
End Property
”’

”’ Overrides the current thread’s CurrentUICulture property for all
”’ resource lookups using this strongly typed resource class.
”’

_
Friend Property Culture() As Global.System.Globalization.CultureInfo
Get
Return resourceCulture
End Get
Set(ByVal value As Global.System.Globalization.CultureInfo)
resourceCulture = value
End Set
End Property
End Module
End Namespace

City Names Solution/City Names Project/My Project/Resources.resx

text/microsoft-resx

2.0

System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089

System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089

City Names Solution/City Names Project/My Project/Settings.Designer.vb

‘——————————————————————————

‘ This code was generated by a tool.
‘ Runtime Version:4.0.30319.17929

‘ Changes to this file may cause incorrect behavior and will be lost if
‘ the code is regenerated.

‘——————————————————————————
Option Strict On
Option Explicit On

Namespace My
_
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
_
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

_
Friend Module MySettingsProperty

_
Friend ReadOnly Property Settings() As Global.City_Names_Project.My.MySettings
Get
Return Global.City_Names_Project.My.MySettings.Default
End Get
End Property
End Module
End Namespace

City Names Solution/City Names Project/My Project/Settings.settings

City Names Solution/City Names Project/obj/Debug/City Names Project.vbproj.FileListAbsolute.txt

C:\Users\droeb_000\Dropbox\Classes\_CST-171\128507792X_395252\VB2012\Chap08\City Names Solution\City Names Project\bin\Debug\City Names Project.exe.config
C:\Users\Dennis\Documents\My Dropbox\Classes\_CST-271\StudentDataFiles\Chap08\City Names Solution\City Names Project\bin\Debug\City Names Project.exe.config

City Names Solution/City Names Project/obj/Debug/DesignTimeResolveAssemblyReferences.cache

City Names Solution/City Names Project/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache

City Names Solution/City Names Project/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll

City Names Solution/City Names Solution.sln

Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio 2012
Project(“{F184B08F-C81C-45F6-A57F-5ABD9991F28F}”) = “City Names Project”, “City Names Project\City Names Project.vbproj”, “{9C18CF5B-3121-4E42-9F90-AE05E684E38F}”
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
Release|Any CPU = Release|Any CPU
EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution
{9C18CF5B-3121-4E42-9F90-AE05E684E38F}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{9C18CF5B-3121-4E42-9F90-AE05E684E38F}.Debug|Any CPU.Build.0 = Debug|Any CPU
{9C18CF5B-3121-4E42-9F90-AE05E684E38F}.Release|Any CPU.ActiveCfg = Release|Any CPU
{9C18CF5B-3121-4E42-9F90-AE05E684E38F}.Release|Any CPU.Build.0 = Release|Any CPU
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EndGlobalSection
EndGlobal

City Names Solution/City Names Solution.v11.suo

Are you stuck with your online class?
Get help from our team of writers!