For i = 0 To ListWifi.Size -1
clv1.Add(CreateListItem($"Item #${i}"$, clv1.AsView.Width, 180dip), 143dip, $"Item #${i}"$) '18ß
If Main.language = english Then
btn_choose.Text = "Choose"
btn_delete.Text = "Delete"
lbl_name.Text = "Name:"
lbl_ip_adress.Text = "IP-Adress:"
lbl_wifi_name.Text = "Wifi Name:"
End If
lbl_name_add.Text= ListName.Get(i)
lbl_ip_adress_add.Text = ListIP.Get(i)
lbl_wifi_name_add.Text = ListWifi.Get(i)
Next