本帖最后由 bcrun 于 2011-07-24 09:31:16 编辑

解决方案 »

  1.   

    我没编译器死,但出现Screen.Width 是只读属性,它会提示不能给只读属性赋值。拜托这个设置是在属性框内赋值,你这么弄,它是读属性框内的还是读FORM_load里的。这难道还要搞个优先级
      

  2.   

     Me.Left = screen.width '一旦这里改成screen.width,整个编译器都会死
    这样的话,整个窗体就会再屏幕的右边,由于不在当前屏幕中显示,所以无法触发Form_Paint事件,所以 应该是不动的才对。不会导致编译器出问题。
      

  3.   

    不是死了,而是没有触发Paint事件,你不能把窗口隐藏,如果隐藏了,就不能触发Paint你可以这样试一试:Option Explicit
    Private Sub Form_Load()
        Me.Left = Screen.Width - Me.Width   '一旦这里改成screen.width,整个编译器都会死
    End SubPrivate Sub Form_Paint()
        While Me.Left > 0
            DoEvents
            Me.Left = Me.Left - 1
        Wend
    End Sub这个代码正好没有遮挡住窗体,就没有问题。
      

  4.   

    编译器是编译代码的吧,你编译为EXE的时候死了?