Sabe aqueles erros do V.B., lá vai + uma.


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Sabe aqueles erros do V.B., lá vai + uma.

léee

OURINHOS
SP - BRASIL

Postada em 17/09/2004 17:57 hs

Tudo beleza, galera?

Sabe aqueles erros do V.B., lá vai + uma.

É o seguinte só tenho declarado no programa todo, variáveis como byte.

E numa estrutura de While estava dando erros, aí utilizei o “Toggle Breakpoint”, para ver os valores de variáveis, notei que uma delas estava assim: p=”3” e a outra t=3, ou seja, pelos testes que realizei quando surgi a variável entre as aspas acontece o erro. Já tentei trocar, renomear, mudar as variáveis, mas sempre uma delas ficam assim. O que fazer ?

Obs: as variáveis entram via txtbox.

valeu mesmo.

Nós somos uma família VBWEB, só prosperamos neste ambiente sensato. Meus votos de Felicidade à todos.

Geronimo

JOINVILLE
SC - BRASIL

Postada em 17/09/2004 18:24 hs

Mas o que você pretende fazer com a entrada nestas texbox seria calculo???

Você poderia postar um pedaço do codigo para analizarmos....

sds geronimo

"O pior inimigo que você poderá encontrar será sempre você mesmo."

léee

OURINHOS
SP - BRASIL

Postada em 18/09/2004 05:35 hs

O erro esta na parte da estrutura While.

Valeu, pela ajuda.

(General - declarations)

Dim i, j, c, p, t As Byte

(functions)
Function c_matriz()
If Tx(0) <> "" And Tx(1) <> "" And Tx(2) <> "" And Tx(3) <> "" Then
Lblx(3).Caption = Tx(0)
If (Tx(0) = Tx(1) = Tx(3)) Or (Opt(0).Value = True Or Opt(1).Value = True) Then
Lblx(4).Caption = Tx(1)
i = 1
j = 1
p = Tx(0)
t = Tx(1)
Do While i < p
    Do While j <= t
      Lblc(i & j).Visible = True
      Txtb(i & j).Visible = True
      Txta(i & j).Visible = True
      j = j + 1
    Loop
   j = 1
   i = i + 1
Loop

Nós somos uma família VBWEB, só prosperamos neste ambiente sensato. Meus votos de Felicidade à todos.

caco

SP - BRASIL

Postada em 18/09/2004 18:19 hs

Oi!

Quando ocorrer um erro mostre a linha e a mensagem que aparece pra facilitar que a gente te ajude, ok?

O que acontece é que você está declarando as variáveis incorretamente.

Dim i, j, c, p, t As Byte

Apenas t é do tipo Byte, as outras você está declarando como Variant. Por isso que o valor de p aparece entre aspas, pois você declarou como Variant e ao obter o valor do textbox ela é convertida para String.

Declarando corretamente:

Dim i As Byte, j As Byte, c As Byte, p As Byte, t As Byte

Outra forma é fazer a conversão explícita ao se obter o valor.

p = CByte(Tx(0))
t = CByte(Tx(1))

hehe, coitado do VB, parece até mordomo, a culpa é sempre dele.

Abraço. Flw!

Messenger: vbdev@uol.com.br

léee

OURINHOS
SP - BRASIL

Postada em 19/09/2004 22:50 hs

Epa, desculpa. Mas nem agradeci.

Valeu mesmo, pega ajuda.

Nós somos uma família VBWEB, só prosperamos neste ambiente sensato. Meus votos de Felicidade à todos.

Página(s): 1/1