Forum » Programiranje » VB script - dostop do txtFielda
VB script - dostop do txtFielda
bepohnka ::
Cilj je razdeliti naslov, ki je v eni vrstici, v dve vrstici, da bo ulica in hišna št. v eni, pošta in poštna številka pa v drugi.
Sub OnFormat
dim t, x
t = rpt.GroupHeader1.Controls("txtField9").Text
x = instr(t,",")
if x > 0 Then
dim t1, t2
t1 = Left(t,x-1)
t2 = Mid(t,x+1)
rpt.GroupHeader1.Controls("txtField9").Text = t1 +chr(13)+chr(13)+chr(13)+ t2
end if
End Sub
vrže mi pa naslednji error:
[Extended Info:Scripting Error. [ Extended Info:Section : GroupHeader1 , Event : OnFormat , Line number: 3 Description:Invalid Controls Collection Index.Control name not found or index out of range]]
Ime textboxa je txtField9, vendar ne vem zakaj ga ne najde, če pustim codeless pa izpiše naslov kot treba v tem fieldu.
Kakršnekole ideje ali pomoči bom več kot vesela.
Sub OnFormat
dim t, x
t = rpt.GroupHeader1.Controls("txtField9").Text
x = instr(t,",")
if x > 0 Then
dim t1, t2
t1 = Left(t,x-1)
t2 = Mid(t,x+1)
rpt.GroupHeader1.Controls("txtField9").Text = t1 +chr(13)+chr(13)+chr(13)+ t2
end if
End Sub
vrže mi pa naslednji error:
[Extended Info:Scripting Error. [ Extended Info:Section : GroupHeader1 , Event : OnFormat , Line number: 3 Description:Invalid Controls Collection Index.Control name not found or index out of range]]
Ime textboxa je txtField9, vendar ne vem zakaj ga ne najde, če pustim codeless pa izpiše naslov kot treba v tem fieldu.
Kakršnekole ideje ali pomoči bom več kot vesela.
Vredno ogleda ...
Tema | Ogledi | Zadnje sporočilo | |
---|---|---|---|
Tema | Ogledi | Zadnje sporočilo | |
» | Uvoz txt datoteke v excelOddelek: Programska oprema | 4997 (4634) | sebavet |
» | VB.streamwriterOddelek: Programiranje | 984 (817) | P=LN |
» | [vb.net] textarea newlineOddelek: Programiranje | 952 (883) | dolenc |
» | ASP in vnosni podatki v MDBOddelek: Izdelava spletišč | 990 (901) | swalow |
» | <br> namesto EnterOddelek: Programiranje | 1335 (1124) | rc-car |