HCD

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????

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

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

seu VB é pirata não é?? O meu também. hehehe acho que não da pra pegar aparte o Help mas se eu encontrar te dou um toque via e-mail ou vice e versa falow

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??

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.

Bom do jeito que voce está falando voce que a gente crie um programa pra voce e não ajude a voce a fazer Comece a estudar o funcionamento das ferramentas Textbox, Listbox e Combobox ai comeca a fazer, depois em alguma duvida a gente te ajuda no que for possivel

entendi. isso que e logica da programacao ou não e pra mim que to praticamnete comecando a programar é importante saber logica da programacao mesmo sem saber quase nada ou so é bom estudar logica da programacao com um nivel quase intermediario

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

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??? :(