一、如何动态更改屏幕分辨率 有许多小工具可以在不重新启动Windows的条件下,动态更改屏幕分辨率。你是不是也想自己动手做一个呢?请在interface段中加入下面一句 function Resolution(X,Y:word):boolean; 然后在implementation段中写入如下代码: function Resolution(X,Y:word):boolean; var DevMode:TDeviceMode; begin Result:=EnumDisplaySettings(nil,0,D...[ 查看全文 ]
这个功能在VB6中,需要借助于API函数才能实现。而在VB.NET中,凭自己的功能就能实现。首先设置窗体的FormBorderStyle属性为none以去掉窗体的边框,然后在窗体上添加一个按钮。窗体中的代码如下: Public Class Form1 Inherits System.Windows.Forms.Form Private mouse_offset As Point Private Sub form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArg...[ 查看全文 ]