Iterator

DataTable 内のすべての DataRow を含むイテレータです。

構文

Syntax Function iterator() As DataRow() 

パラメータ

• なし

結果

DataTable 内のすべての DataRow を含むイテレータを返します。

例

Dim returnDataTable As G1CLIENTLib.dataTable 
	 Dim row As G1CLIENTLib.DataRow 
	 Dim sColumnName As String 
	 Dim sFieldValue As String 
	 Dim rows() As Variant 
	 Dim nRow As Integer 
	 Dim nColumn	As Integer 

		'Get the result from the resonse message 
		Set returnDataTable = replyMsg.getDataTable 
		ReDim rows(returnDataTable.getRowCount) As Variant 
		
		rows = returnDataTable.iterator 
		
		For nRow = 0 To returnDataTable.getRowCount - 1 
	Set row = rows(nRow) 

	For nColumn = 0 To row.getColumnCount - 1 
sColumnName = row.getColumnNames(nColumn) 
sFieldValue = row.getByName(sColumnName) 
	Next 

	Next