KB-14242: Opening two screens with a single button.

Question:

How can I open two windowed screens from a button?

Solution:

To do so, use the following script:

Application.GetFrame(“Screen1”).MoveFrame 0, 0, 300, 300
Application.GetFrame(“Screen1”).OpenScreen “Screen1?100?0”, CLng(0)

Application.GetFrame(“Screen2”).MoveFrame 450, 0, 300, 300
Application.GetFrame(“Screen2”).OpenScreen “Screen2?100?0”, CLng(0)

To close both screens, use the following script:

Application.GetFrame(“Screen1”).Screen.Close 0
Application.GetFrame(“Screen2”).Screen.Close 0

Deixe seu Comentário Cancelar resposta