2015-02-05 2 views
-4

Я пытаюсь замаскировать SSn и хочу показать его на подпись надписи.Функция подстроки не работает в Vb?

lblSPTINTo.Caption = rsMM("SPTIN") 
lblCPTINTo.Caption = rsMM("CPTIN") 

я пытаюсь использовать функцию подстроки, чтобы получить последние 4 символа, но я не буду в состоянии использовать его, как он бросает ошибку компиляции.

lblSPTINTo.Caption = rsMM("SPTIN").sutbstring(4,4) 
+1

Я не вижу никакого кода который использует 'Substring' – OneFineDay

+0

Ваше использование делает подстроку из 4-го индекса и делает его длиной 4 символа. Где вам нужно получить длину и -4 от этого, а не поставить второй параметр. – OneFineDay

+2

Это код VB6 или VB.NET? Элемент управления «Ярлык» .NET не имеет свойства 'Caption', но я думаю, что это делает VB6. Если код VB6, это объясняет, почему 'Substring' недоступен. Если это VB.NET, то это 'Caption', который недоступен. Если это VB.NET и вы исправляете проблему компиляции, она все равно будет разбиваться во время выполнения. У вас не так много для этого кода. – jmcilhinney

ответ

1

Заменить sutbstring с Substring.

Но это не будет работать таким образом, потому что первый параметр является индексом, а второй параметр в Substring длина, если вы хотите, чтобы последние 4 символа:

Dim last4 As String = rsMM("SPTIN") 
If last4.Length > 4 Then last4 = last4.Substring(last4.Length - 4) 
+1

Я уверен, что это была опечатка. Из его редактирования вы можете видеть, где они поступили не так. – OneFineDay

+0

@OneFineDay: это может быть опечатка, но это также вызвало ошибку компилятора errorOP. –

Смежные вопросы