Jump to content


Photo

Contagem De Caracter Chr(13) - Enter


  • Faça o login para participar
4 replies to this topic

#1 MACUL

MACUL

    Doutor

  • Usuários
  • 770 posts
  • Sexo:Masculino
  • Localidade:SP

Posted 20/07/2006, 17:29

Título: Contagem de Caracter chr(13) - ENTER
Descrição: Faz a contagem de quantas vezes existe um ENTER em uma string.
---------------------------------------------------------

Linguagem: VB.NET /ASP3
Sintaxe: ContaEnter(String)
Retorno: Integer
Descrição: A função procura pelo caracter ENTER CHR(13) em uma string, retorna a quantidade de vezes que o caracter foi encontrado

function ContaEnter(strVariavel as string)
	Dim i as interger
				Dim qtde as interger
	qtde = 0
	for i = 1 to len(strVariavel)									
		if mid(strVariavel, i, 1) = chr(13) then 
			qtde = qtde + 1
		end if									
	next
	conta = qtde
end function

em javascript também é possível dessa maneira :
Objeto.value.split(/\n/).length

*************** M ** A ** C ** U ** L ***************

*************************************************

#2 RonsisM

RonsisM

    Super Veterano

  • Usuários
  • 15724 posts
  • Sexo:Masculino
  • Localidade:Plovdiv

Posted 20/09/2017, 20:01

Diclofenac Sodium To Buy Online cialis price Lopid
Prix Du Levitra 10 Minimum Garanti Lavitra
Flagyl For Sale <a href=http://cialtobuy.com>online pharmacy</a> Cialis Farmacia Del Ahorro
Digoxin Uk Available cialis buy online Como Conseguir Citotec En Usa
Baclofene En Ligne Amoxicillin Dosage Dental
Erexin De <a href=http://cialtobuy.com>online pharmacy</a> Propecia Producto
Propecia Eficacia Foliculo Piloso cialis online Discount Finasteride Buy
Achat De Cytotec
Dose Cephalexin Uti <a href=http://cialtobuy.com>generic cialis</a> Cialis Original Oder Falschung
Can You Tan While On Amoxicillin online pharmacy Amoxicillin With Claf Tab Levitra Rezeptfrei Auf Rechnung Keflex Wine Propecia Arginina cialis Propecia Para Hombres
Kann Viagra Suchtig Machen online pharmacy Levitra Seguridad Social
Achat Nolvadex Proviron
Clomid Et Test De Grossesse <a href=http://cialtobuy.com>online pharmacy</a> Allergic To Penicillin Amoxicillin

#3 RonsisM

RonsisM

    Super Veterano

  • Usuários
  • 15724 posts
  • Sexo:Masculino
  • Localidade:Plovdiv

Posted 05/10/2017, 18:40

Priligy Mas Cialis Dht Propecia Finasteride Zithromax Pediatric online pharmacy Comprar Cialis Oferta Amoxicillin Reaction Rash No Other Buy Stendra Free Shipping
Best Site For Cialis Cephalexin Dosage viagra Verapamil 240mg Without Prescription
Infected Tooth Still Hurts With Amoxicillin levitra canada price Cialis Viagra Moins Cher Pharmacy 4 U Uk Propecia Igual

#4 RonsisM

RonsisM

    Super Veterano

  • Usuários
  • 15724 posts
  • Sexo:Masculino
  • Localidade:Plovdiv

Posted 14/10/2017, 13:27

Nifedipine Costo De Propecia viagra online Comprar Levitra Barato Secure Ordering Provera Drugs
Is Amoxillin In Penicillin Family online pharmacy Viagra Kaufen Cephalexin For Animals Does Amoxicillin Cross Placenta
Nolvadex Prix Find Zentel Worms Medication Secure Ordering Generic Levaquin Website Low Price Amex Shop viagra World Best Online Pharmacy Review Cialis Comprar Precio When Will Alli Be Available Again 2014
Keflex Hallucination When Alli Back In Stock Buy Fluoxetine cialis Cialis Super Active Free Shipping Diuretiques Thiazidiques Acheter Pharm Canadienne

#5 RonsisM

RonsisM

    Super Veterano

  • Usuários
  • 15724 posts
  • Sexo:Masculino
  • Localidade:Plovdiv

Posted 31/10/2017, 17:19

Buy Kamagra Viagra viagra Prednislone Next Day Propecia Effets Indesirables Citalopram Pills For Sale
Mail Order Propecia Acheter Cialis Ligne cialis Buy Cialis 5mg From Canada




0 user(s) are reading this topic

0 membro(s), 0 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq