bhe oddio se siete degli amanti dei cast la cosa dell'instr funziona ma se è un numeo io consiglio questo
codice:
if abs(numero) = int(abs(numero)) then msxbox "numero senza virgola"