damalgus 0 Report post Posted July 13 Olá! Eu carrego em uma textbox um arquivo TXT com N linhas e preciso inserir um ";" a cada 56 caracteres, por 20 vezes, ou seja, 56 caracteres add ; (20 vezes e pula para próxima linha) Estou fazendo com o código abaixo, mas o ";" aparece a cada 01 caractere, podem me ajudar? Dim aux As String = txtLinhas.Text txtLinhas.Text = String.Empty For i As Integer = 0 To aux.Length - 56 txtLinhas.Text &= aux.Chars(i).ToString + ";" Next Share this post Link to post Share on other sites
M6 146 Report post Posted July 14 Depois da linha faz um ciclo de 1 a 20 e adiciona ; ao txtLinhas.Text. 10 REM Generation 48K! 20 INPUT "URL:", A$ 30 IF A$(1 TO 4) = "HTTP" THEN PRINT "400 Bad Request": GOTO 50 40 PRINT "404 Not Found" 50 PRINT "./M6 @ Portugal a Programar." Share this post Link to post Share on other sites
