请问怎样实现mdi窗口中状态栏的进度条 在MDI窗体上加一个容器控件,如picture,然后将进度条放在上面 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 to wufang请注意,是在mdi窗体中也就是说,任何容器是不能改变大小的,自然你说的不行 Private Sub MDIForm_Load() a = SetParent(Form1.ProgressBar1.hWnd, StatusBar1.hWnd) Form1.ProgressBar1.Move 0, 0 End Sub 在MDI窗体上加一个容器控件,如picture,然后将进度条放在上面 Private Sub MDIForm_Load() a = SetParent(ProgressBar1.hWnd, StatusBar1.hWnd) ProgressBar1.Visible = True ProgressBar1.Align = 0 ProgressBar1.Move 0, 0, 2200, 300 End Sub 求VB远程获取,更改MySQL数据库及模拟鼠标点击的方法。 vb中调用VC编译的dll的函数问题,50分送... 关于picturebox与textout!!!!! 请问一下高手,我用4个Timer控件,分别用于响应各种不同的功能。 关于对文件的操作 我如果没有分了怎么办? 怎么改变datagrid的背景色啊? vb菜单项的标题前能加一个自己定制的图标吗? 大家给我做的进销存-财务软件起个吧,不许灌水! 偏门问题 vb的主窗体的数组值如何传递到另一个不同的窗体?请指教! 我的这段操作excel的代码有何错误????
请注意,是在mdi窗体中
也就是说,任何容器是不能改变大小的,自然你说的不行
a = SetParent(Form1.ProgressBar1.hWnd, StatusBar1.hWnd)
Form1.ProgressBar1.Move 0, 0
End Sub
Private Sub MDIForm_Load()
a = SetParent(ProgressBar1.hWnd, StatusBar1.hWnd)
ProgressBar1.Visible = True
ProgressBar1.Align = 0
ProgressBar1.Move 0, 0, 2200, 300
End Sub