Wish CustomListView: Set its ScrollView's ScrollBar visibility programmatically.

[LWGShane]

Would it be possible to allow us to set the scrollbar of the scrollview (in CustomListView) programmatically?

 

[Erel]

Dim jo As JavaObject = clv1.sv
jo.RunMethod("setVerticalScrollBarEnabled", Array(False)) 'or True

 

[LWGShane]

Public Sub CustomListViewScrollBarVisible (CLV As CustomListView, Visible As Boolean)
    #If Not (B4i)
    Dim Jo As JavaObject
    Jo = CLV.sv
    Jo.RunMethod("setVerticalScrollBarEnabled", Array(Visible))
    #Else
    Dim No As NativeObject
    No = CLV.sv
    No.SetField("showsVerticalScrollIndicator", Visible)
    #End If
End Sub