Converting an Event from Formflow to Word

[Poli]

I have a program called Form Flow and after Windows XP it will be obsolete
and i am trying to convert my forms to word. I have an event that I need to
convernt to VB using VB language. My Event is a look up process that when it
looks at a field will add a certain content to another field based on what it
sees. I need help. Also will this event work in Word on a drop-down Form
Field?

My Event:
Sub LookupPenDwellTime
if Application.ActiveForm.Fields("PROCD").contents = "SP2G-00-017 REV. B" then
Application.ActiveForm.Fields("PenDwelTime").contents = "min. of 15
mins. and max. of 20 mins."
elseif Application.ActiveForm.Fields("PROCD").contents = "SP2G-00-015 REV.
C" then
Application.ActiveForm.Fields("PenDwelTime").contents = "min. of 25
mins. and max. of 30 mins."
end if
End Sub

 

[Jean-Guy Marcil]

I have a program called Form Flow and after Windows XP it will be obsolete
and i am trying to convert my forms to word. I have an event that I need to
convernt to VB using VB language. My Event is a look up process that when it
looks at a field will add a certain content to another field based on what it
sees. I need help. Also will this event work in Word on a drop-down Form
Field?

My Event:
Sub LookupPenDwellTime
if Application.ActiveForm.Fields("PROCD").contents = "SP2G-00-017 REV. B" then
Application.ActiveForm.Fields("PenDwelTime").contents = "min. of 15
mins. and max. of 20 mins."
elseif Application.ActiveForm.Fields("PROCD").contents = "SP2G-00-015 REV.
C" then
Application.ActiveForm.Fields("PenDwelTime").contents = "min. of 25
mins. and max. of 30 mins."
end if
End Sub

See this site for a complete tutorial on creating forms with Word:
http://www.mousetrax.com/techpage.html#autoforms