把Form的bordstyle属性设置为0
在Form_Load里写的程序是:
Private Sub Form_Load()
Me.BackColor = 0
Me.WindowState = 2
End Sub
这样运行时就是全屏了
我又写了还原的程序
Private Sub Form_DblClick()
Web.Caption = Cap
Web.BorderStyle = 2
Web.WindowState = 0
End Sub
但是程序运行是还原成一般大小了,但是没有了标题栏了,这是怎么回事

解决方案 »

  1.   

    web.caption=cap   这其中的cap变量没有值
    试试:  web.caption="cap"
      

  2.   

    "Web."?是窗体的名称吗?为何在Form_DblClick事件中不用ME?
      

  3.   

    将Web.Caption = Cap放在Web.BorderStyle = 2之后
      

  4.   

    出现到是出现了,真是很感谢史留香
    但是我又写了个程序:
    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If Shift = 2 Then
        Print KeyCode
        If KeyCode = 83 Then
            Me.BackColor = 0
            Me.WindowState = 2
            Me.BorderStyle = 0
            WebB.Top = Web.Height / 2 - WebB.Height / 2
            WebB.Left = Web.Width / 2 - WebB.Width / 2
        End If
    End If
    End Sub
    作用是按ctrl+S又变成全屏,但是上面的标题栏又去不掉,这有怎么解决啊
      

  5.   

    同意:
    回复人: Leftie(左手,为人民币服务) ( ) 信誉:105 
    前后顺序没有关系的,另外还原时还应将controlbox设置为True
      

  6.   

    去掉标题栏外加设置,
    me.controlbox=false
    me.caption=""
      

  7.   

    qiqunet(瑞旗·广东) :
    能不能说清楚一点,我有点糊涂了
    到底是全屏的时候设置controlbox为false还是一般大小的时候
    帮我把代码补全行不行,谢谢啊
      

  8.   

    我主要是学java的
    最近我表哥接了一个多媒体项目,我帮他写一个外部接口
    其实我一点vb基础都没有,现学现用,见笑了
      

  9.   

    Private Sub Form_Load()
    Me.BackColor = 0
    Me.WindowState = 2
    End Sub
    这样运行时就是全屏了
    我又写了还原的程序
    Private Sub Form_DblClick()
    'me.Caption = Cap   '屏蔽
    me.BorderStyle = 2
    me.WindowState = 0
    End Sub
      

  10.   


    不能在運行時設置controlbox屬性If KeyCode = 83 Then
            Me.BackColor = 0
            Me.Caption=""
            Me.BorderStyle = 0
            Me.WindowState = 2
            
            WebB.Top = Web.Height / 2 - WebB.Height / 2
            WebB.Left = Web.Width / 2 - WebB.Width / 2
        End If