Syntax
Public Function getValue(ByVal FieldName As String, ByVal RowIndex As Integer) As DoubleDescription
This function used to get the value for a specific row at the given field.
Parameters
| Parameter | Description |
| FieldName | The field that wants to get value on it, a value of type String. |
| RowIndex | Index of a row at the field to get it to value, a value of type Integer. |
Return value
Returns value for the requested row, a value of type double.
Sample
Public Sub main() 'Variables Dim _symbolInfo As VTLGeneral.CSymbol=ClientCode.GetSymbolByName("GOLD") If _symbolInfo is nothing then GUI.MsgDialog("Symbol not found") Exit Sub End If Dim DB As New VTLGeneral.Database() Dim RecordCount As Integer Dim m_Recordset As VTLGeneral.RecordSet Dim _historyData As object() Dim Record As Integer Dim m_Date As VTLGeneral.Field Dim m_Open As VTLGeneral.Field Dim m_High As VTLGeneral.Field Dim m_Low As VTLGeneral.Field Dim m_Close As VTLGeneral.Field Dim _recordCount as integer = 100 Dim i As Integer m_Recordset = DB.CreateRecord m_Open = New VTLGeneral.Field m_High = New VTLGeneral.Field m_Low = New VTLGeneral.Field m_Close = New VTLGeneral.Field DB.RecordCount = _recordCount RecordCount = _recordCount 'Initialize Recordsets m_Open.initialize(_recordCount, "Open") m_High.initialize(_recordCount, "High") m_Low.initialize(_recordCount, "Low") m_Close.initialize(_recordCount, "Close") m_Recordset.addField(m_High) m_Recordset.addField(m_High) m_Recordset.addField(m_Low) m_Recordset.addField(m_Close) 'load high and set its values _historyData = ClientCode.GetChartHistory(_symbolInfo.ID, VTLGeneral.ENUM_PERIOD.Day,VTLGeneral.ENUM_HISTORY_TYPE.HIS_HIGH, _recordCount) Dim q For q = 1 To _recordCount-1 m_High.setValue(i,_historyData(i)) Next ' get value GUI.MsgDialog(m_Recordset.getValue("High",1)) End Sub See Also