realbasic-nug.it
[Top] [All Lists]

Re: (senza oggetto)

To: REALbasic NUG Italian <realbasic-nug dot it at lists dot realsoftware dot com>
Subject: Re: (senza oggetto)
From: Massimo Valle <maxduepuntozero at yahoo dot it>
Date: Thu, 22 Jun 2006 16:27:33 +0200
Delivered-to: listarchive at realsoftware dot com
Delivered-to: realbasic-nug dot it at lists dot realsoftware dot com
Domainkey-signature: a=rsa-sha1; q=dns; c=nofws; s=s1024; d=yahoo.it; h=Received:Mime-Version:In-Reply-To:References:Content-Type:Message-Id:Content-Transfer-Encoding:From:Subject:Date:To:X-Mailer; b=jcRmb5D1fhgV5bD7F8vyot2mp75TntUWjSZBXcvXyL+m/JUmLBQPji0tHbcEmlyFeTJQ4e4ayo6Ptigcrz5JGzT8LHbzHqJUIqxBl1cCE1cIJei1ZeBcBOSVzloZw6WdQiwsHGiaJBu+Fyfmfj6unI9CRmNIN7CZOvVsF4+qF3w= ;
References: <5303608c0606220705y27eabea8ve6ae70f37bc59665 at mail dot gmail dot com>

On 22/giu/06, at 16:05, Daniele wrote:

Ciao a tutti.. vi faccio una domanda da neofita... tra i miei esperimenti con RB ho iniziato un programma che dovrebbe effettuare dei calcoli su dei dati inseriti dall'utente.. esempio pratico metto 2 EditField faccio la
somma e la scrivo in un terzo EditField.
Il codice che ho scritto all'interno dell'azione del pulsante calcola è il
seguente..

Dim Dato1 AS Integer
Dim Dato2 AS Integer
Dim Risultato AS Integer

Dato1 = EditField1.Text
Dato2 = EditField2.Text
Risultato = Dato1+Dato2

l'errore che mi segnala è che Dato1 non è una stringa.. in parole povere come faccio a spostare un dato inserito in un EditField ma inserito come
numero non come stringa in una mia variabile di programma??
So già che la domanda è banale... ma non ce ne vengo fuori!
Grazie
Daniele


Dim Dato1 AS Integer
Dim Dato2 AS Integer
Dim Risultato AS Integer

Dato1 = val(EditField1.Text)
Dato2 = val(EditField2.Text)
Risultato = Dato1+Dato2

Guardati l'aiuto integrato di RB per la funzione Val()


Ciao

Massimo ValleChiacchiera con i tuoi amici in tempo reale!
http://it.yahoo.com/mail_it/foot/*http://it.messenger.yahoo.com


<Prev in Thread] Current Thread [Next in Thread>