Message prepotente!

[naderit]

Ciao ho risolto il problema solo numeri o dolo lettere in questo modo:

Codice: [Seleziona]

Public Function Numeri() 'solo numeri' 
 If Key.Code >= 48 And Key.Code <= 57 Then
   Else If key.Code = key.BackSpace Then 
   Else If key.Code = key.Delete Then
   Else If Key.Code = Key.Left Then
   Else If Key.code = Key.Right Then
   Else If Key.Code = Key.Tab Then  
    Else 
      Stop Event
  End If
 End  

Public Function Lettere()
  
  If Key.code >= 64 And Key.Code <= 90 Then
  Else If key.Code = key.BackSpace Then
  Else If key.Code = key.Up Then  
  Else If Key.code = Key.Down Then
  Else
    Stop Event
  Endif  
End

[Gianluigi]

Scusa ma hai letto cosa vuole dregi?

non uso il Valuebox perchè il contenuto non è formattabile:  1.550,30 mentre col textbox a livello di formattazione faccio quello che voglio.

[naderit]

si ho letto...

Visto che ci sono e l'obiettivo era quello di impedire la digitazione di lettere in un textbox per numeri, in VB6 con keyascii=0 si annullava il tasto premuto e sul textbox non veniva visualizzato nulla, è possibile avere qualcosa di analogo in gambas?

se all'evento TextBox_KeyPress() usi la funzione che ho scritto, vengono escluse le lettere della tastiera 

se invece uso

Codice: [Seleziona]

Public Sub TextBox1_Change()
If TextBox1.text > "" Then
TextBox1.text = Format(Replace(TextBox1.Text, ",", Null) / 100, "0.00") 
Endif  
End

ho la virgola automatica