请问怎样时间界面全屏（不是最大化）

cxhgc

在VB工程里的Private Sub cmdOK_Click()

    If IsNull(Me.cboUserName) Then
        MsgBox "请输入您的用户名！", vbQuestion
        Exit Sub
    End If

    If login = True Then
        DoCmd.Close acForm, "登陆背景"
        Me.TimerInterval = 0
        DoCmd.Close acForm, Me.Name
        DoCmd.OpenForm "控制台"
    Else
        MsgBox "用户名或密码不正确!", vbCritical
        Exit Sub
    End If

End Sub

这段代码中很明显要打开的窗体名称是控制台，如果你想打开别的只需要把“控制台换成别的窗体名称就可以拉！