Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: statystyki wprowadzonego tekstu
anonim




Typ: Nie zarejestrowany
statystyki wprowadzonego tekstu

statystyki  wprowadzonego  tekstu 
tylko  o  literach,  nie  o  ca造ch  s這wach,  czyli  np.: 
"a"  wyst徙i這  6  razy 
"T"  wyst徙i這  2  razy 
"w"  wyst徙i這  0  razy 
 
kto  si  na  tym  zna  i  wie  jak  to  zrobi? 
prosz  o  najprostrzy  這patologiczny  spos鏏 
瘸dnych  skr鏒闚  i  optymalizacji 
JAK  NAJMNIEJ  zaawansowany  KOD 
naprawd  tu  nie  chodzi  oto  by  si  popisa 
tylko  by  zrozumia  to  kompletny  amator  Visuala.net 2oo3

je郵i komu nie chce si pisa a zna link gdzie podobny problem jest opisany (kurs?) to prosz! troszk mi zale篡 na czasie chyba (mam 19 godzin...)

02-02-2004 20:07
  
deywid



Typ: neutral
Post闚: 66
Zarejestrowany: Jan 2004

heh..ostatnio to cos wszystkim sie spieszy...
dlatego pisze to co mi sie nasun瘭o...
===========
Public a

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = Asc("a" Then
a = a + 1
End If

End Sub
Private Sub Command1_Click()
Label1.Caption = a
End Sub
============
taki najprostszy chyba sposob zebys to zrozumia
pozdro

02-02-2004 20:32
Poka profil deywid  Wy郵ij email do deywid        5625009
anonim




Typ: Nie zarejestrowany

chyba rozumiem
ale to nie ma polega na kontrolowaniu naciskanych klawiszy
tylko na skanowaniu wprowadzonego ju tekstu

ma skanowa i je郵i natrafi na np a to ma zapami皻a "a wyst徙i這 1 raz"... itd do ko鎍a tekstu a na ko鎍u przedstawi wynik - statystyki

03-02-2004 00:04
  
kicaj




Typ: neutral
Post闚: 271
Zarejestrowany: Aug 2003

linia = "Jaki przyk豉dowy tekst"
Do While InStr(linia, "a"
  b = b + 1
  linia = Mid(linia, InStr(linia, "a" + 1)
Loop

ten na przyklad sprawdza ile masz literek 'a'

03-02-2004 00:35
Poka profil kicaj  Wy郵ij email do kicaj        3914568
Wszystkich odpowiedzi: 3 :: Maxymalnie na stron: 20
Strona: [  << <   1   > >>  ]  z  1