Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

  • 5 odgovora
  • 2.595 pregleda

Najnovija ↓

Svaki pocetak je tezak 14.09.2008. u 17:01 · pre 220 meseci #1
Pozdrav svima na forumu. Ja cu vas neko vrijeme muciti sa pitanjima. Naime poceo sam kao nesto da programiram u BB.NET-u pa mi treba pomoc.
Kako da napisem kod iz C-a u VB.NET-u:
for(i=1;i<k;i++)
{
djelj=djelj*(pom-i);
}
for(i=1;i<k;i++)
{
djel=djel*(pom1-i);
}
brkomb=djelj/djel;

Pokusao sam svasta ali stalno dobijam syntax eror, i ostale poruke.
To neka bude prvo pitanje.
A drugo pitanje glasi kako da napisem funkciju koja ce tacku da zmjenjuje sa zarezom i obratno. (tacka ili zarez pisu se izmedju dva broja u textboxu)
Hvala
Potpis
www.mladenmp.ml
Re: Svaki pocetak je tezak 14.09.2008. u 20:57 · pre 220 meseci #2
Code:

for i as integer = 1 to k-1
  djelj = djelj * (pom-i)
next
for i as integer = 1 to k-1
  djel = djel * (pom1-i)
next
brkomb = djelj / djel


Tacku zamenjujes zarezom sa TextBox1.Text = TextBox1.Text.Replace(".", ",") a za obrnuto provali sam :)

Napomena - ako ti je promenljiva i vec deklarisana, ne treba ti ono as integer.
Potpis
Nebojsa Milanovic:
-Trumpa smatram vrhunskim predsednikom i voleo bih da živim u državi na čijem je on čelu
-Rusija ne laže, ne vodi osvajačke ratove
-Trump je svetla tačka u USA blatu
-Elon Musk, možda najpametniji i najtrezveniji Amerikanac
Re: Svaki pocetak je tezak 14.09.2008. u 21:33 · pre 220 meseci
izmenjeno 1 put, poslednji put mladenmp 14.09.2008. u 22:45
  1. mladenmp14.09.2008. u 22:45zapis iz teksta poruke
#3
@Shadowed

Mozda ce ti se ciniti kao da si mi malo pomogao ali meni ova pomoc znaci mnogo.
Hvala ti 1000 puta.
Sto se tice tacke i zareza to cu tek da probam jer sam vec konvertovao textbox u convert.todouble(textbox1.text).
Jer mi trebaju bas brojevi sa floating point-om.
Haval jos jednom.
Potpis
www.mladenmp.ml
Re: Svaki pocetak je tezak 14.09.2008. u 22:12 · pre 220 meseci
izmenjeno 1 put, poslednji put mladenmp 14.09.2008. u 22:49
  1. mladenmp14.09.2008. u 22:49zapis iz teksta poruke
#4
@Shadowed
Oko tacke i zareza:
Tvoj odgovor je ok ali moje pitanje nije bilo potpuno.
Naime, zasto mi treba ta zamjena, kada se unese broj 2.5 u textbox1 kao rezultat se dobija 25.
A ako se unese 2,5 onda je ok. To se desava zbog podesavanja U reginal Settings u control panelu.
Da ne bih ja razmislajo kako je neko podesi svoj racunar meni treba ta zamjena.
Ako imas neku ideju spreman sam da ucim!!!

E sad ja sam rekao u prvom postu da je to samo pocetak mog mucenja.
Imam sad jos dva problema:
Prvi je kako da podesim da se program resetuje, to jeste da se sva polja vrate na pocetno stanje.
Tacnije to sam i napravio, ali mi program i dalje cuva vrijednost promjenjlivih. Kako tu vrijednost da izbisem iz memorije???

A drugi problem je sledeci:
Napravio sam na polju unos:
if unos.text = "" then
dim amessage as integer
amessage = MessageBox.Show("Morate unijeti iznos uplate!..........................

kako da nakon pojavljivanja te poruke program ceka da se unese iznos i ako opet nema iznosa da se ponovi ista poruka???
Potpis
www.mladenmp.ml
Re: Svaki pocetak je tezak 16.09.2008. u 13:08 · pre 220 meseci #5
OK. Posto nisam dobio pomoc za dugme R E S E T koje sam napravio. posle malo vise mozganja
i cinjenice da imam konstantno gresku u koracima taj problem sam rijesio.
Problem sa porukom koja treba da se ponavlja ako nije unijeta uplata i da se program dalje ne izvrsava je takodje rijesen.


Ali i dalje imam problem oko tacke i zareza.
Dakle ako neko zna gdje mogu da nadje neko rijesenje tipa funkcije za zamjenu karatera u stringu,
neka pomaze ako Boga zna!
Potpis
www.mladenmp.ml
Re: Svaki pocetak je tezak 16.09.2008. u 15:35 · pre 220 meseci #6
Kad hoces da uradis nesto ali samo pod uslovom da je nesto upisano u npr TextBox napravis novu Funkciju / Subrutinu i prvo proveris dali je to sto je trebalo upisano i ako nije eventualno pokazes neko obavestenje i izadjes sa Return. A ako jeste nastavis dalje ...
U tvom primeru to ide npr. ovako
Code:

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If unos.Text = "" Then MessageBox.Show("Morate unijeti iznos uplate!") : Return
        MsgBox("VB.NET ima i ovakvu MessageBox funkciju")
        unos.Text = unos.Text.Replace(".", ",") ' Ovo menja tacke u zareze
        unos.Text = unos.Text.Replace(",", ".") ' A ovo menja zareze u tacke...
        ' ali ne izvrsavaj ih jednu posle druge:) zato sto nema efekta
    End Sub

imas i ovo za . ,
Potpis
HomePage http://www.eurora3d.com
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme