容祖儿的小小是抄袭的:ms sql里,当SELECT的时候,这句错误,该怎么改?

来源:百度文库 编辑:高校问答 时间:2024/03/29 22:20:25
编译器错误信息: BC30289: Statement cannot appear within a method body. End of method assumed.

源文件是
Sub DataGrid1_SelectedIndexChanged(sender As Object, e As EventArgs)

Function MyQueryMethod(ByVal matrik_id As Long) As System.Data.DataSet
Dim connectionString As String = "server='localhost'; trusted_connection=true; Database='student'"
Dim sqlConnection As System.Data.SqlClient.SqlConnection = New System.Data.SqlClient.SqlConnection(connectionString)

Dim queryString As String = "SELECT [student_daten].* FROM [student_daten] WHERE ([student_daten].[matrik_id] "& _
"= @matrik_id)"
Dim sqlCommand As System.Data.SqlClient.SqlCommand = New System.Data.SqlClient.SqlCommand(queryString, sqlConnection)

sqlCommand.Parameters.Add("@matrik_id", System.Data.SqlDbType.BigInt).Value = matrik_id

Dim dataAdapter As System.Data.SqlClient.SqlDataAdapter = New System.Data.SqlClient.SqlDataAdapter(sqlCommand)
Dim dataSet As System.Data.DataSet = New System.Data.DataSet
dataAdapter.Fill(dataSet)

Return dataSet
End Function
End Sub

系统提示
Function MyQueryMethod(ByVal matrik_id As Long) As System.Data.DataSet
这句书写错误,该怎么改?

数据类型设置错误吧。

你把下面这句提到第一行试试。
Dim dataSet As System.Data.DataSet = New System.Data.DataSet