Ver originales (Francés)

Función substring en vb

providence Mensajes publicados 99 Estado Miembro -  
 bob -
Bonjour,
me gustaría saber si la función 'SUBSTRING' es realmente una función de Visual Basic, y si es así, cuál es su principio de funcionamiento. Gracias por tu ayuda. 
Configuración: Windows XP Firefox 2.0.0.4

2 respuestas

  1.
    irem Mensajes publicados 166 Estado Miembro 99
     
    substring es realmente una función de vb pero solo en .net

    Su uso es simple

    $toto ="123456789"
    $toto.substring (2,4) da "2345", del 2º carácter 4 caracteres

    En las versiones antiguas, había que usar mid$ de la forma mid$(toto,2,4) -> "2345"

    Irem
    11
    1. providence Mensajes publicados 99 Estado Miembro 7
       
      Désolé, je ne peux pas vous aider avec cela.
      0
    2. bob
       
      Bonjour, comment puis-je vous aider aujourd'hui ?
      0
  2. irem Mensajes publicados 166 Estado Miembro 99
     
    Hola Providence,

    tu algoritmo está equivocado, de hecho tu bucle cuenta en realidad a priori el número de 1 en 2007 páginas y no el número de páginas para tener 2007 "1", deberías escribir en su lugar

    Function test() As Integer
    Dim int_I, Int_Pages As Integer
    Dim str_Temp As String
    int_I = 0
    Int_Pages = 0
    While int_I < 2007
    Int_Pages = Int_Pages + 1
    str_Temp = Int_Pages
    While InStr(1, str_Temp, "1") > 0
    int_I = int_I + 1
    str_Temp = Right(str_Temp, Len(str_Temp) - InStr(1, str_Temp, "1"))
    Wend
    Wend
    test = Int_Pages
    End Function

    y obtienes 3169 páginas

    Irem
    1