本文整理匯總了VB.NET中System.Data.SqlClient.SqlDataReader.GetOrdinal方法的典型用法代碼示例。如果您正苦於以下問題：VB.NET SqlDataReader.GetOrdinal方法的具體用法？VB.NET SqlDataReader.GetOrdinal怎麽用？VB.NET SqlDataReader.GetOrdinal使用的例子？那麽, 這裏精選的方法代碼示例或許可以為您提供幫助。您也可以進一步了解該方法所在類System.Data.SqlClient.SqlDataReader的用法示例。
在下文中一共展示了SqlDataReader.GetOrdinal方法的2個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: ReadGetOrdinal
Private Sub ReadGetOrdinal(ByVal connectionString As String)
Dim queryString As String = _
"SELECT DISTINCT CustomerID FROM dbo.Orders;"
Using connection As New SqlConnection(connectionString)
Dim command As New SqlCommand(queryString, connection)
connection.Open()
Dim reader As SqlDataReader = command.ExecuteReader()
' Call GetOrdinal and assign value to variable.
Dim customerID As Integer = reader.GetOrdinal("CustomerID")
' Use variable with GetString inside of loop.
While reader.Read()
Console.WriteLine("CustomerID={0}", reader.GetString(customerID))
End While
' Call Close when done reading.
reader.Close()
End Using
End Sub示例2: MainClass
' 導入命名空間
Imports System
Imports System.Collections
Imports System.Data
Imports System.IO
Imports System.Xml.Serialization
Imports System.Xml
Imports System.Windows.Forms
Imports System.Data.SqlClient
Public Class MainClass
Shared Dim WithEvents con As SqlConnection
Shared Sub Main()
con = New SqlConnection("Server=(local)\SQLEXPRESS;Initial Catalog=MyDatabase;Integrated Security=SSPI")
Dim cmd As New SqlCommand()
cmd.CommandText = "SELECT * FROM Employee"
cmd.Connection = con
Try
con.Open()
Dim reader As SqlDataReader = cmd.ExecuteReader()
Dim OrderIDIdx As Integer = reader.GetOrdinal("ID")
'Dim OrderDateIdx As Integer = reader.GetOrdinal("FirstName")
'Dim OrderFreightIdx As Integer = reader.GetOrdinal("LastName")
Do
While reader.Read()
Dim OrderID As Integer = reader.GetInt32(OrderIDIdx)
'Dim OrderDate As DateTime = reader.GetDateTime(OrderDateIdx)
'Dim OrderFreight As Decimal = reader.GetDecimal(OrderFreightIdx)
'Console.WriteLine(OrderID & vbTab & OrderDate & vbTab & OrderFreight)
Console.WriteLine(OrderID & vbTab )
End While
Loop While reader.NextResult()
reader.Close()
Finally
con.Close()
End Try
End Sub
End Class