Witam,
Wykładowca nie ucząc nas nic o VB i programie genidaq postanowił zadać nam zrobienie wizualizacji projektu, i cały czas powstają problemy. Problem polega na tym że kompilator np w lnijce plyn1 = q * czas - v1 nie uwzględnia v1, generalnie nie mam pojęcia czemu, poznaję ten język tylko po to aby skończyć ten projekt i nigdy więcej do niego nie zajrzę.
Mogę prosić o pomoc?
czas to timer, outputf wyświetla na kontrolce aktualną wartość danej zmiennej.
kod:
Sub SCR1()
dim q as TAG
set q = GetTag("DISP1", "NCTL1")
dim stan as TAG
set stan = GetTag("DISP1" , "CBTN1")
dim h2 as double
dim v2 as double
dim plyn2 as double
dim h1 as double
dim v1 as double
dim plyn1 as double
dim p as double
dim czas as TAG
set czas = GetTag("TASK1","ET1")
if (stan = 1) then
plyn1 = q * czas - v1
h1 = (plyn1/125)*0.5
if (h1 > 0) then
v1 = Sqr(19.62 * h1 - 0.025)
end if
plyn2 = v1 - v2
h2 = (plyn2/125)*0.5
if (h2 > 0) then
v2 = Sqr(19.62 * h2 - 0.025)
p = h2/q
end if
outputf 0, p
outputf 3, plyn1
outputf 1, v1
outputf 2, v2
outputf 4, plyn2
end if
End Sub
Z góry dziękuję.