怎样在VB中动态创建窗体(新窗体,不是加载) 改用DELPHI吧!或者配副眼镜!省得总走错门! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Dim frmtest As Form1 Set frmtest = New Form1 frmtest.Show 以上方法只是打开一个已存在的FORM1 ,有没有用ADD方法,创建窗体??? 在DELPHI中,实现以上方法很简单,请看下面代码:procedure TForm1.Button1Click(Sender: TObject);var DD :TFORM ; ss :Tbutton;begin DD := TFORM.Create(SELF); DD.CAPTION := 'MYFORM'; DD.SHOW; ss := tbutton.Create(self); ss.Parent := dd; ss.Caption := 'mybutton'; ss.Left := 100; ss.Top := 100; ss.OnClick := Button2Click;end;procedure TForm1.Button2Click(Sender: TObject);begin showmessage('mymessage')end; 不知,VB 如何实现,请打下们指教。 准备做个有难度的工程,TIF图像自动去污点,自动校正倾斜,欢迎进来探讨 如何获取局域网内的服务器当前时间!~ 随机产生正负数 请教:有没有成套的可以设置显示风格的控件(要钱的也行) VB里面怎么弄一个内存缓存指针呀? 如何在一个vb程序里实现对另一个vb程序按钮的点击事件 强烈要求CSDN增加带宽,的确是太慢了!强烈要求的请UP。 大家给我的软件提提意见 有没有能实现一下功能的函数?!看一下吧! VB sstab 不能正常切换 WIN98 二版 如何判断 拨号服务器是否运行?(VB6实现) 怎么写dll文件
Dim frmtest As Form1
Set frmtest = New Form1
frmtest.Show
以上方法只是打开一个已存在的FORM1 ,有没有用ADD方法,创建窗体???
var DD :TFORM ;
ss :Tbutton;
begin
DD := TFORM.Create(SELF);
DD.CAPTION := 'MYFORM';
DD.SHOW;
ss := tbutton.Create(self);
ss.Parent := dd;
ss.Caption := 'mybutton';
ss.Left := 100;
ss.Top := 100;
ss.OnClick := Button2Click;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
showmessage('mymessage')
end; 不知,VB 如何实现,请打下们指教。