ListGetCell(listboxName As String, row As Integer, column As Integer) As String

 

Gets contents of cell at row, column in listbox listboxName.

 

For multiple-column ListBoxes, the number of rows. ListCount is 1-based.

 

 

Parameters:

 

Name

Type

Value

Description

listboxName

Integer

name

ScreenFieldName of the listbox to set the number of columns.

Ctrl+Click onto a listbox to retrieve its listboxName

(= ScreenFieldName).

row

Integer

0 - n

Index of listbox row to be retrieved.

row and column are zero-based.

The top-left cell is 0,0.

Passing -1 as either the row or coumn number means all rows or all columns, respectively

column

Integer

0 - n

Index of listbox column to be retrieved.

row and column are zero-based.

The top-left cell is 0,0.

Passing -1 as either the row or coumn number means all rows or all columns, respectively

 

Returns:

 

Type

Value

Description

String

text

Returns the contents of the cell at row, column as text.

String

ERROR

An error occurred. The contents of the cell at row, column could not be retrieved.

String

"1" or "0"

If the CellType is CHECKBOX, then either 0 or 1 are returned.

1 = CHECKED

2 = UNCHECKED

 

Available in:

 

WindowMain

WindowLink

YES

YES

 

Used in:

 

XojoScript Name

GUID

Calculate total participation fee for current attendee

F0F802CC-D151-4F59-A749-1E232527D0C2

Calculate seminar participation fee

2F6CFC74-44AB-4956-A760-BBD5E57595E8

Create Seminar Invoice in Word

D2036EFA-D283-481A-9A93-D00547680749

Calculate participation fee for seminar attendee

032B50D3-D463-453E-9370-9AF7C34DA1D5

Add a Payment for Event participation

877AA389-2167-4A95-904E-95C6329A2BFD

Delete seminar participation payment

FBE87F41-596E-4C04-BB74-1B9A8FA21FEF

 

Hint: You can find references to XojoScripts which make use of this function by sending the following SQL statement to the database:

Select id,GUID, ScriptName,ScriptCode from im_scripts where ScriptCode Like '%ListGetCell%'

 

Example XojoScript:

 

// WindowLink.imSB_lnk_p02_Recalc, Recalc Total Payments

CalcTotal

 

Sub CalcTotal()

Dim lbHandle As Integer = ListGetHandle("imLB_lnk_p01_PaymentList")

Dim numRows As Integer = ListCount(lbHandle)

Dim totalPaid As Double = 0.0

 

If numRows > 0 Then

For i As Integer = 0 to numRows-1

totalPaid = totalPaid + Val(ListGetCell("imLB_lnk_p01_PaymentList",i,2))

Next

End IF

SetText("imTF_lnk_p01_TotalPaid",Format(totalPaid,"-#####0.00"))

 

End Sub