• 如果您觉得本站非常有看点,那么赶紧使用Ctrl+D 收藏吧

萨姆在2D阵列上多张线元件(4)的(txt文件)

vb.net 来源:Shinobi1173 3次浏览

我有一个文本文件,它读取:萨姆在2D阵列上多张线元件(4)的(txt文件)

留守,拉海伊,F,7,11.25

的双城记,狄更斯,F,100,8.24

悬挂一千树木丝带,里纳尔迪,F,30,16.79

Saffy的天使,麦凯,F,20,8.22

每个小鸟,吟唱, Wiles,F,10,7.70

在基督里,穆雷,N守法,3,12.20

圣经预言,莱希和欣德森,N,5,14.95

迷人,埃尔德雷奇,N,12,16

深成长在基督徒的生命,Swindoll,N,11,19.95

祷告是医治心,Virkler,N,4,12.00

成长格雷斯,弗格森,N,3,11.95

的善,美神,史密斯,N,7,11.75

战胜黑暗,安德森,N,12,16

每一行的最后一个元素是有代价的。我想把所有的价格加起来。我一直在寻找这么多小时,找不到回答我的问题的事情。这似乎很容易,但我无法弄清楚!请帮忙。顺便说一句,这个列表必然会发生改变(添加行,删除行,改变行),所以如果可以的话,请不要具体,但要保持代码的可变性。谢谢!!!

只是让你可以看到我的pooooorrrr工作,这里是我(我想我删除了我的代码,现在重写了几个小时的方式不同。):

Dim Inv() As String = IO.File.ReadAllLines("Books.txt") 

    Dim t As Integer = Inv.Count - 1 
    Dim a As Integer = 0 to t 
    Dim sumtotal As String = sumtotal + Inv(4) 

也 每行具有“F”或“N”。我如何合计所有的F和所有的N。我是否通过if语句做到这一点?


===========解决方案如下:

首先,你最好使用Double作为你的类型而不是String。其次,观察我如何在每一行上使用Split函数,将其最后一个元素作为double来投射,并将其添加到总数中。是的,使用if语句是如何确定是否要增加F的计数或N的计数

Dim lstAllLines As List(Of String) = IO.File.ReadAllLines("Books.txt").ToList() 

    Dim dblTotal As Double = 0.0 
    Dim intCountOfF As Integer = 0 
    Dim intCountOfN As Integer = 0 

    For Each strLine As String In lstAllLines 

     Dim lstCells As List(Of String) = strLine.Split(",").ToList() 

     dblTotal += CDbl(lstCells(3)) 

     If lstCells(2) = "F" Then 

      intCountOfF += 1 

     Else 

      intCountOfN += 1 

     End If 

    Next 

版权声明:本文转自网络文章,转载此文章仅为分享知识,如有侵权,请联系管理员进行删除。
喜欢 (0)