vb.net不执行函数 vbnet using

vb.net使用Sleep后有些代码没有执行！

在VB.NET中，带框架窗体的大小是不能为0的，要想做到高、宽都为0，需要自己重绘一个无边框窗体，用外置图片来绘制，配合PS做一些图片，既可以换肤还能做的很漂亮。

按当前代码修改，你把下面的代码粘回去就可以了，窗体的高和宽达到最小时，循环会自己退出，避免无限循环；

Select Case 2

    Case Is = 1

        Dim w As Integer = Me.Width

        Do

            Me.Width -= 5 : w -= 5

            Threading.Thread.Sleep(3)

        Loop While Me.Width = w

    Case Is = 2

        Dim h As Integer = Me.Height

        Do

            Me.Height -= 5 : h -= 5

            Threading.Thread.Sleep(3)

        Loop While Me.Height = h

    Case Is = 3

        Do

            Me.Opacity -= 0.05

            Threading.Thread.Sleep(120)

        Loop Until Me.Opacity = 0

End Select

相关问答

Q1: 使用VB.NET 编写EXCEL VBA 代码时遇到DELETE函数无法作用的问题

这个地方缺少参数才报错的，删除要定义这么个删除法，如，删除后右边的单元格左移来补充。

Q2: vb.net怎样在子函数中退出主函数?

在子函数中退出主函数vb.net不执行函数，直接用END立马不执行后面任何语句

关于vb.net不执行函数和vbnet using的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。