从文本文件计算每个数字序列的平均值

时间:2015-04-07 18:20:15

标签: arrays loops visual-studio-2012 series basic

目前,代码我从txt文件中提取数据并将数字列表放入列表框中。我现在需要编辑程序来计算每个数字系列的平均值,每个系列用0分隔。我需要将数据存储到数组中并循环通过它来预先形成计算,但我不确定如何将每个数字系列分开以获得每个系列的平均值,而不仅仅是整个数据集的平均值。

这是我拥有的数字列表: 10 15 20 20 0 1 2 3 4 五 6 7 8 0 10 20 三十 40 50 60 0 9 9 9 9 9 9 9 9 9 0 五 8 9 五 3 80 2 23 65 0

这是我现有的代码,它只是从文件中提取数据并将其原样放入列表框中:

Public Class Form1
Dim strData As String

Private Sub ReadButton_Click(sender As Object, e As EventArgs) Handles ReadButton.Click
    Dim strReader As System.IO.StreamReader

    Try
        strReader = New System.IO.StreamReader("NumberData.txt")
        strData = strReader.ReadLine
        Do While Not strReader.EndOfStream
            DataListBox.Items.Add(strData)
            strData = strReader.ReadLine
        Loop
        DataListBox.Items.Add(strData)
        strReader.Close()
    Catch ex As Exception
        DataListBox.Items.Add(ex.Message)
    End Try

End Sub

结束班

我很感激你的帮助,我最近一直在编程,以至于我的大脑似乎无法想象出这一点!

1 个答案:

答案 0 :(得分:0)

不需要数组;只使用2个变量:一个为每个读取的项目递增,另一个用于保存到目前为止的总和。当您阅读每个值时,首先检查它是否为零;如果是,则通过将总和除以计数来计算均值,并对其做任何事情(然后清除你的两个跟踪变量);如果不是,那么继续将其添加到下一笔金额中。 (如果你没有尾随0,那么你必须在最后一个系列上强制额外的计算。)