Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Sub tst()
If TextBox1 = "" Then Exit Sub
ListBox1.AddItem "xxx"
ListBox1.List(UBound(ListBox1.List), 0) = Left(TextBox1.Text, 10)
TextBox1 = ""
End Sub
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.