{"id":292,"date":"2007-06-19T11:19:12","date_gmt":"2007-06-19T10:19:12","guid":{"rendered":"http:\/\/www.galhano.com\/blog\/?p=292"},"modified":"2008-02-07T18:25:48","modified_gmt":"2008-02-07T17:25:48","slug":"funcoes-vb","status":"publish","type":"post","link":"http:\/\/galhano.com\/blog\/?p=292","title":{"rendered":"Fun\u00c3\u00a7\u00c3\u00b5es VB"},"content":{"rendered":"

\u00c2 <\/p>\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n
Abs ( )<\/font><\/td>\nDevolve o numero absoluto.
\nAbs(n\u00c3\u00bamero)<\/font><\/td>\n<\/tr>\n
Mid ( )<\/font><\/td>\nRetorna uma substring de uma express\u00c3\u00a3o string
\nMid(exp ,in\u00c3\u00adcio, tamanho) sai vai ficar com “l\u00c3\u00a1”
\nsai vai ficar com “l\u00c3\u00a1”<\/font><\/td>\n<\/tr>\n
Array ( )<\/font><\/td>\nRetorna um Array
\nArray(lista_arg)<\/font><\/td>\n<\/tr>\n
Asc ( )<\/font><\/td>\nRetorna o c\u00c3\u00b3digo ANSI correspondente \u00c3 letra da string, que \u00c3\u00a9 pedida.
\ncodigo = Asc(“A”), Devolve 65<\/font><\/td>\n<\/tr>\n
Atn ( )<\/font><\/td>\nFun\u00c3\u00a7\u00c3\u00a3o usada para calcular o arco de tangente de um numero <\/font><\/td>\n<\/tr>\n
CBool ( )<\/font><\/td>\nCbool(5=5), devolve True
\nRetorna uma express\u00c3\u00a3o que representa o tipo boolean. Fazemos a compara\u00c3\u00a7\u00c3\u00a3o ou verificamos a vari\u00c3\u00a1vel, e ela devolve se \u00c3\u00a9 True ou False<\/font><\/td>\n<\/tr>\n
Cbyte ( )<\/font><\/td>\nDevolve uma express\u00c3\u00a3o que foi convertida para o tipo Byte dentro das limita\u00c3\u00a7\u00c3\u00b5es do mesmo.<\/font><\/td>\n<\/tr>\n
Ccur ( )<\/font><\/td>\nDevolve uma express\u00c3\u00a3o que foi convertida para o tipo Currency dentro das limita\u00c3\u00a7\u00c3\u00b5es do mesmo. <\/font><\/td>\n<\/tr>\n
Cdate ( )<\/font><\/td>\nDevolve uma express\u00c3\u00a3o que foi convertida para o tipo Date dentro das limita\u00c3\u00a7\u00c3\u00b5es do mesmo.
\nastringdata = “October 19, 1962”
\ndataconvertida = CDate(astringdata) ‘ ficou convertido para date<\/font><\/td>\n<\/tr>\n
CDbl ( )<\/font><\/td>\nDevolve uma express\u00c3\u00a3o que foi convertida para o tipo Double dentro das limita\u00c3\u00a7\u00c3\u00b5es do mesmo.<\/font><\/td>\n<\/tr>\n
AscB ( )<\/font><\/td>\nEm vez de devolver o c\u00c3\u00b3digo ANSI do primeiro caracter devolve do primeiro byte.<\/font><\/td>\n<\/tr>\n
AscW ( )<\/font><\/td>\nO AscW \u00c3\u00a9 fornecido para plataformas de 32bits que usam caracteres Unicode. Devolve o c\u00c3\u00b3digo do caracter Unicode (wide), evitando convers\u00c3\u00b5es do mesmo para ANSI.<\/font><\/td>\n<\/tr>\n
Chr ( )<\/font><\/td>\nDevolve o caracter associado ao c\u00c3\u00b3digo ANSI.
\nChr(65) devolve A<\/font><\/td>\n<\/tr>\n
CInt ( )<\/font><\/td>\nDevolve uma vari\u00c3\u00a1vel for\u00c3\u00a7ada a ser inteiro.
\nCint(“12”) devolve 12 como numero e n\u00c3\u00a3o como String<\/font><\/td>\n<\/tr>\n
Clng ( )<\/font><\/td>\nDevolve uma vari\u00c3\u00a1vel for\u00c3\u00a7ada a ser inteiro.
\nCint(“113123231424242342342”) devolve 113123231424242342342 como numero e n\u00c3\u00a3o como String<\/font><\/td>\n<\/tr>\n
Cos ( )<\/font><\/td>\nDevolve o Coseno de um \u00c3\u00a2ngulo<\/font><\/td>\n<\/tr>\n
CreateObject ( )<\/font><\/td>\nCria e devolve a refer\u00c3\u00aancia de um objecto.
\nSet referenciaobjecto = CreateObject(“comp.objecto”)<\/font><\/td>\n<\/tr>\n
CStr ( )<\/font><\/td>\nDevolve uma variante como sendo do tipo String
\nx = CStr(12)
\n‘ x fica igual a “12”, ou seja, passou um inteiro para String<\/font><\/td>\n<\/tr>\n
Cdate ( )<\/font><\/td>\nDevolve uma data de qualquer express\u00c3\u00a3o.
\ndata = Cdate(“qualquerexpressao”)
\nnormalmente usa-se IsDate para ver se \u00c3\u00a9 do tipo data e depois transforma-se para o tipo data.<\/font><\/td>\n<\/tr>\n
Day ( )<\/font><\/td>\nDevolve o dia de uma data
\nDay(“12, Janeiro, 2002”) devolve 12<\/font><\/td>\n<\/tr>\n
Eval ( )<\/font><\/td>\nValida uma express\u00c3\u00a3o, do tipo Eval(5=5) devolve True ou False<\/font><\/td>\n<\/tr>\n
Exp ( )<\/font><\/td>\nDevolve a exponencial de um valor.<\/font><\/td>\n<\/tr>\n
Filter ( )<\/font><\/td>\nDevolve um array com o resultado de uma pesquisa por filtragem de um String.
\nDim MeuIndex
\nDim MeuArray (3)
\nMeuArray(0) = “Domingo”
\nMeuArray(1) = “Segunda”
\nMeuArray(2) = “Ter\u00c3\u00a7a”
\nMeuIndex = Filter(MeuArray, “Seg”) ‘ MeuIndex(0) cont\u00c3\u00aam “Segunda”.<\/font><\/td>\n<\/tr>\n
Fix ( )<\/font><\/td>\nFormata um valor para o seu arredondamento
\nMeuNumero = Fix(99.2) ‘ Devolve 99.
\nMeuNumero = Fix(-99.8) ‘ Devolve -99.
\nMeuNumero = Fix(-99.2) ‘ Devolve -99.<\/font><\/td>\n<\/tr>\n
FormatCurrency ( )<\/font><\/td>\nDevolve uma express\u00c3\u00a3o formatada para currency ( tipo de moeda instalada no Control Panel ).
\nMinhaMoeda = FormatCurrency(1000) ‘ Devolve num servidor portugu\u00c3\u00aas “1.000$00”<\/font><\/td>\n<\/tr>\n
FormatDateTime ( )<\/font><\/td>\nDevolve uma express\u00c3\u00a3o formatada como Data ou Tempo ( hora )
\nDim Data
\nData=now ( )
\nSacarData = FormatDateTime(Data, 1)
\n‘ e desta maneira recebe-se a data
\n‘o valor usado \u00c3\u00a9 para definir o formato com que se recebe a data\u00c2 <\/p>\n

C\u00c3\u00b3digos de Formato:
\n0 -> formato short date, se tiver s\u00c3\u00b3 a hora sai s\u00c3\u00b3 a hora, se tiver s\u00c3\u00b3 a data sai s\u00c3\u00b3 a data, se tiver ambos saiem ambos como short format
\n1 -> long date
\n2 -> short date format especificado no Regional Settings do computador
\n3 -> Dispara a hora especificado no Regional Settings do computador
\n4 -> Devolve a hora usando o formato 24horas (hh:mm)
\n——————————————————<\/p>\n

<\/font><\/td>\n<\/tr>\n

FormatNumber ( )<\/font><\/td>\nDevolve uma express\u00c3\u00a3o formatada como Number
\nFormatarEmNumber = FormatNumber(“123123123”,3)
\n‘Devolve 123.123.123,000<\/font><\/td>\n<\/tr>\n
FormatPercent ( )<\/font><\/td>\nDevolve uma express\u00c3\u00a3o formatada como uma percentagem. (multiplicada por 100) com o caracter % no fim.
\nMinhaPercentagem = FormatPercent(2\/32) ‘MinhaPercentagem tem 6.25%.<\/font><\/td>\n<\/tr>\n
GetLocale ( )<\/font><\/td>\nDevolve o valor do ID Local
\nEste Local \u00c3\u00a9 a refer\u00c3\u00aancia \u00c3 linguagem do servidor country\/region.O Locale determina coisas como o keyboard layout, alphabetic sort order, assim como o date, time, number, e o formato currency.<\/font><\/td>\n<\/tr>\n
GetObject ( )<\/font><\/td>\nDevolve a refer\u00c3\u00aancia a um Objecto de um ficheiro.
\nDim MeuObjecto
\nSet MeuObjecto = GetObject(“C:\\DESENHOS\\SAMPLE.DRW”, “FIGMENT.DRAWING”)<\/font><\/td>\n<\/tr>\n
GetRef ( )<\/font><\/td>\nDevolve a refer\u00c3\u00aancia a um procedimento de um evento.<\/font><\/td>\n<\/tr>\n
Hex ( )<\/font><\/td>\nRetorna o valor Hexadecimal de um numero.
\nMeuHex = Hex(10) ‘ Devolve A.<\/font><\/td>\n<\/tr>\n
Hour ( )<\/font><\/td>\nRetorna um numero entre 0 e 23, inclusive, representando a hora do dia.
\nMinhaHora = Hour(now())<\/font><\/td>\n<\/tr>\n
InputBox ( )<\/font><\/td>\ns\u00c3\u00b3 funciona com o IE Abre uma caixa de di\u00c3\u00a1logo, onde os utilizadores podem escrever algo, e carregar num bot\u00c3\u00a3o para voltar ao browser.
\nN\u00c3\u00a3o \u00c3\u00a9 usado nas ASP, mas pertence ao VBScript.<\/font><\/td>\n<\/tr>\n
InStr ( )<\/font><\/td>\nDevolve a posi\u00c3\u00a7\u00c3\u00a3o da primeira ocorr\u00c3\u00aancia de uma string dentro de outra.
\nDim ProcuraString, ProcuraChar, MinhaPos
\nProcuraString =”XXpXXpXXPXXP” ‘ String onde procurar
\nProcuraChar = “P” ‘ Procurar por “P”
\nMinhaPos = Instr(4, ProcuraString, ProcuraChar, 1)
\n‘ Uma compara\u00c3\u00a7\u00c3\u00a3o textual a come\u00c3\u00a7ar em 4 devolve 6<\/font><\/td>\n<\/tr>\n
InStrB ( )<\/font><\/td>\nIgual a InStr ( ), com a diferen\u00c3\u00a7a que \u00c3\u00a9 usada para compara\u00c3\u00a7\u00c3\u00b5es de vari\u00c3\u00a1veis tipo Byte.<\/font><\/td>\n<\/tr>\n
InStrRev ( )<\/font><\/td>\nFunciona com a fun\u00c3\u00a7\u00c3\u00a3o InStr ( ), com a diferen\u00c3\u00a7a de que em fez de come\u00c3\u00a7ar do inicio da String, come\u00c3\u00a7a do final.
\nDim ProcuraString, ProcuraChar, MinhaPos
\nProcuraString =”XXpXXpXXPXXP”
\nProcuraChar = “P”
\nMinhaPos = InstrRev(ProcuraString, ProcuraChar, -1, 1)
\n‘ A compara\u00c3\u00a7\u00c3\u00a3o textual a come\u00c3\u00a7ar na \u00c3\u00baltima posi\u00c3\u00a7\u00c3\u00a3o devolve 12<\/font><\/td>\n<\/tr>\n
Int ( )<\/font><\/td>\nDevolve o integer de uma vari\u00c3\u00a1vel num\u00c3\u00a9rica
\nMeuNumero = Int(99.8) ‘ Retorna 99.
\nMeuNumero = Int(-99.8) ‘ Retorna -100.<\/font><\/td>\n<\/tr>\n
IsArray ( )<\/font><\/td>\nDevolve uma vari\u00c3\u00a1vel tipo Boolean a verificar de a vari\u00c3\u00a1vel \u00c3\u00a9 um array ou n\u00c3\u00a3o.<\/font><\/td>\n<\/tr>\n
IsDate ( )<\/font><\/td>\nDevolve True ou False, a indicar se uma vari\u00c3\u00a1vel pode ser convertida para o tipo Date.
\nDim MinhaData, TuaData, SemData, MeuCheck
\nMinhaData = “Outubro 19, 1962”
\nTuaData = #10\/19\/62#
\nSemData = “Hello”
\nMeuCheck = IsDate(MinhaData) ‘ Devolve True.
\nMeuCheck = IsDate(TuaData) ‘ Devolve True.MeuCheck = IsDate(SemData) ‘ Devolve False.<\/font><\/td>\n<\/tr>\n
IsEmpty ( )<\/font><\/td>\nDevolve True ou False, a indicar se uma vari\u00c3\u00a1vel foi inicializada.
\nDim MeuVar, MeuCheck
\nMeuCheck = IsEmpty(MeuVar) ‘ Devolve True.
\nMeuVar = Null ‘ Fica Null.
\nMeuCheck = IsEmpty(MeuVar) ‘ Devolve False.
\nMeuVar = Empty ‘ Fica Empty.
\nMeuCheck = IsEmpty(MeuVar) ‘Devolve True.<\/font><\/td>\n<\/tr>\n
IsNull ( )<\/font><\/td>\nDevolve True ou False, a indicar se uma vari\u00c3\u00a1vel n\u00c3\u00a3o cont\u00c3\u00a9m dados v\u00c3\u00a1lidos ‘Null’.
\nDim MeuVar, MeuCheck MeuCheck = IsNull(MeuVar) ‘ Devolve True.
\nMeuVar = Empty ‘ Fica Empty.MeuCheck = IsNull(MeuVar) ‘ Devolve False.<\/font><\/td>\n<\/tr>\n
IsNumeric ( )<\/font><\/td>\nDevolve True ou False, a indicar se uma vari\u00c3\u00a1vel pode ser convertida para um tipo Number.
\nDim MeuVar, MeuCheck
\nMeuVar = 53 ‘ Atribui um valor
\nMeuCheck = IsNumeric(MeuVar) ‘ Devolve True.
\nMeuVar = “459.95” ‘Atribui um valor
\nMeuCheck = IsNumeric(MeuVar) ‘ Devolve True.
\nMeuVar = “45 Help” ‘ Atribui um valor.
\nMeuCheck = IsNumeric(MeuVar) ‘ Devolve False.<\/font><\/td>\n<\/tr>\n
IsObject ( )<\/font><\/td>\nDevolve True ou False, a indicar se uma vari\u00c3\u00a1vel \u00c3\u00a9 um objecto v\u00c3\u00a1lido.<\/font><\/td>\n<\/tr>\n
Join ( )<\/font><\/td>\nDevolve uma string, que cont\u00c3\u00a9m concatenadas todas as substrings de um array.
\nDim MeuString
\nDim MeuArray(4)
\nMeuArray(0) = “As ”
\nMeuArray(1) = “praias ”
\nMeuArray(2) = “de ”
\nMeuArray(3) = “Portugal.”
\nMeuString = Join(MeuArray)
\n‘ MeuString cont\u00c3\u00aam “As praias de Portugal.”.<\/font><\/td>\n<\/tr>\n
LBound ( )<\/font><\/td>\nO LBound \u00c3\u00a9 usado com a fun\u00c3\u00a7\u00c3\u00a3o Ubound para determinar o tamanho de um array.<\/font><\/td>\n<\/tr>\n
Lcase ( )<\/font><\/td>\nDevolve uma string que foi convertida para LowerCase.
\nDim MeuString
\nDim LCaseString
\nMeuString = “VBSCript”
\nLCaseString = LCase(MeuString)
\n‘ LCaseString t\u00c3\u00aam “vbscript”.<\/font><\/td>\n<\/tr>\n
Left ( )<\/font><\/td>\nDevolve um numero espec\u00c3\u00adfico de caracteres do lado esquerdo de uma string.
\nDim MeuString, Resultado
\nMeuString = “VBSCript”
\nResultado = Left(MeuString, 3) ‘ Resultado tem “VBS”.<\/font><\/td>\n<\/tr>\n
LeftB ( )<\/font><\/td>\nO mesmo de Left mas para o tipo de vari\u00c3\u00a1veis Byte<\/font><\/td>\n<\/tr>\n
Len ( )<\/font><\/td>\nDevolve o numero de caracteres de uma string
\nDim MeuString
\nMeuString = Len(“VBSCRIPT”) ‘ MeuString tem 8.<\/font><\/td>\n<\/tr>\n
LenB ( )<\/font><\/td>\nO mesmo da fun\u00c3\u00a7\u00c3\u00a3o len, mas para vari\u00c3\u00a1veis do tipo Byte.<\/font><\/td>\n<\/tr>\n
LoadPicture ( )<\/font><\/td>\nDevolve um Objecto de imagem. Tamb\u00c3\u00a9m n\u00c3\u00a3o \u00c3\u00a9 utiliz\u00c3\u00a1vel por ASP.<\/font><\/td>\n<\/tr>\n
Log ( )<\/font><\/td>\nDevolve o logaritmo de um valor<\/font><\/td>\n<\/tr>\n
LTrim ( )<\/font><\/td>\nDevolve a c\u00c3\u00b3pia de uma string sem os espa\u00c3\u00a7os (space) iniciais
\nMeuVar = LTrim(” vbscript “)
\n‘ MeuVar devolve “vbscript “.<\/font><\/td>\n<\/tr>\n
MidB ( )<\/font><\/td>\nEquivalente \u00c3 fun\u00c3\u00a7\u00c3\u00a3o Mid, mas para ser usada com vari\u00c3\u00a1veis do tipo Byte<\/font><\/td>\n<\/tr>\n
Minute ( )<\/font><\/td>\nDevolve um numero entre 0 e 59, inclusive, a representar o minuto de uma dada hora.
\nMinute(“10:22:00”) , devolve 22<\/font><\/td>\n<\/tr>\n
Month ( )<\/font><\/td>\nDevolve um numero entre 0 e 12, inclusive, a representar o m\u00c3\u00aas de uma determinada data.
\nMonth(“2\/12\/2003”) , devolve 12<\/font><\/td>\n<\/tr>\n
MonthName ( )<\/font><\/td>\nDevolve uma string a indicar o m\u00c3\u00aas referente a um valor dado
\nDim MeuVar
\nMeuVar = MonthName(10, True) ‘ MeuVar cont\u00c3\u00aam “Out”.<\/font><\/td>\n<\/tr>\n
MsgBox ( )<\/font><\/td>\nMostra uma janela de di\u00c3\u00a1logo, que espera por um clique do utilizador. Tamb\u00c3\u00a9m n\u00c3\u00a3o aplic\u00c3\u00a1vel \u00c3 s ASP, mas sim ao VBScript do lado do cliente, e s\u00c3\u00b3 funcionando com o Internet Explorer ( IE )<\/font><\/td>\n<\/tr>\n
Now ( )<\/font><\/td>\nDevolve a data e hora corrente de acordo com os ‘Settings’ do sistema computador onde o pedido est\u00c3\u00a1 a ser efectuado<\/font><\/td>\n<\/tr>\n<\/table>\n

<\/p>\n","protected":false},"excerpt":{"rendered":"","protected":false},"author":1,"featured_media":0,"comment_status":"close","ping_status":"close","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[],"class_list":["post-292","post","type-post","status-publish","format-standard","hentry","category-uncategorized","author-admin"],"_links":{"self":[{"href":"http:\/\/galhano.com\/blog\/index.php?rest_route=\/wp\/v2\/posts\/292","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/galhano.com\/blog\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/galhano.com\/blog\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/galhano.com\/blog\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/galhano.com\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=292"}],"version-history":[{"count":0,"href":"http:\/\/galhano.com\/blog\/index.php?rest_route=\/wp\/v2\/posts\/292\/revisions"}],"wp:attachment":[{"href":"http:\/\/galhano.com\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=292"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/galhano.com\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=292"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/galhano.com\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=292"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}