[VB6]Verificare numero con la virgola!!

[Guido8975]

Comesi può verificare se un mumero è con la virgola o no?

[LMondi]

Formatta la variabile o la Txt che contiene il numero, questo esempio ha la formattazione della variabile dblTIR con due decimali:
FrmTIRext.Txt22TE.Text = Format((dblTIR), "#,##0.00")

[Guido8975]

A me serviva controllare se c'èra la virgola o no..

[Sypher]

non basta Instr?

[Guido8975]

COme?

[Brainjar]

Ti stava suggerendo l'uso di Instr(Stringa, Carattere)
Presumendo che il tuo numero sia in una TextBox :

    Dim nPos As Integer

    nPos = InStr(Text1.Text, ",")
    If nPos > 0 Then
         ' C'è la virgola
         MsgBox "C'è la Virgola !!"
    End If

Ciao,

[Guido8975]

Giusto che fesso che sn grazie mille!

[xegallo]

bhe oddio se siete degli amanti dei cast la cosa dell'instr funziona ma se è un numeo io consiglio questo

if abs(numero) = int(abs(numero)) then msxbox "numero senza virgola"