# Re: 请问要如何控制两个表单?

Posted by joseph on July 30, 1998 at 23:46:07:

In Reply to: 请问要如何控制两个表单? posted by Dolphin on July 27, 1998 at 13:14:42:

至少有以下两种方法

1. 使用两个表单:
(以此例而言,除两表单之外,另需一module存放
public变数)
在第一个表单的form_load()中:
flag_ok=false 'flag_ok 为 public variable
在第一个表单的form_Active()中:
if flag_ok then
画圆
flag_ok =false
endif
在第一个表单的Commamd_click()中:
form2.show vbmodal
在使用者于第二个表单输入半径,圆心..等资料并
确认后,将这些资料assign给public变数,并指定
flag_ok =true ,然后 unload第二个表单即可.
(以上只是雏形,你不妨再设计得更精细)
2.只使用一个表单
VB有提供InputBox,但不太合适你的例子(因InputBox
只有一个输入口.)
另有一法是先将要求输入的物件置于Frame中,并
隐藏起来,
然后在第一个表单的Commamd_click()中把Frame移至
画面中央并将其.visible设为true,
在使用者输入半径,圆心..等资料并确认后,再将此
Frame隐藏起来.
(如此则不需public变数)

但若要求一定要"开启另一小视窗",则第1 个方法较合适.

Follow Ups: