1)多文档窗体中怎样实现打开一个子窗体时关闭前一个已经打开的窗体?
2)TrueDBGrid中为什么单击一行时再切换到下一行要单击两次才能实现,怎样实行单击一次就可以实现取得当前行的第一列值(它总会延迟一行)
2)TrueDBGrid中为什么单击一行时再切换到下一行要单击两次才能实现,怎样实行单击一次就可以实现取得当前行的第一列值(它总会延迟一行)
解决方案 »
- TIMER控件和访问ACCESS文件的两个小问题。
- 使用INET出现错误求解
- 如何建立个数据库,里面有选择题和答案,实现在VB中随机出题
- 诚信20 分一个地址 Microsoft DHTML Editing Component SDK
- 急啊 !VB 不规则窗体,只做对角的, 高手进来看怎么做 (圆角矩形窗体问题)
- 如何象acdsee4.0那样给文件附加描述信息。
- Un1在哪里?请大侠帮忙,透明的ActiveX控件怎么会有背景?
- 急急急!!!如何使窗体大小不能通过双击窗口标题栏来改变???
- 又有关于ACTIVEX DLL的问题,挺有深度和实际实践意义的。
- 用vb制作一个随机分组程序,求大神帮忙
- VB文件存储的问题.大虾帮忙.
- 已知利用vc读入位图信息,在vb中画图的问题,高手帮忙!!
If Not MDIForm1.ActiveForm Is Nothing Then Unload MDIForm1.ActiveForm
在要打开的窗体里写
Private Sub Form_Load()
Dim frm As Form
Set frm = MDIForm1.ActiveForm
If Not frm Is Nothing Then frm.Hide
End Sub
那你要多文档窗口干什么,多文档的优势就是可以同时打开与管理多个子窗口!!Private Sub Command1_Click()
CloseWindow
Form2.Show
End SubPrivate Sub Command2_Click()
CloseWindow
Form3.Show
End SubPublic Function CloseWindow()
Dim frm As Form
For Each frm In Forms
If frm.Name <> "frmMain" Then
Unload frm
End If
Next
End Function2.