?
Solved

Streamwriter array

Posted on 2003-11-15
1
Medium Priority
?
899 Views
Last Modified: 2006-11-17
This is what my book says, I am still learning and am not good with arrays.  Could someone help me please?


Given an array of structures named sCustomers having string members of Name, Address, City and State, write the statements to create an instance of the StreamWriter class, and write the contents of the array to the StreamWriter.  Use the GetUpperBound method to determine the array size
0
Comment
Question by:brassmon
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
1 Comment
 
LVL 9

Accepted Solution

by:
malharone earned 2000 total points
ID: 9755068
hope the below helps... just a recommendation, avoid using structures ... and start taking advantage of the classes.







Public Class Form4
    Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "

    Public Sub New()
        MyBase.New()

        'This call is required by the Windows Form Designer.
        InitializeComponent()

        'Add any initialization after the InitializeComponent() call

    End Sub

    'Form overrides dispose to clean up the component list.
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing Then
            If Not (components Is Nothing) Then
                components.Dispose()
            End If
        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.
    Friend WithEvents Button1 As System.Windows.Forms.Button
    Friend WithEvents Button3 As System.Windows.Forms.Button
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
        Me.Button1 = New System.Windows.Forms.Button()
        Me.Button3 = New System.Windows.Forms.Button()
        Me.SuspendLayout()
        '
        'Button1
        '
        Me.Button1.Location = New System.Drawing.Point(8, 8)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(112, 32)
        Me.Button1.TabIndex = 0
        Me.Button1.Text = "Load Fake Data"
        '
        'Button3
        '
        Me.Button3.Location = New System.Drawing.Point(128, 8)
        Me.Button3.Name = "Button3"
        Me.Button3.Size = New System.Drawing.Size(112, 32)
        Me.Button3.TabIndex = 0
        Me.Button3.Text = "Output Data"
        '
        'Form4
        '
        Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
        Me.ClientSize = New System.Drawing.Size(248, 266)
        Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Button1, Me.Button3})
        Me.Name = "Form4"
        Me.Text = "Form4"
        Me.ResumeLayout(False)

    End Sub

#End Region

    'Given an array of structures named sCustomers having string members of Name, Address, City and State,
    'write the statements to create an instance of the StreamWriter class, and write the contents of the
    'array to the StreamWriter.  Use the GetUpperBound method to determine the array size

    Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Dim writer As New IO.StreamWriter("c:\outputFile.txt")
        Dim upperBound As Integer = sCustomers.GetUpperBound(0) - 1
        Dim lowerBound As Integer = sCustomers.GetLowerBound(0)
        Dim currCustomer As Customer
        Dim x As Integer
        For x = lowerBound To upperBound
            currCustomer = sCustomers(x)
            writer.WriteLine(currCustomer.Name)
            writer.WriteLine(currCustomer.Address)
            writer.WriteLine(currCustomer.City)
            writer.WriteLine(currCustomer.State)
            writer.WriteLine()
        Next
        writer.Close()
        Process.Start("c:\outputfile.txt")
        Application.Exit()
    End Sub

    Public sCustomers(3) As Customer

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        With sCustomers(0)
            .Name = "Tom"
            .Address = "111 Main Street"
            .City = "Las Vegas"
            .State = "NM"
        End With
        With sCustomers(1)
            .Name = "Michael"
            .Address = "222 Lincoln Avenue"
            .City = "New Mexico City"
            .State = "NV"
        End With
        With sCustomers(2)
            .Name = "Joe"
            .Address = "333 Berkley Blvd"
            .City = "New York"
            .State = "TX"
        End With
        With sCustomers(3)
            .Name = "Ben"
            .Address = "444 Harvard Ct"
            .City = "Houston"
            .State = "NY"
        End With
        MessageBox.Show("Fake data loaded", "info", MessageBoxButtons.OK, MessageBoxIcon.Information)
    End Sub

    Structure Customer
        Public Name As String
        Public Address As String
        Public City As String
        Public State As String
    End Structure
End Class
0

Featured Post

Get your Disaster Recovery as a Service basics

Disaster Recovery as a Service is one go-to solution that revolutionizes DR planning. Implementing DRaaS could be an efficient process, easily accessible to non-DR experts. Learn about monitoring, testing, executing failovers and failbacks to ensure a "healthy" DR environment.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Real-time is more about the business, not the technology. In day-to-day life, to make real-time decisions like buying or investing, business needs the latest information(e.g. Gold Rate/Stock Rate). Unlike traditional days, you need not wait for a fe…
This article shows how to deploy dynamic backgrounds to computers depending on the aspect ratio of display
If you’ve ever visited a web page and noticed a cool font that you really liked the look of, but couldn’t figure out which font it was so that you could use it for your own work, then this video is for you! In this Micro Tutorial, you'll learn yo…
Sometimes it takes a new vantage point, apart from our everyday security practices, to truly see our Active Directory (AD) vulnerabilities. We get used to implementing the same techniques and checking the same areas for a breach. This pattern can re…
Suggested Courses

752 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question