0

15 行目で「end of statement expected」というエラーが表示されます

私は何を間違っていますか？クラスの達人でさえ、これはうまくいくはずだと言っています。

Public Class Form1

Private Sub btnShow_Click(sender As Object, e As EventArgs) Handles btnShow.Click
    Dim states() As String = IO.File.ReadAllLines("USStates.txt")  ' makes array
    Dim data = From state In states
    Let line = state.Split(","c)
    Let Name = line(0)
    Let stateAb = line(1)
    Let area = CInt(line(2))
    Let census = CDbl(line(3))
    Order By Name Ascending
    ' query
    Select name,stateAb,area,census

*ここでエラーが発生します***

    dgvOut.DataSource = data.ToList
    dgvOut.CurrentCell = Nothing
    dgvOut.Columns("Name").HeaderText = "State Name"
    dgvOut.Columns("ststeAb").HeaderText = "Abbreviation"
    dgvOut.Columns("area").HeaderText = "Area In Sq. Miles"
    dgvOut.Columns("census").HeaderText = "Population"
End Sub
End Class
4

2 に答える 2

2

削除' query- そこにコメントを入れることはできません。

于 2013-11-05T18:09:10.687 に答える
1

行継続で試してください：

Dim data = From state In states _
Let line = state.Split(","c) _
Let Name = line(0) _
Let stateAb = line(1) _
Let area = CInt(line(2)) _
Let census = CDbl(line(3)) _
Order By Name Ascending _
Select name, stateAb, area, census
于 2013-11-05T18:10:09.077 に答える