Как удалить последний элемент списка не зная его listTag'a?

 

Для: fedotxxl
не знаю даже.... но можно быстро пройтись

Dim sLastValue as string
Dim My_List List As String
ForAll x in My_List
sLastValue = ListTag( x )
End ForAll

вот sLastValue - в конце отработки ForAll и будет содержать tag последнего элемента

 

а UBound тут не сработает?
sLastValue = My_List ( UBound(My_List) )

 

Для: wowa
не сработает

 

Для: wowa
а с каких это пор УБаунт работает с листами

 

знать не к месту используется лист, раз такой вопрос возник.

 

Для: Morpheus
Да уж лет сто как...

Код вида:

Dim tmp List As String
tmp("1") = "1"
tmp("2") = "1"
tmp("3") = "1"

Messagebox(Ubound(tmp))

Даже не жаёт сохранить: несовпадение типов на строке Ubound от листа..

 

Для: Kee_Keekkenen
Угу...