Vb 6 listview substring_index

Question

У меня есть список в vb6, содержащий идентификатор столбца, значения ID - это идентификатор PID, где id равен id в моей базе данных. Ex. PID-56, PID-57. То, что я хочу, - это когда я получаю значение идентификатора столбца, первое значение в моем списке, скажем, PID-56, я хочу, чтобы идентификационная часть была равна 56.

Ex.

value=.text --> PID-56 
newvalue=56 --> PID- is not included so 56 now can be a integer. 

Как удалить PID-, учитывая, что я использую LIstview в vb6.

Какую функцию shoul я буду использовать?

Answer 1

Если вы знаете, что строка всегда начинается с PID- и этот формат не когда-либо изменения, то вы можете использовать один из основных функций обработки строк. В этом случае вы, вероятно, хотите связать функцию Right с функцией Len. Функция Len вернет длину строки (общее количество символов, которое она содержит), а функция Right вернет подстроку указанной длины, начиная с правой стороны всей строки.

Наконец, вам нужно будет использовать одно из стандартных преобразований значений для преобразования этого строкового значения в числовое значение. В этом случае, естественно, вам нужен оператор CInt.

Например:

Private Function ExtractIDFromString(ByRef str As String) As Integer 
    Const prefixLength As Long = 4 ' length of the "PID-" prefix 

    Dim strID As String 
    strID = Right$(str, Len(str) - prefixLength) 

    Return CInt(strID) 
End Function