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.).
|
|
|
|
|
