I am attaching a code :-
If File.Exists (File.DirInternal, "Bus.db") = True Then
SQL1.Initialize(File.DirInternal, "Bus.db", True)
Dim q As String = "Select Distinct BDEPID FROM tblLogin order by bdepid"
tblLogin= SQL1.ExecQuery(q)
For i = 0 To tblLogin.RowCount - 1
tblLogin.Position = i
ListView1.Initialize("ListView1")
ListView1.AddSingleLine(tblLogin.GetString("BDEPID"))
lst.Add(ListView1)
Next
ListView1.Color= Colors.RGB(0,101,161)
ListView1.SingleLineLayout.Label.TextColor= Colors.white
ListView1.SingleLineLayout.Label.TextSize= 16
Activity.AddView(ListView1, 55dip,170dip,250dip,150dip)
End If
The code is running fine, but the problem is that i have 2 row count, but the list which is coming out on display has only 1 (last) record. Is there any solution to the problem. Please HELP!!
If File.Exists (File.DirInternal, "Bus.db") = True Then
SQL1.Initialize(File.DirInternal, "Bus.db", True)
Dim q As String = "Select Distinct BDEPID FROM tblLogin order by bdepid"
tblLogin= SQL1.ExecQuery(q)
For i = 0 To tblLogin.RowCount - 1
tblLogin.Position = i
ListView1.Initialize("ListView1")
ListView1.AddSingleLine(tblLogin.GetString("BDEPID"))
lst.Add(ListView1)
Next
ListView1.Color= Colors.RGB(0,101,161)
ListView1.SingleLineLayout.Label.TextColor= Colors.white
ListView1.SingleLineLayout.Label.TextSize= 16
Activity.AddView(ListView1, 55dip,170dip,250dip,150dip)
End If
The code is running fine, but the problem is that i have 2 row count, but the list which is coming out on display has only 1 (last) record. Is there any solution to the problem. Please HELP!!