Új hozzászólás Aktív témák

• #847 sonar addikt KissTboy #842

  Új Válasz 2007-04-02 08:49:12 #847

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  sonar

  addikt

  válasz KissTboy #842 üzenetére

  Hogy ON legyek:
  Private Sub Text1_KeyPress(KeyAscii As Integer)
  ' csak számokat lehet beírni
  If (KeyAscii < 48) Then
  If Not KeyAscii = 44 Then ' a '','' engedélyezése (tizedes)
  If Not KeyAscii = 8 Then ' backspace engedélyezése
  KeyAscii = 0
  End If
  End If
  ElseIf (KeyAscii > 57) Then
  KeyAscii = 0
  End If
  End Sub
  

• #844 sonar addikt KissTboy #841

  Új Válasz 2007-03-31 22:17:32 #844

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  sonar

  addikt

  válasz KissTboy #841 üzenetére

  No most fejből nyomom, szal ha hibás lesz akkor debugolni kell.
  ha vki már egyszer programozást tanul akkor vakarja meg azt a kis buksiját és kezdjen el gondolkodni ha meg nem akkor ne is jelenkezzen programozónak, a f@szom kivan hogy mindig tróger emberek miatt kell a cégnél is többlet munkát végeznem.
  Most is jött egy frissdiplomás aztán egy shell scriptet kellett volna módosítania, de megfeküdt vele. Én meg egy másik sráccal akik életünkben nem linuxoztunk megcsinálltuk.
  
  Itt van, a többit meg egyszerü logikával ki lehet találni.
  
  sub text1 keypress(keyascii as integer)
  if keyascii< asc(''0'') or keyascii > asc(''9'') then
  keyascii=0
  end if
  end sub
  

• #843 [HUN]Zolee őstag KissTboy #842

  Új Válasz 2007-03-31 08:21:09 #843

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  [HUN]Zolee

  őstag

  válasz KissTboy #842 üzenetére

  Ja. Hogy VB 6. Azt elfelejtettedmegemlíteni, vagy én csusszantam el eme infó felette.
  VB 6 os kodba sonar biztos tud segíteni, ő biztos hogy még most is abba dogozik. de azért majd ah lesz időm akkor szétnézek msdn-en, a textbox metódusai körül.

• #840 [HUN]Zolee őstag KissTboy #838

  Új Válasz 2007-03-30 23:14:06 #840

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  [HUN]Zolee

  őstag

  válasz KissTboy #838 üzenetére

  nah elővettem a könyvet és találtam egy ilyen pédát pont erre, hogy csak számokat lehetsen beírni:
  
  
  Private Sub TextBox1_KeyPress(ByVal sender As Object, _
  ByVal e As System.Windows.Forms.KeyPressEventArgs) _
  Handles TExtbox1.KeyPress
  If (e.KeyChar < ''0'' Or e.KeyChar > ''9'') Then
  e.Handled=True
  End If
  
  End Sub
  
  
  Ha így nem íródna be, akkor meg az e.Handled=True -t cseréld ki erre TextBox1.Text=TextBox.Text+e.KeyChar
  
  Remélem érthető volt bár itt csak számokat lehet beírni! De kibővíteni nem olyan nehéz

• #839 [HUN]Zolee őstag KissTboy #838

  Új Válasz 2007-03-30 22:50:15 #839

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  [HUN]Zolee

  őstag

  válasz KissTboy #838 üzenetére

  najó, a kedvedért felteszem a gépre a VB-t és összhozok valamit.
  De azért ötödéven egy ilyen dolognak nemkéne problémát okozni szerintem

• #835 sonar addikt KissTboy #833

  Új Válasz 2007-03-30 16:33:39 #835

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  sonar

  addikt

  válasz KissTboy #833 üzenetére

  Én még annyival egészíteném ki Zolee-t hogy a backspace-t + entert is célszerű beletenni
  Amugy had kérdezzem meg milyen szakon?
  
  [Szerkesztve]

• #834 [HUN]Zolee őstag KissTboy #833

  Új Válasz 2007-03-30 10:35:18 #834

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  [HUN]Zolee

  őstag

  válasz KissTboy #833 üzenetére

  a leg fapadosabb megoldás, hogy minden gomb lenyomásánál megvizsgálod hogy szám-e és ha igen, akkor hozzáfűzöd a textbox text jéhetz
  

Új hozzászólás Aktív témák