[Ajuda] - Visual Basic 6

[P@uloF]

Boas!!!

Estou aki com um pekeno problema


Tenho duas caixas d texto, para entradas numericas, a text1 e a text 2 por exemplo, e entro com o valor 5 na text1 e com 10 na text2.

Kero k na listbox resultados, os numeros inicias apareçam da seguinte forma:

Num.iniciais
5
6
7
8
9
10

e dp o numero d elementos, à frente e da msma forma, dp dos calculos realizados....

Mas n tou a conseguir k "numero1" tome o valor desejado, n sei k ciclo utilizar!!!
s alguem m conseguir explicar agradecia mt!

deixo aki algumas linhas do meu código:

Numero1 = Val(Text_Entrada1.Text)
Numero2 = Val(Text_Entrada2.Text)
List_Saida.Clear
List_Saida.AddItem "Num.Inicial" & " " & "Num.Elementos"
Contador = 1
Do Until Numero1 = 1
 
If Numero1 Mod 2 = 0 Then
Numero1 = Numero1 / 2
 
Else
Numero1 = Numero1 * 3 + 1
 
End If
Contador = Contador + 1
Loop
List_Saida.AddItem (Numero1) & " " & (Contador)

Este "numero1" vai tomar valores do ciclo Do... como posso resolver isto?!?!


obrigado pela atenção

cumps

 

[cat3000]

Fazes:

if (numero1 < numero2) {
diferença= numero2 - numero1
}
elseif (numero1 > numero2) {
diferença= numero1 - numero2
}
else {
diferença= 0
}

Depois para mostrar na listbox:

for (i= numero1; i< diferença+1; i++) {
escrever i;
}

Acho que é isto...covém é adaptares agora ao basic...

 

[P@uloF]

Obrigado pela ajuda

Vou tentar fazer dessa forma, pode ser k resulte, só tou é com uma duvida na parte do ciclo for.

como é k vai ficar?!

é assim:

for i=numero1 to i<diferença+1
print i
next

n percebi a parte do "i++"

 

[P@uloF]

N estou a conseguir!

Isto está a dar comigo em doido!

 

[Kayvlim]

Em C:

for(i=numero1; i < diferença+1; i++)

Em VB isso corresponde a

for i = numero1 to diferença+1 STEP 1

porque

i++

é correspondente a

i = i + 1

sendo que o STEP 1 é facultativo.

 

[P@uloF]

humm ok.. então era isso!!!
pois o step é o passo e como é 1 nem é necessario

brigadão

 

[cat3000]

ups...peço desculpa...eu não programo em basic, em c++ estou agora a começar e o "i++" vem do php (em que já programo alguma coisa )

peço desculpa por não ter especificado, mas não conhecendo basic não podia adivinhar como se fazia nele

off: já foi bom ajudar porque é para mim um bom indicador de que o minha autodidáctica está a correr bem