learning API

[#1]

Hello,

I would to learn some thing about QV Macros.

I create the wrond script and I need some one could to correct the scrip I wrote.

Please I would to have one msg box with 2 line write into.

The event is join to a button. If I press the button the msgbox appears and gets me the the result. I used the For loop to learn how QV works in API script.

sub Message

set v=ActiveDocument.Variables(2)

FOR a=0 to v.GetContent.Number

ActiveDocument.Getapplication.MsgBox("Fine Conteggio ")& v.GetContent.Number

Next
end sub

thanks and best regards

[#2]

Hi,

what's your question?

Best regards

Stefan

[#3]

hi,

sorry for my english. however I would to learn a script with the button, for loop msgBox.

In the scrip I posted I try to create small application where I press the button, the for loop creeate mexages and the msgBos shows the messages. Naturally my script is not correct. Please have a look the script?

BR

Slthanks

[#4]

If I understand correctly, you need to set the values in a single variable and then display just one message box at the end?

In your loop set a variable to its current value with the additional value you want appended to it (chr(10) forces a new line):

vMsg = vMsg & chr(10) & v.GetContent.Number

Then after the loop display the values:

ActiveDocument.Getapplication.MsgBox vMsg

Hope this helps,

Gordon

[#5]

Hello! Perhaps you mean this

sub MostraVar
set vars = ActiveDocument.GetVariableDescriptions
for i = 0 to vars.Count - 1
set v = vars.Item(i)
msgbox(v.Name)
next
MsgBox("Nr Variabili Programma: " & vars.Count)
end sub

Ciao

Daniela

PS: Ma se sei italiano ..... prova prima a chiedere nel nostro gruppo