Solo necesito obtener 36 palabras del texto, entonces, ¿cómo las escribo?
.Especificación de biblioteca de soporte
. Subrutina get_number_method_1, texto
. Archivo original de parámetros, texto
Variable local i, entero
. >. Temperatura variable local, texto
. Texto de variable local, tipo de texto
bin = al conjunto de bytes (archivo original)
Cuente el primer ciclo (tome la longitud del conjunto de bytes (bin), i)
. . Si es verdadero (bin [i] ≥ 48 y bin [i] ≤ 58)
temp = caracteres (bin [i])
texto = texto temp
.Finalizar si es verdadero
.Contar el final del bucle ()
Devuelve (texto)
.Subrutina Fetch_Number_Method_2, texto
. Parámetro texto original, tipo de texto
.Variable local i, entero
.Variable local temp, tipo de texto
. Texto de variable local, tipo de texto
El primer ciclo del ciclo de conteo (obtener la longitud del texto (datos originales), i)
temp = obtener la mitad del texto. (datos originales) part(rawdata,i,1)
. Si es verdadero (temp = "0" o temp = "1" o temp = "2" o temp = "3 " o temp = "4" o temp = "5" o temp = "6" o temp = "7" o temp = "8" o temp = "9")
texto = texto temp
.Finalizar si es verdadero
.El bucle de conteo termina () p>
Retorno (texto)
.Subrutina _Button1_Clicked
Salida de depuración (Obtener números _Método 1 (Cuadro de edición 1. Contenido))
Salida de depuración (Obtener números _Método 2 (Cuadro de edición 1. Contenido))
.