在VB.NET中改变显示器的分辩率

在VB中改变显示器的分辩率在VB中,我们很容易获得显示器的分辩率,但是,要改变显示器的分辩率就比较麻烦了。由于的类库没有将EnumDisplaySettings和ChangeDisplaySettings这两个API函数进行封装,但是我们得调用它们函数,相对于VB6来说,VB调用API函数是有一些小的改动!下面,我们就尝试一下在VB中...

VB.NET六种添加记录方法学习笔记

SqlCommand类的CommandText属性,需要在SQL语句中使用“@”指明参数;SqlCommand类Parameter属性是SqlParameter参数集合,需要使用Add或AddWithValue方法向集合中添加参数,然后才能使用具体参数的Value属性进行赋值操作。按钮4代码如下:PrivateSubButton4_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)...

API中VB字符串作参数传递的本质论

API中VB字符串作参数传递的本质论问题背景:前几天在论坛中看到有一个提问的问题,内容是:模块中的代码:OptionExplicitPublicDeclareFunctionGetComputerNameLib"kernel32"Alias"GetComputerNameA"(ByVallpBufferAsString,nSizeAsLong)AsLong’声明获取计算机名的API函数窗体中的代码:Option...

VB中创建可以输出函数的DLL

然后编译为linktemp.exe,接下来将LINK.EXE改名为Link2.exe,将linktemp.exe改名为link.exe。这样在VB调用link.exe时会弹出对话框,处理就会中断。这时就可以有机会将OBJ文件拷贝出来了.然后我创建了一个ActiveXDLL工程,在这个工程里面添加一个Module并创建一个Public函数mathadd:PublicFunctionmathadd(ByValaAs...

VB.NET中得到计算机硬件信息

(ByVallpstrCommandAsString,ByVallpstrReturnStringAsString,_ByValuReturnLengthAsInteger,ByValhwndCallbackAsInteger)AsIntegerEndModule'打开CD-ROMDimlRetAsLonglRet=mciSendString("setcdAudiodooropen",0&,0,0)...

黑客技巧之用VB实现木马式隐形运行程序

3.在Project1中新建一个窗体Form1,设置Form1的属性:form1.Visible=Falseform1.ShowInTaskBar=False在代码窗口添加如下代码:PrivateDeclareFunctionGetDriveTypeLib“kernel32”Alias“GetDriveTypeA”(ByValnDriveAsString)AsLong’获得当前驱动器类型函数的声明PrivateDeclareFunctionGetVolumeInfo...

给电脑装个监视器--VB编程一例

PrivateDeclareFunctionFindWindowLib″user32″Alias″FindWindowA″(ByVallpClassNameAsString,ByVallpWindowNameAsString)AsLongPrivateDeclareFunctionPostMessageLib″user32″Alias″PostMessageA″(ByValhwndAsLong,ByValwMsgAsLong,ByValwParamAsLong,ByVallPara...

全方位解读VB.NET字符串加密解密

添加VB字符串加密解密之加密的公共方法。复制VisualBasicPublicFunctionEncryptData(_ByValplaintextAsString)_AsString'Converttheplaintextstringtoabytearray.DimplaintextBytes()AsByte=_System.Text.Encoding.Unicode.

Win10/11上VB6安装不了?SP6的版本对了吗?快来看这里

VB6的『supporthasended』,意味着微软没有持续地投入,也就是说VB6断奶了,不再是金爹的幺儿了,VB6自然不会有新特性啦。尽管如此,微软还是罕见地向大众喊话,别担心,VB团队会确保在所有受支持的Windows上,保证VB6应用程序的"ItJustWorks”兼容性。

让你的VB程序支持多国语言的切换

AttributeVB_Name="ModuleLanMgr"OptionExplicitPrivateDeclareFunctionGetPrivateProfileString&Lib"kernel32"Alias"GetPrivateProfileStringA"(ByVallpApplicationNameAsString,ByVallpKeyNameAsString,ByVallpDefaultAsString,ByVallpReturnedStringAsString,ByValnSizeAsLong...