Ir para conteúdo
Fórum Script Brasil

HCD

Membros
  • Total de itens

    10
  • Registro em

  • Última visita

Posts postados por HCD

  1. Pinto outra duvida!!

    Sim depois que descobri como se usa variavel agora já fiz ate m programa que so é baseado em Variaveis(basico mas digamos que complexo), ai tavo fazendo uma especie de "calculadora" ai eu me deparei com uma coisa!?

    vo explica

    tipo o usuario sempre que digita um numero aparece o que ele digitou, +ou- assim, voce calculo 2+2, mas pra fazer isso eu precisei usar variaveis (eu poderia sar txt1.text mas vou usar em esse numeros em outros lugares que o ".text" não da certo, não sei porque mas tudo bem) mas ai sempre que vo colocar o "Caption" da label não da nada eu já tentei de tudo mas noa sei

    Simplificando

    como eu coloco um fariavel no meio de um texto para Caption de uma label

    tipo:

    lbl_Status.Caption = "Voce Calculou (Nome_variavel)."

    tem jeito de colocar uma variavel desse jeito????

  2. apanhei mas consegui por enquanto, tava apanhando porque tava colocando o DIM junto com o codigo do botao ai fui lendo umas apostilas e descobri que voce so pode declara o tipo da variavel no Option Explicit

    pensei que podia declarar o tipo e o valor da variavel no mesmo lugar mas pelo visto não é assim

    se meu raciocinio tiver certo alguém pode confirmar senao alguém me ensina a fazer de outro jeito

  3. cara acho to ficando burro, não to conseguindo fazer uma coisa simples dessa!!! não é possivel!!!

    Assim eu fiz um form com dois Botoes (cmd1 e cmd2), uma Textbox (txt1) e uma Label (lblvar)

    Imagem:

    Link para imagem

    eu quero que gravar o que o usuario escreve na textbox numa varavel chamada Var1 e quando aperta exibir variavel, aparece na label o que o usuario escreveu na textbox

    aqui foi o que eu cheguei:

    Private Sub cmd1_Click()
    Dim Var1 As String
    Var1 = txt1.Text
    txt1.Text = "Variavel gravada"
    
    End Sub
    _______________________________________
    Private Sub cmd2_Click()
    lblvar.Caption = Var1
    
    End Sub

    mas quando eu aperto exibir variavel e da um erro e fala que a variavel não foi definida

    mensagem do erro:

    Compile error:

    Variable not defined

    mas eu não declarei a variavel aqui

    Dim Var1 As String

    Var1 = txt1.Text

    ou é porque essa variavel que eu quero não é string

  4. e como eu uso essa variavel que fiz num caption de uma label, ou colocar ela em outra textbox, ou pegar essa varivel e usar numa conta ou até mesmo usar numa MSGBOX.

    tipo no msdos sempre que voce está falando de uma variavel voce bota ela entre %.

    EX: "%variavelqueeuquero%"

    set /P variavelqueeuquero       'aqui define a variavel'
    if "%variavelqueeuquero%" == %1% goto certo
    já no VBS voce bota entre aspas e "&" tipo no exemplo abaixo EX: "& variavel &"
    Variavel1 = 19
    Variavel2 = HCD
    'obs: o primeiro nome na declaracao da var (nesse exemplo "variavel1 e 2") voce pode colocar qualquer coisa.
    
    msgbox ("Olá, meu nome é " & variavel2 & " e tenho " & variavel1" anos.")

    e no VB como faco pra usar as variaveis que declaro

    deu pra entender??

  5. Eu tenho uma textbox que quando aperta um botao ela é pra gravar uma varialvel String ai apetava outro botao ela fazia um calculo com essa variavel e botava a variavel num lbl.caption e o calculo numa outra textbox.

    mais ai é que está o problema eu não sei gravar variaveis no VB e muito menos exibir elas

    eu estudei bastante MS-Dos e vbs e é facil gravar variavel mas no VB tava "tentando estudar variaveis" mais as apostilas são muito complicadas e não tem exemplo e 70% do que aprendo é nos exemplos

    eu andei lendo e cheguei a conclusao que pra decalcar uma variavel é +ou- assim:

    dim Variavelqueeuquero as String
    Variavelqueeuquero = text1.text

    mas acho que está errado alguém pode fazer um exemplinho explicando pra mim se não for pedir muito :(

    -----------------------------------------------------------------------------------------------------------

    Outra pergunta

    Onde eu acho o estilo de programa XP (os botoes, os frame Saltados,etc)?

    é algum dll ou ocx que pega na net, ou já tem no PC???

    Obrigado pela atenção.

  6. EDITADO:

    a e sem quere se chato, o que você quis dizer com algaritimos?? e uma mistura de algarismo cum algoritmo??

    desculpa tava digitano rapido e nem vi que errei, era algarismo desculpa mesmo, to acustumado com o word que corrige as porcaria que a gente escreve.

    So + uma pergunta essa parte do if

    if Val(txt2.Text) <> 0 Then

    pra que serve as "setinhas" (<>) nunca vi um codigo com isso antes?! não é mais facil colocar = 0

    E pra que usa o else??

    Nesse codigo eu vi que ele funciona como continuacao mais não seria mas facil fazer assim:

    Private Sub cmdDividir_Click()

    if Val(txt2.Text) <> 0 Then

    - Aqui você da uma mensagem -

    End if

    txtresultado.Text = Val(txt1.Text) / Val(txt2.Text)

    lblalgaritimos.Caption = "/"

    End Sub

  7. to fazendo um calculadorinha so pra aprender a mexer com textbox mais ai voce tenta dividir 2 por 0 da essa mensagem:

    Run-time error '11'

    Division by zero

    Ou quando voce aperta o botao de dividir quando esta 0 e 0 ele da esse mensagem:

    Run-time error '6'

    overflow

    o codigo do botao de dividir é esse:

    Private Sub cmdDividir_Click()

    txtresultado.Text = Val(txt1.Text) / Val(txt2.Text)

    lblalgaritimos.Caption = "/"

    End Sub

    voces não sabem um codigo que "ignora" esse erro??? :(

×
×
  • Criar Novo...