USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Como usar o comando Val e Mid?
Thiago
não registrado
ENUNCIADA !
Postada em 18/02/2008 21:30 hs   
Olá a todos, gostaria de saber para que servem e como usar os comandos Val e Mid.
Agradeço desde já pelas respostas!
   
Defende
JARINÚ
SP - BRASIL
ENUNCIADA !
Postada em 18/02/2008 22:55 hs            
Retirado do help dp VB

VAL:

Returns the numbers contained in a string as a numeric value of appropriate type.

Syntax

Val(string)

The required stringargument is any validstring expression.

Remarks

The Val function stops reading the string at the Min character it can't recognize as part of a number. Symbols and characters that are often considered parts of numeric values, such as dollar signs and commas, are not recognized. However, the function recognizes the radix prefixes &O (for octal) and &H (for hexadecimal). Blanks, tabs, and linefeed characters are stripped from the argument.

The following returns the value 1615198:

Val("    1615 198th Street N.E.")

In the code below, Val returns the decimal value -1 for the hexadecimal value shown:

Val("&HFFFF")

Note   The Val function recognizes only the period (.) as a valid decimal separator. When different decimal separators are used, as in international applications, use CDbl instead to convert a string to a number.

MID:
Description
Returns a specified number of characters from a string.
Syntax
Mid(string, start[, length])

Remarks
To determine the number of characters in string, use the Len function.
The following example uses the Mid function to return six characters, beginning with the fourth character, in a string:

Dim MyVar
MyVar = Mid("VB Script is fun!", 4, 6) 'MyVar contains "Script".

   
Thiago
não registrado
ENUNCIADA !
Postada em 19/02/2008 00:21 hs   
Muito obrigado pela resposta Defende!
E o comando InStr ele serve exatamente para o que?
Eu olharia o HELP do VB, mas estou em um micro sem VB
   
Defende
JARINÚ
SP - BRASIL
ENUNCIADA !
Postada em 19/02/2008 10:49 hs            
O InStr serve para voce procurar por string dentro de uma palavra ou frase.
Estou colando abaixo o que o help diz. Qualquer coisa manda ai.

Syntax
InStr([start, ]string1, string2[, compare])

Remarks
The following examples use InStr to search a string:
Dim SearchString, SearchChar, MyPos
SearchString ="XXpXXpXXPXXP"            ' String to search in.
SearchChar = "P"                        ' Search for "P".

' A textual comparison starting at position 4. Returns 6.
MyPos = Instr(4, SearchString, SearchChar, 1)  

' A binary comparison starting at position 1. Returns 9.
MyPos = Instr(1, SearchString, SearchChar, 0)

' Comparison is binary by default (Max argument is omitted).
MyPos = Instr(SearchString, SearchChar)    ' Returns 9.

' A binary comparison starting at position 1. Returns 0 ("W" is not found).
MyPos = Instr(1, SearchString, "W")      
   
ALguem mi ajuda
não registrado
ENUNCIADA !
Postada em 20/10/2009 16:12 hs   
o exercicio é :  de Login ii senha ja fiz..  ajuda eoOo .. vai

Gerador de documentação
Tela de login com senha armazenada ("abc")
Na tela inicial deve aparecer o logo de sua empresa e a frase "Sistema de Cadastro de Serviços"

por meio de um menu criar botões para acessar as seguintes áreas:

1.)Cadastro de dados de usuário (CLIENTE/CONTRATANTE)
Nome / Razão Social
Sobrenome
Endereço
Cidade
Estado
CEP
CPF / CNPJ
Data da Contratação
Telefone, etc., conforme necessário

Botão que abrirá um segundo formulário e que preencha um texto em uma textbox com os dados do usuário nos locais corretos
O texto deve ser o de um pequeno contrato a seguir:
-----------------------------------------------------------------------
CONTRATO DE PRESTAÇÃO DE SERVIÇOS DE CONSULTORIA EM INFORMÁTICA

CONTRATANTE:  (nome do cliente, CPF, endereço, etc.) neste ato representada por (nome do representante legal, nacionalidade, estado civil, profissão, RG, CPF/CNPJ).
CONTRATADO(A): (nome do(a) profissional, nacionalidade, estado civil,   RG, CPF, endereço).
Pelo presente instrumento particular de Contrato de Prestação de Serviços e de Assunção de Responsabilidade Técnica, as partes acima qualificadas têm entre si justo e avançado o seguinte:

CLÁUSULA PRIMEIRA – DO OBJETO
A CONTRATANTE, empresa cuja atividade é da área da química, a fim de atender ao que determinam os artigos 26 e 29 da Lei nº 32.800/66, firma o presente contrato com o(a) CONTRATADO(A), o(a) qual obriga-se a prestar à CONTRATANTE serviços profissionais atinentes a sua formação técnico-científica e habilitação profissional na área de Informática e a assumir a responsabilidade técnica perante o referido órgão de fiscalização profissional (CREA) e outros que lhe exijam.
-----------------------------------------------------------------------
Além disso o botão deve detectar se um dos seguintes campos foi deixado em branco e emitir uma caixa de mensagem de aviso:
Nome / Razão Social
CPF / CNPJ

2.)Um outro botão, acessível por um menu, permitirá cadastrar dados relativos aos valores e pagamentos pelo serviços:
Especificação dos Serviços
Valor/Hora
Quantidade de dias de trabalho
Valor total (calculado)
Caso o valor total ultrapasse R$ 5000,00 deverá aparecer uma combobox que permita escolher opções de parcelamento do pagamento (em até 3 vezes), e uma caixa de texto que mostre o valor de cada parcela.

3.) Sobre o sistema - digite dados sobre o sistema aqui (programador, data, versão, etc.).




   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página