登录
首页 » Windows开发 » 让桌面下满樱花

让桌面下满樱花

于 2023-08-17 发布 文件大小:677.23 kB
0 45
下载积分: 2 下载次数: 1

代码说明:

用VB语言开发的一个桌面小程序,运行后可以看到桌面下满樱花的效果,可以从压缩包解压后,在路径bin/Release/樱花.exe直接运行,也可以用Visual Studio 2010 以上的软件版本打开

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • 这个一个鱼的屏保,同时还有很动听的背景音乐,作为屏保的效果也很好。...
    这个一个鱼的屏保,同时还有很动听的背景音乐,作为屏保的效果也很好。-this a fish screensavers, while there is still a very nice background music, as the screensaver was also very effective.
    2022-04-13 15:03:16下载
    积分:1
  • Delphi OP crypter研究
    应用背景样品函数ReadFile(文件名:AnsiString字符串);VaR和公司;公司;公司;公司;公司;公司;公司;公司;公司;公司; ;缓冲区 ; ; ; ; ; ; ;:AnsiString;的规模和规模,并在;和,和,;,;,;readbytes  ; ; ; ; ;:整数; ;defaultfilemode:字节;开始结果是:“”; ;defaultfilemode:=我不; ;我不:= 0; ;assignfile(F,文件名);重置(女,1); ;如果(ioresult = 0)然后一开始 ; ; ;尺寸:=文件大小(F); ; ; ;而(尺寸& gt;1024)做和,开始,开始 ; ; ; ; ;规定长度(缓冲区,1024); ; ; ; ; ;blockread(F,缓冲[ 1 ],1024,readbytes);和,和,和,结果:=结果+缓冲区; ; ; ; ; ;12(大小,readbytes);和,结束,结束; ; ; ;规定长度(缓冲区,大小); ; ; ;blockread(F,缓冲[ 1 ],大小);和,结果:=结果+缓冲; ; ; ;关闭一个打开的文件(F);结束了; ;我不defaultfilemode:=;终点功能readeof(delimit1,delimit2:字符串:字符串);VaR ;缓冲区 ; ; ; ; ;:AnsiString;reslength  ; ; ;:整数;我和公司的;&;&;&;&;&;&;&;posdelimit  ; ;:整数;开始 ;缓冲:= ReadFile(paramstr(0)); ;如果POS(delimit1,缓冲)& gt;POS(delimit2,缓冲)
    2022-10-07 03:10:02下载
    积分:1
  • 这是一个可以在后台偷取你闪盘里所有资料的小软件。 只要你的闪盘一插上,所有的东东都被悄悄拷走.代码放,可以热键呼出....
    这是一个可以在后台偷取你闪盘里所有资料的小软件。 只要你的闪盘一插上,所有的东东都被悄悄拷走.代码开放,可以热键呼出.-This is a steal in the background you can flash all the information a small software. One of the key as long as you plug in, all the East have been quietly taking copy. Code open, you can hotkey exhaled.
    2022-06-21 13:46:08下载
    积分:1
  • USB读写的简单程序,用于读取USB信息
    一个读写usb的简单程序,用来读取usb的信息-Usb a to read and write simple procedures, used to read the usb information
    2022-03-12 07:50:22下载
    积分:1
  • 任何 ocx VB6 mousewhell 支持控制 flexgrid listbox,更多
    VB6鼠标滚轮支持任何OCX/控制,与简单的解决方案支持的MSFlexGrid,图片控制,组合控制,列表框控件,文本框,还有更多使用的WindowProc捕获WM_MOUSEWHEEL事件,这是由原始的VB6忽略,现在列表框,FlexGrid的,等等。支持滚动!
    2022-05-07 20:23:37下载
    积分:1
  • 有一对兔子,从出生后第3个月起每月生一对兔子,小兔子长到第3个月后每月又生一对兔子。假设所有兔子都不死,问每月兔子总数为多少。...
    有一对兔子,从出生后第3个月起每月生一对兔子,小兔子长到第3个月后每月又生一对兔子。假设所有兔子都不死,问每月兔子总数为多少。-Have a pair of rabbit from birth to 3 months after starting the monthly Health and a pair of rabbit, small rabbit long to the first 3 months after the month a pair of rabbit again. Do not assume that all dead rabbit, rabbit ask a monthly total of the number.
    2023-03-20 04:20:03下载
    积分:1
  • Mapobject for microsoft Visual Basic. Work with Geocode on the vn and Mobjects
    Mapobject for microsoft Visual Basic. Work with Geocode on the vn and Mobjects-Mapobject for microsoft Visual Basic. Work with Geocode on the vn and Mobjects
    2023-03-22 09:40:04下载
    积分:1
  • calculated another way, can increase code
    另一种计算方法,可以增加代码
    2022-04-07 07:57:38下载
    积分:1
  • A Crash Course on the Depths of Win32 Structured Exception Handling 
    A Crash Course on the Depths of Win32 Structured Exception Handling -A Crash Course on the Depths of Win32 Structured Exception Handling.
    2022-07-18 10:26:18下载
    积分:1
  • 用VC++的分形序列固步自封,它旨在表明分形树…
    用VC++编写的分形小成序,用以显示分形树及其风吹效果-with VC++ fractal sequence on its laurels, it purported to show that fractal tree and the wind effect
    2022-03-11 22:00:44下载
    积分:1
  • 696518资源总数
  • 104269会员总数
  • 31今日下载