Trackback é algo interessante que deve ser lido no seguinte endereço :
http://virgulaimagem.redezero.org/voce-tem-um-blogue-use-trackback-e-viva-a-discussao/
MANCKENNA
27/07/2006
Prezado Antonio:
Obrigado por ler meu livro.
A Janela Imediata é uma janela para se testar comandos executáveis no
Access: funções do VBA, procedimentos que você escreveu (como DIV2( ))
e
instruções da linguagem.
Na primeira linguagem BASIC, o comando de impressão era o "?". Sempre
que
você queria fazer algo aparecer na tela (ou na impressora), usava o ?
seguido do comando. Isso é uma espécie de tradição nessas linguagens
(que
muitas herdaram).
Assim, na janela Verificação Imediata, você usa o ? para imprimir nela
mesmo
o resultado de uma comando (ou função).
O problema é que você está pressionando F5! F5 é o atalho para executar
uma
macro.
Digite
?Div2(10)
E pressione ENTER.
O número 5 deverá aparece na linha embaixo.
Mas, atenção. Existe uma falha nas figuras do livro. Há um comando,
declarado a nível de módulo, que exige a declaração de variáveis. Este
comando é "Option Explicit". Se este comando estiver logo abaixo do
comando
"Option Compare Database", você terá de declarar a variável x dentro do
procedimento DIV2.
A sua listagem está correta, sem "Option Explicit":
Option Compare Database
Public Function Div2(y)
x = y / 2
Div2 = x
End Function
Mas, se Option Explicit estiver escrita (indicando que você optou pela
declaração explicita das variáveis), deverá ficar assim:
Option Compare Database
Option Explicit
Public Function Div2(y)
Dim x
x = y / 2
Div2 = x
End Function
Sacou?
Espero ter lhe ajudado.
Abraço,
Flavio Morgado
Escrito por Manckenna às 16h08
[ ] [ envie esta mensagem ]
18/04/2006
Option Explicit
Private Sub Form_Load()
Label1.Caption = "enter String"
Label2.Caption = ""
Label3.Caption = ""
Label4.Caption = ""
Text1.Text = "This is a Test."
Command1.Caption = "Get Substrings"
End Sub
Private Sub Command1_click()
Dim string1 As String
Dim String2 As String
Dim String3 As String
Dim String4 As String
string1 = Text1.Text
String2 = Left(string1, 5)
String3 = Right(string1, 5)
String4 = Mid(string1, 3, 5)
Label2.Caption = "First five characters are " & "'" & String2 & "'"
Label3.Caption = "Last five characters are " & "'" & String3 & "'"
Label4.Caption = "five characters in the midle are " & "'" & String4 & "'"
End Sub
Escrito por Manckenna às 16h28
[ ] [ envie esta mensagem ]
Retornando Caracteres "Esquerda","Direita","Meio"
Função Left
Esta função tem o objetivo de retornar x caracteres a partir da esquerda de uma string. Sua sintaxe é:
Left (variável, número_caracteres)
Observe o exemplo a seguir:
Private Sub Fom_load()
Dim empresa as String
Let empresa="Projeto Aprenda em Casa"
MsgBox (left(empresa,7))
End Sub
No exemplo acima, teremos uma caixa de mensagens apenas com a palavra "Projeto", pois solicitamos que seja exibida na mesma apenas as 7 primeiras posições (caracteres) da variável empresa.
Função Right
Tem praticamente o mesmo objetivo da função Left, com exceção de retornar x caracteres a partir da direita da String. Veja o exemplo a seguir:
Private Sub Fom_load()
Dim empresa as String
Let empresa="Projeto Aprenda em Casa"
MsgBox (Right(empresa,7))
End Sub
No exemplo acima, teremos uma caixa de mensagens apenas com a frase "em Casa", ou seja, os 7 últimos caracteres da variável "empresa".
No próximo módulo continuaremos a estudar as funções e gerar um novo aplicativo.
Escrito por Manckenna às 15h51
[ ] [ envie esta mensagem ]
Aula de VB 6.0
Colocando Um Formulário no Meio da Tela e Abilitando o comando Resize
Private Sub Form_Load()
Form1.Caption = "Projeto Aprenda em Casa"
Move (Screen.Width - Width) / 2, (Screen.Height - Height) / 2
End Sub
Private Sub Form_resize()
Move (Screen.Width - Width) / 2, (Screen.Height - Height) / 2
End Sub
Private Sub Form_Unload(Cancel As Integer)
MsgBox ("Obrigado Pelo Uso de Nosso Aplicativo"), vbYes
End Sub
Escrito por Manckenna às 13h55
[ ] [ envie esta mensagem ]
28/11/2005
REFERÊNCIA RÁPIDA PARA HTML
REFERÊNCIA RÁPIDA PARA HTML
Escrito por Manckenna às 11h59
[ ] [ envie esta mensagem ]
27/11/2005
Sendo assim temos a página padrão XHTML :
<!DOCTYPE html PUBLIC “-//W3C/DTD XHTML 1.0 Transitional//EM”
“http://www.w3.org/TR/xhtml1/DTD/transitional.dtd>
<html>
<head>
<title>Minha Página HTML de Modêlo</title>
<head>
<body>
<h1>Esta é uma página HTML</h1>
</body>
</html>
Programas para ajudá-lo a escrever em HTML
Existem diversos e ótimos programas para ajudá-lo a escrever suas páginas , estes programas são em sua maioria tipo shareware,freeware estão disponíveis para rdição de arquivos HTML .Esses programas em sua maior parte, são editores de texto básicos com itens de menu botões extras que inserem as TAGs HTML apropriadas em seu texto. Os editores de texto baseados em HTML são realmete ótimos por dois motivos .você não precisa se lembrar de todas as TAGs e não precisa do tempo de digitação de todas elas, porém é muito bom você ter conhecimento como funciona este processo pois poderá haver momento em que você poderá ter que corrigir um simples erro e não ter por perto programa destes e a sua falta de conhecimento poderá implicar até mesmo em atraso ou perda da oportunidade de mostrar para seus observadores (que pode ser seu chefe,aluno,colega ) seu conhecimento de causa, e deixar de resolver assim uma simples ocorrência pela dependência de um programa que nesta hora poderia ser dispensável....
Escrito por Manckenna às 12h01
[ ] [ envie esta mensagem ]
HTML
Html é uma abreviação de Hypertext Markup Language(Linguagem de Marcação de Hipertexto) , o HTML baseou-se no SGML (Standard Generalized Markup Language- Linguagem de Marcação Generalizada Padrão).
O HTML devido à sua herança SGML, é uma linguagem para descrição da estrutura de um documento é não sua verdadeira apresentação. O HTML não descreve o Layout de uma página para isto existe as CSS(Cascading Style Sheets-Folhas de Estilo em Cascata) , que permite que você aplique uma formatação avançadas as TAGs HTML.
O HTML é uma linguagem de marcação .Escrever em uma linguagem de marcação significa que você começa com o texto de sua página e acrescnta TAGs especiais envolvendo palavras e parágrafos.As TAGs por sua vez produzem diferentes efeitos no navegador, é preciso estar ciente disto pois pois navegadores mais antigos não vão com certeza apresentar a sua página conforme você as vê em um navegador mais recente....
Atualmente (25/09/2005) a versão do HTML mais recente o o HTML 4.0 mas parece que não vai existir o HTML 5.0 pois o futuro da Internet precisa de uma linguagem de marcação que seja mais extensível e portátil do que o HTML, o caminho está levando ao uso do XML (Extensible Markup Language-linguagem de Marcação Extensível), um subconjunto do SGML que permite que TAGs personalizadas sejam processadas, onde então entra o XHTML em sua primeira versão XHTML 1.0.......
Escrito por Manckenna às 12h00
[ ] [ envie esta mensagem ]
22/09/2005
Calculadora 2 em Visual Basic
Alguém sabe como colocar estes códigos em ordem de modo que a calculadora funcione?
O primeiro passo é configurar os botões de comando que representam os números que irão ser utilizados no teclado numérico de nossa calculadora. A lógica é a seguinte: Cada vez que o usuário clicar sobre um dos botões numéricos, este deverá se acrescentado ao TextBox. Ou seja, teríamos a seguinte situação:
Conteúdo do TextBox = Conteúdo do TextBox + valor representado pelo botão.
Observe que, o TextBox é uma String e, deveremos realizar uma concatenação, ou seja, soma do valor já armazenado nesta objeto com o valor representado pelo botão clicado. Assim sendo, para o botão que representa o número "1" teremos o seguinte código:
Private Sub Command1_Click()
Text1.Text = Text1.Text + "1"
End Sub
Este mesmo procedimento será utilizado para os botões 2, 3, 4, 5, 6, 7, 8, 9 e 0, apenas substituindo o "1" por "2" ... "3" .... e assim sucessivamente. Observe a sequência a seguir:
Código para o botão 2:
Private Sub Command2_Click()
Text1.Text = Text1.Text + "2"
End Sub
Código para o botão 3:
Private Sub Command3_Click()
Text1.Text = Text1.Text + "3"
End Sub
Código para o botão 4:
Private Sub Command4_Click()
Text1.Text = Text1.Text + "4"
End Sub
Código para o botão 5:
Private Sub Command5_Click()
Text1.Text = Text1.Text + "5"
End Sub
Código para o botão 6:
Private Sub Command6_Click()
Text1.Text = Text1.Text + "6"
End Sub
Código para o botão 7:
Private Sub Command7_Click()
Text1.Text = Text1.Text + "7"
End Sub
Código para o botão 8:
Private Sub Command8_Click()
Text1.Text = Text1.Text + "8"
End Sub
Código para o botão 9:
Private Sub Command9_Click()
Text1.Text = Text1.Text + "9"
End Sub
Código para o botão 0:
Private Sub Command10_Click()
Text1.Text = Text1.Text + "0"
End Sub
Pronto, nossa calculadora já possui a codificação para que, ao clicar sobre os botões que representam os números, estes sejam repassados ao visor de nossa calculadora (TextBox). Lembramos que esta calculadora irá operar apenas com cliques do Mouse.
A seguir, vamos codificar os botões que representam as operações aritméticas. Ao clicar sobre um botão de soma, subtração, etc... temos que saber o seguinte:
1. Deveremos armazenar o conteúdo do TextBox em uma determinada variável;
2. Zerar o conteúdo do TextBox para que este receba o novo valor, que irá operar com o valor anterior;
3. Em seguida, após clicar sobre o botão de igualdade, será realizada a operação entre o valor anterior do TextBox que foi armazenado em uma variável e o novo valor digitado no componente.
Com esta lógica, entre com a seguinte codificação para o botão de soma:
Private Sub Command11_Click()
valor = Val(Text1.Text)
Text1.Text = ""
operacao = "soma"
End Sub
No código acima, primeiro armazenamos na variável VALOR, o conteúdo numérico do objeto Text1.text. Esta transformação de String para número se deu pela função VAL. Em seguida, foi zerado o conteúdo armazenado no objeto TextBox e foi armazenado em uma outra variável a string SOMA, para que no ato da operação matemática a ser realizada seja identificado o tipo de operador.
Aqui temos um problema, usamos duas variáveis porém não declaramos as mesmas, assim sendo, nas declarações gerais do formulário (GENERAL ... DECLARATIONS), deveremos declara-las. Conforme mostra o código a seguir:
Public valor As Single
Public operacao As String
Agora, vamos proceder da mesma forma para a codificação do botão de subtração, substituindo o conteúdo da variável operação para SUBTRACAO, conforme mostra o código a seguir para o bota~em questão:
Private Sub Command12_Click()
valor = Val(Text1.Text)
Text1.Text = ""
operacao = "subtracao"
End Sub
Agora, vamos codificar o botão que representa a multiplicação:
Private Sub Command14_Click()
valor = Val(Text1.Text)
Text1.Text = ""
operacao = "multiplicacao"
End Sub
Iremos então codificar o botão de divisão:
Private Sub Command13_Click()
valor = Val(Text1.Text)
Text1.Text = ""
operacao = "divisao"
End Sub
Agora, nosso próximo passo é codificar o botão de igualdade, que deverá fazer apresentar no TextBox o resultado da operação aritmética realizada entre os dois valores. Para isso, deveremos utilizar o atual valor do TextBox com o tipo de operação a ser realizada bem como com o valor anterior armazenado na variável VALOR. Então, teremos no botão de igualdade o seguinte código:
Private Sub Command15_Click()
Select Case operacao
Case "soma"
valor = Val(Text1.Text) + valor
Case "subtracao"
valor = valor - Val(Text1.Text)
Case "multiplicacao"
valor = valor * Val(Text1.Text)
Case "divisao"
valor = valor / Val(Text1.Text)
End Select
Text1.Text = valor
End Sub
Aqui temos a grande novidade deste código em relação ao que já estudamos, o comando SELECT CASE. Observe que, dependendo do botão que representa a operação aritmética que foi clicado teremos uma operação diferente, porém este tipo de operação está sendo realizada com uma mesma variável que representa o tipo da operação, a variável OPERACAO. Neste caso, temos o conjunto de testes do SELECT CASE, onde para uma mesma variável, testamos diversas circunstâncias. A sintaxe deste comando é:
SELECT CASE variável
Case condição
lista de comandos a serem executados caso condição for verdadeira
Case condição
lista de comandos a serem executados caso condição for verdadeira
Case condição
lista de comandos a serem executados caso condição for verdadeira
....
....
END SELECT
Em poucas palavras ... é uma maneira de realizar diversos testes com uma mesma variável, o que nos foi fundamental para o desenvolvimento desta calculadora.
Nos falta apenas codificao o botão FIM, que tem apenas o código END e o botão "Ce" que tem a finalidade de apagar o conteúdo do TextBox, sendo assim, neste teremos o código TEXT1.TEXT="".
Agora, basta executar o seu projeto.
Eu me enrolei aqui neste item não sei como fazer para inserir este item no código:
Aqui temos um problema, usamos duas variáveis porém não declaramos as mesmas, assim sendo, nas declarações gerais do formulário (GENERAL ... DECLARATIONS), deveremos declara-las. Conforme mostra o código a seguir:
Public valor As Single
Public operacao As String_________________
O primeiro passo é configurar os botões de comando que representam os números que irão ser utilizados no teclado numérico de nossa calculadora. A lógica é a seguinte: Cada vez que o usuário clicar sobre um dos botões numéricos, este deverá se acrescentado ao TextBox. Ou seja, teríamos a seguinte situação:
Conteúdo do TextBox = Conteúdo do TextBox + valor representado pelo botão.
Observe que, o TextBox é uma String e, deveremos realizar uma concatenação, ou seja, soma do valor já armazenado nesta objeto com o valor representado pelo botão clicado. Assim sendo, para o botão que representa o número "1" teremos o seguinte código:
Private Sub Command1_Click()
Text1.Text = Text1.Text + "1"
End Sub
Este mesmo procedimento será utilizado para os botões 2, 3, 4, 5, 6, 7, 8, 9 e 0, apenas substituindo o "1" por "2" ... "3" .... e assim sucessivamente. Observe a sequência a seguir:
Código para o botão 2:
Private Sub Command2_Click()
Text1.Text = Text1.Text + "2"
End Sub
Código para o botão 3:
Private Sub Command3_Click()
Text1.Text = Text1.Text + "3"
End Sub
Código para o botão 4:
Private Sub Command4_Click()
Text1.Text = Text1.Text + "4"
End Sub
Código para o botão 5:
Private Sub Command5_Click()
Text1.Text = Text1.Text + "5"
End Sub
Código para o botão 6:
Private Sub Command6_Click()
Text1.Text = Text1.Text + "6"
End Sub
Código para o botão 7:
Private Sub Command7_Click()
Text1.Text = Text1.Text + "7"
End Sub
Código para o botão 8:
Private Sub Command8_Click()
Text1.Text = Text1.Text + "8"
End Sub
Código para o botão 9:
Private Sub Command9_Click()
Text1.Text = Text1.Text + "9"
End Sub
Código para o botão 0:
Private Sub Command10_Click()
Text1.Text = Text1.Text + "0"
End Sub
Pronto, nossa calculadora já possui a codificação para que, ao clicar sobre os botões que representam os números, estes sejam repassados ao visor de nossa calculadora (TextBox). Lembramos que esta calculadora irá operar apenas com cliques do Mouse.
A seguir, vamos codificar os botões que representam as operações aritméticas. Ao clicar sobre um botão de soma, subtração, etc... temos que saber o seguinte:
1. Deveremos armazenar o conteúdo do TextBox em uma determinada variável;
2. Zerar o conteúdo do TextBox para que este receba o novo valor, que irá operar com o valor anterior;
3. Em seguida, após clicar sobre o botão de igualdade, será realizada a operação entre o valor anterior do TextBox que foi armazenado em uma variável e o novo valor digitado no componente.
Com esta lógica, entre com a seguinte codificação para o botão de soma:
Private Sub Command11_Click()
valor = Val(Text1.Text)
Text1.Text = ""
operacao = "soma"
End Sub
No código acima, primeiro armazenamos na variável VALOR, o conteúdo numérico do objeto Text1.text. Esta transformação de String para número se deu pela função VAL. Em seguida, foi zerado o conteúdo armazenado no objeto TextBox e foi armazenado em uma outra variável a string SOMA, para que no ato da operação matemática a ser realizada seja identificado o tipo de operador.
Aqui temos um problema, usamos duas variáveis porém não declaramos as mesmas, assim sendo, nas declarações gerais do formulário (GENERAL ... DECLARATIONS), deveremos declara-las. Conforme mostra o código a seguir:
Public valor As Single
Public operacao As String
Agora, vamos proceder da mesma forma para a codificação do botão de subtração, substituindo o conteúdo da variável operação para SUBTRACAO, conforme mostra o código a seguir para o bota~em questão:
Private Sub Command12_Click()
valor = Val(Text1.Text)
Text1.Text = ""
operacao = "subtracao"
End Sub
Agora, vamos codificar o botão que representa a multiplicação:
Private Sub Command14_Click()
valor = Val(Text1.Text)
Text1.Text = ""
operacao = "multiplicacao"
End Sub
Iremos então codificar o botão de divisão:
Private Sub Command13_Click()
valor = Val(Text1.Text)
Text1.Text = ""
operacao = "divisao"
End Sub
Agora, nosso próximo passo é codificar o botão de igualdade, que deverá fazer apresentar no TextBox o resultado da operação aritmética realizada entre os dois valores. Para isso, deveremos utilizar o atual valor do TextBox com o tipo de operação a ser realizada bem como com o valor anterior armazenado na variável VALOR. Então, teremos no botão de igualdade o seguinte código:
Private Sub Command15_Click()
Select Case operacao
Case "soma"
valor = Val(Text1.Text) + valor
Case "subtracao"
valor = valor - Val(Text1.Text)
Case "multiplicacao"
valor = valor * Val(Text1.Text)
Case "divisao"
valor = valor / Val(Text1.Text)
End Select
Text1.Text = valor
End Sub
Aqui temos a grande novidade deste código em relação ao que já estudamos, o comando SELECT CASE. Observe que, dependendo do botão que representa a operação aritmética que foi clicado teremos uma operação diferente, porém este tipo de operação está sendo realizada com uma mesma variável que representa o tipo da operação, a variável OPERACAO. Neste caso, temos o conjunto de testes do SELECT CASE, onde para uma mesma variável, testamos diversas circunstâncias. A sintaxe deste comando é:
SELECT CASE variável
Case condição
lista de comandos a serem executados caso condição for verdadeira
Case condição
lista de comandos a serem executados caso condição for verdadeira
Case condição
lista de comandos a serem executados caso condição for verdadeira
....
....
END SELECT
Em poucas palavras ... é uma maneira de realizar diversos testes com uma mesma variável, o que nos foi fundamental para o desenvolvimento desta calculadora.
Nos falta apenas codificao o botão FIM, que tem apenas o código END e o botão "Ce" que tem a finalidade de apagar o conteúdo do TextBox, sendo assim, neste teremos o código TEXT1.TEXT="".
Agora, basta executar o seu projeto.
Eu me enrolei aqui neste item não sei como fazer para inserir este item no código:
Aqui temos um problema, usamos duas variáveis porém não declaramos as mesmas, assim sendo, nas declarações gerais do formulário (GENERAL ... DECLARATIONS), deveremos declara-las. Conforme mostra o código a seguir:
Public valor As Single
Public operacao As String_________________
Escrito por Manckenna às 16h03
[ ] [ envie esta mensagem ]
Calculadora 1 em Visual Basic
Public valor As Double
Public operacao As String
Private Sub bt0_Click(Index As Integer)
display.Text = display.Text + Str(0)
display.SetFocus
End Sub
Private Sub bt1_Click(Index As Integer)
display.Text = display.Text + Str(1)
display.SetFocus
End Sub
Private Sub bt2_Click(Index As Integer)
display.Text = display.Text + Str(2)
display.SetFocus
End Sub
Private Sub bt3_Click(Index As Integer)
display.Text = display.Text + Str(3)
display.SetFocus
End Sub
Private Sub bt4_Click(Index As Integer)
display.Text = display.Text + Str(4)
display.SetFocus
End Sub
Private Sub bt5_Click(Index As Integer)
display.Text = display.Text + Str(5)
display.SetFocus
End Sub
Private Sub bt6_Click(Index As Integer)
display.Text = display.Text + Str(6)
display.SetFocus
End Sub
Private Sub bt7_Click(Index As Integer)
display.Text = display.Text + Str(7)
display.SetFocus
End Sub
Private Sub bt8_Click(Index As Integer)
display.Text = display.Text + Str(8)
display.SetFocus
End Sub
Private Sub bt9_Click(Index As Integer)
display.Text = display.Text + Str(9)
display.SetFocus
End Sub
Private Sub btadc_Click(Index As Integer)
operacao = "+"
valor = Val(display.Text)
display.Text = ""
display.SetFocus
End Sub
Private Sub btdiv_Click(Index As Integer)
operacao = "/"
valor = Val(display.Text)
display.Text = ""
display.SetFocus
End Sub
Private Sub btigl_Click(Index As Integer)
Select Case operacao
Case "+"
valor = valor + Val(display.Text)
Case "-"
valor = valor - Val(display.Text)
Case "/"
If (Val(display.Text) = 0) Then
valor = 0
Else
valor = valor / Val(display.Text)
End If
Case "*"
valor = valor * Val(display.Text)
End Select
display.Text = Str(valor)
display.SetFocus
End Sub
Private Sub btlimp_Click(Index As Integer)
display.Text = ""
valor = 0
display.SetFocus
End Sub
Private Sub btlnv_Click(Index As Integer)
valor = Val(display.Text)
valor = valor * (-1)
display.Text = Str(valor)
display.SetFocus
End Sub
Private Sub btmut_Click(Index As Integer)
operacao = "*"
valor = Val(display.Text)
display.Text = ""
display.SetFocus
End Sub
Private Sub btpercent_Click(Index As Integer)
Select Case operacao
Case "+"
valor = valor + (valor(Val(display.Text) / 100))
Case "-"
valor = valor + (valor(Val(display.Text) / 100))
Case "/"
If (Val(display.Text) = 0) Then
valor = 0
Else
valor = valor / (valor(Val(display.Text) / 100))
End If
Case "*"
valor = valor * (valor(Val(display.Text) / 100))
End Select
display.Text = Str(valor)
display.SetFocus
End Sub
Private Sub btpto_Click(Index As Integer)
display.Text = display.Text + "."
display.SetFocus
End Sub
Private Sub btraiz_Click(Index As Integer)
display.Text = Sqr(Val(display.Text))
display.SetFocus
End Sub
Private Sub btsub_Click(Index As Integer)
operacao = "-"
valor = Val(display.Text)
display.Text = ""
display.SetFocus
End Sub
Escrito por Manckenna às 16h01
[ ] [ envie esta mensagem ]
19/09/2005
Faça um algorítimo para exibir a multiplicação de dois números inteiros informado pelo usuário:
Resolução:
Variáveis
Num1,Num2,Mult:Inteiro;
Início
Ler Num1;
Ler Num2;
Mult <-- Num1 * Num2;
Escrever Mult;
Fim
Alguém sabe como posso colocar o código acima em visual Basic para funcionar?
Resolução:
Variáveis
Num1,Num2,Mult:Inteiro;
Início
Ler Num1;
Ler Num2;
Mult <-- Num1 * Num2;
Escrever Mult;
Fim
Alguém sabe como posso colocar o código acima em visual Basic para funcionar?
Para fazer direto sem usar textbox e botão faz assim:
Da uma maneira bem resumida:
CODE
Private Sub form_load()
MsgBox "O Resultado da multiplicação é " & Val(InputBox("Primeiro Número")) * Val(InputBox("Segundo Número"))
End Sub
Ou detalhada:
CODE
Private Sub form_load()
dim num1,num2,resultado as double
num1 = Val(InputBox("Primeiro Número"))
num2 = Val(InputBox("Segundo Número"))
resultado = num1 * num2
MsgBox "O Resultado da multiplicação é " & resultado
End Sub
Escrito por Manckenna às 08h43
[ ] [ envie esta mensagem ]
03/08/2005
MEUS FÓRUNS PREFERIDOS:
| Links já incluídos em seu blog |
Escrito por Manckenna às 18h44
[ ] [ envie esta mensagem ]
T
Escrito por Manckenna às 18h22
[ ] [ envie esta mensagem ]
Veja Novos links de informática....
Escrito por Manckenna às 08h54
[ ] [ envie esta mensagem ]
Veja os Links de Informática Publicado...
Escrito por Manckenna às 08h50
[ ] [ envie esta mensagem ]
Perfil
Histórico
Votação
Outros Sites
- Letras Traduzidas
- Empresas Para Procurar Empregos - 01
- Empresas Para Procurar emprego - 02
- Empresa Para Procurar Emprego - 03
- Meu MSN
- ASP BRASIL
- BABOO
- ATIVO
- FÓRUM BR
- IMASTER
- HIPER FÓRUM
- WMOLINE
- FIRE MASTER
- BLUGMASTER
- SCRIPT BRASIL
- TECNOCIÊNCIA
- JÚLIO BATTISTI
- FÓRUM ACCESS
- Win Fórum
Leia este blog no seu celular
Visitante Número
