Novo

Forum kao aplikacija na telefonu

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

  • 3 odgovora
  • 2.188 pregleda

Najnovija ↓

prosledjivanje podataka sa subforme 09.01.2012. u 22:53 · pre 180 meseci #1
Pozdrav
imam problem sa sintaksom u kodu ako neko moze da mi pomogne
imam formu npr Form1, na njoj imam subformu npr. Subform1 i na subformi text1
Koja je sintaksa za prosledjivanje vrednosti Text1 sa subforme u programski kod
unapred hvala
Re: prosledjivanje podataka sa subforme 09.01.2012. u 23:06 · pre 180 meseci #2
To lako i sam nađeš - ostavi formu otvorenu. Sad pravi novi upit. Nemoj stavljati nijednu tabelu u njega. Idi na taster Build (onaj magični štapić), pa klikni na Forms, Loaded Forms, zatim naziv forme, naziv podforme... sve do polja na podformi. Sad dupli klik na njega. Eto cele sintakse.
Potpis
Pozdrav,
Branislav
Re: prosledjivanje podataka sa subforme 10.01.2012. u 00:00 · pre 180 meseci #3
jos jedno pitanje, ne mogu da podesim nikako da mi je defoltna vrednost textboxa 0, pa mi zbog toga vraca gresku,
textbox mi je izracunato polje sum(kolicina), a default value sam stavio da je 0, medjutim funkcija radi kada je vrednost razlicita od nule a kada je 0 vraca gresku

Private Sub Command45_Click()

Dim U As Single
Dim S As Single
Dim N As Single

U = [Qprijemhibridasum subform].[Form]![Text4]
S = [Qspecifikacijasum subform].[Form]![Text4]
N = [Qneuslovnosum1 subform].[Form]![Text4]

If N = 0 Then
If U = S Then
MsgBox "NEMA ODSTUPANJA NEPOTREBNA KONTROLA", vbOKOnly, "OBAVEŠTENJE"
Else
MsgBox "ODSTUPANJE KOLIČINE " & U - S & " KOM", vbOKOnly, "UPOZORENJE"
End If
Else
If U = S + N Then
MsgBox "NEMA ODSTUPANJA NEPOTREBNA KONTROLA", vbOKOnly, "OBAVEŠTENJE"
Else
MsgBox "ODSTUPANJE KOLIČINE " & U - S - N & " KOM", vbOKOnly, "UPOZORENJE"
End If
End If
End Sub
Re: prosledjivanje podataka sa subforme 10.01.2012. u 01:17 · pre 180 meseci #4
Koristi funkciju NZ() koja pretvara Null u 0.

N = NZ([Qneuslovnosum1 subform].[Form]![Text4], 0)
Potpis
Pozdrav,
Branislav
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme