程序员们很辛苦，每天都得加班加点的来工作。所以你要送上贴心的小惊喜，温暖一下程序员的心。还要多给程序员们送秋波，要好感度嗷嗷上升。要投其所好的把你的。电脑桌面设置成你表白的话，让他看到满满的爱意。还有就是，嗯，蜡烛玫瑰，创造出浪漫的环境。大胆的说出你的爱意。
#define IdYes 1002
#define IdNo 1003
#define IdStatic 1004
#define IdTimer 1005
#define Width 640
#define Height 480
#define Tick 2000
#include<windowsh>
int x,y;
RECT rdesk;
HINSTANCE hinst;
HWND hyes,hno;
BOOL quit=FALSE;
LRESULT CALLBACK WndProc(HWND hwnd,UINT Message,WPARAM wParam,LPARAM lParam)
{
HDC hdc;
PAINTSTRUCT ps;
RECT rclient;
HBRUSH hbrbkgnd;
static COLORREF c;
static BYTE r,g,b;
switch(Message)
{
case WM_TIMER:
if(IdTimer==LOWORD(wParam))
{
r=(BYTE)(rand()%256);
g=(BYTE)(rand()%256);
b=(BYTE)(rand()%256);
c=RGB(r,g,b);
InvalidateRect(hwnd,NULL,TRUE);
UpdateWindow(hwnd);
}
break;
case WM_PAINT:
hdc=BeginPaint(hwnd,&ps);
hbrbkgnd=CreateSolidBrush(c);
SelectObject(hdc,hbrbkgnd);
GetClientRect(hwnd,&rclient);
FillRect(hdc,&rclient,hbrbkgnd);
DeleteObject(hbrbkgnd);
EndPaint(hwnd,&ps);
break;
case WM_COMMAND:
switch(LOWORD(wParam))
{
case IdYes:
quit=TRUE;
MessageBox(hwnd,TEXT("回答正确，太太太好了！"),TEXT("宝贝"),MB_ICONEXCLAMATION|MB_OK);
SendMessage(hwnd,WM_CLOSE,0,0);
break;
case IdNo:
MessageBox(hwnd,TEXT("回答错误哦，我很生气呢！"),TEXT("宝贝"),MB_ICONEXCLAMATION|MB_OK);
break;
}
break;
case WM_SIZE:
case WM_MOVE:
SetWindowPos(hwnd,HWND_TOPMOST,x,y,Width,Height,SWP_SHOWWINDOW);
break;
case WM_DESTROY:
PostQuitMessage(0);
break;
case WM_CLOSE:
if(quit)
{
KillTimer(hwnd,IdTimer);
DestroyWindow(hwnd);
}
break;
case WM_CREATE:
CreateWindow(TEXT("Static"),
TEXT("请回答：做我女朋友好吗？"),
WS_CHILD|WS_VISIBLE|SS_CENTER,
200,
200,
240,
20,
hwnd,
(HMENU)IdStatic,
hinst,
NULL
);
hyes=CreateWindow(TEXT("Button"),
TEXT("好"),
WS_CHILD|WS_VISIBLE|BS_CENTER,
270,
230,
45,
20,
hwnd,
(HMENU)IdYes,
hinst,
NULL
);
hno=CreateWindow(TEXT("Button"),
TEXT("不好"),
WS_CHILD|WS_VISIBLE|BS_CENTER,
325,
230,
45,
20,
hwnd,
(HMENU)IdNo,
hinst,
NULL
);
SetTimer(hwnd,IdTimer,Tick,NULL);
break;
default:
return DefWindowProc(hwnd,Message,wParam,lParam);
}
return 0;
}
int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpCmdLine,int nCmdShow)
{
WNDCLASSEX wc;
HWND hwnd;
MSG msg;
hinst=hInstance;
srand(time(NULL));
memset(&wc,0,sizeof(wc));
wccbSize=sizeof(WNDCLASSEX);
wclpfnWndProc=WndProc;
wchInstance=hInstance;
wchCursor=LoadCursor(NULL,IDC_ARROW);
wchbrBackground=(HBRUSH)(COLOR_WINDOW+1);
wclpszClassName=TEXT("WindowClass");
wchIcon=LoadIcon(NULL,IDI_APPLICATION);
wchIconSm=LoadIcon(NULL,IDI_APPLICATION);
if(!RegisterClassEx(&wc))
{
MessageBox(NULL,TEXT("窗口注册失败！"),TEXT("错误"),MB_ICONEXCLAMATION|MB_OK);
return 0;
}
GetWindowRect(GetDesktopWindow(),&rdesk);
x=(rdeskright-Width)/2;
y=(rdeskbottom-Height)/2,
hwnd = CreateWindowEx(WS_EX_TOPMOST,
TEXT("WindowClass"),
TEXT("I Love You"),
WS_THICKFRAME|WS_VISIBLE,
x,
y,
Width,
Height,
NULL,NULL,hInstance,NULL);
if(NULL==hwnd)
{
MessageBox(NULL,TEXT("窗口创建失败！"),TEXT("错误！"),MB_ICONEXCLAMATION|MB_OK);
return 0;
}
while(GetMessage(&msg,NULL,0,0)>0)
{
TranslateMessage(&msg);
DispatchMessage(&msg);
}
return msgwParam;
}
截图
<html>
<head>
<title>玫瑰</title>
<style type="text/css">
#shusheng {
position: absolute;
width: 100%;
height: 100%;
text-align: center;
}
</style>
</head>
<body>
<div style="text-align: center">
<h1>
送给xxx的花
</h1>
</div>
<div id="shusheng">
<canvas id="c"></canvas>
<script>
var b = documentbody;
var c = documentgetElementsByTagName('canvas')[0];
var a = cgetContext('2d');
documentbodyclientWidth;
</script>
<script>
with(m=Math)C=cos,
S=sin,
P=pow,
R=random;
cwidth=cheight=f=500;
h=-250;
function p(a,b,c){
if(c>60)
return[S(a7)(13+5/(2+P(b4,4)))-S(b)50,bf+50,625+C(a7)(13+5/(2+P(b4,4)))+b400,a1-b/2,a];A=a2-1;
B=b2-1;
if(AA+BB<1){
if(c>37) {
n=(j=c&1)6:4;o=5/(a+01)+C(b125)3-a300;w=bh;
return[oC(n)+wS(n)+j610-390,oS(n)-wC(n)+550-j350,1180+C(B+A)99-j300,4-a1+P(1-BB,-h6)15-ab4+C(a+b)/5+P(C((o(a+1)+(B>0w:-w))/25),30)1(1-BB),o/1e3+7-ow3e-6]
}
if(c>32) {
c=c116-15;o=a45-20;w=bbh;z=oS(c)+wC(c)+620;
return[oC(c)-wS(c),28+C(B5)99-bbb60-z/2-h,z,(bb3+P((1-(AA)),7)15+3)b,b7]
}
o=A(2-b)(80-c2);
w=99-C(A)120-C(b)(-h-c49)+C(P(1-b,7))50+c2;
z=oS(c)+wC(c)+700;
return[oC(c)-wS(c),B99-C(P(b, 7))50-c/3-z/135+450,z,(1-b/12)9+a1, P((1-b),20)/4+05]
}
}
setInterval('for(i=0;i<1e4;i++)if(s=p(R(),R(),i%46/74)){z=s[2];x=~~(s[0]f/z-h);y=~~(s[1]f/z-h);if(!m[q=yf+x]|m[q]>z)m[q]=z,afillStyle="rgb("+~(s[3]h)+","+~(s[4]h)+","+~(s[3]s[3]-80)+")",afillRect(x,y,1,1)}',0)
</script>
</div>
</body>
</html>
保存到html文件，用浏览器打开，文字内容自己写
void a(int aa)
{for(int i=0;i<aa;i++)printf(" ");}
void b()
{printf ("");}
char c(int cc)
{printf("%c",cc);return 0;}
int main()
{a(6);b();a(3);b();a(5);b();a(3);b();
printf ("\n");
a(4);b();a(8);b();a(8);b();
printf ("\n");
a(3);b();a(19);b();
printf ("\n");
a(3);b();a(4);c(73);a(1);c(76);c(111);c(118);
c(101);a(1);c(89);c(111);c(117);a(5);b();
printf ("\n");
a(4);b();a(17);b();
printf ("\n");
a(6);b();a(13);b();
printf ("\n");
a(8);b();a(9);b();
printf ("\n");
a(10);b();a(5);b();
printf ("\n");
a(13);b();
printf ("\n");return 0;
}
效果如下：
延展阅读：
C语言是一门通用计算机编程语言，应用广泛。C语言的设计目标是提供一种能以简易的方式编译、处理低级存储器、产生少量的机器码以及不需要任何运行环境支持便能运行的编程语言。
尽管C语言提供了许多低级处理的功能，但仍然保持着良好跨平台的特性，以一个标准规格写出的C语言程序可在许多电脑平台上进行编译，甚至包含一些嵌入式处理器（单片机或称MCU）以及超级电脑等作业平台。
二十世纪八十年代，为了避免各开发厂商用的C语言语法产生差异，由美国国家标准局为C语言制定了一套完整的美国国家标准语法，称为ANSI C，作为C语言最初的标准。[1] 目前2011年12月8日，国际标准化组织（ISO）和国际电工委员会（IEC）发布的C11标准是C语言的第三个官方标准，也是C语言的最新标准，该标准更好的支持了汉字函数名和汉字标识符，一定程度上实现了汉字编程。
打开记事本,把下面的代码给拷贝进去,看情况改字哈``然后保存,最后把txt后缀改为hta,然后就可以运行罗``关闭的话ALT+F4
<html>
<head>
<title>杨清瑶我爱你</title><!--这里是标题-->
<hta:application sysmenu=no scroll=no border=none>
<script language="vbscript">
sub sub1
meclose
end sub
meresizeto 500,410 '这里设置窗口大小,单位为像素
memoveto 260,100 '这里设置窗口位置,单位为像素
windowsettimeout "sub1",100000 '这是设置时间,单位为毫秒,我这里设置为12秒
</script>
<body>
<CENTER>
<FONT style="COLOR:#33FF00; FILTER: shadow(color=black); FONT-FAMILY: 华文彩云; FONT-SIZE: 30pt; LINE-HEIGHT: 150%; WIDTH: 100%"><B>杨清瑶我爱你</B></FONT></CENTER>
<hr>
<style type="text/css">
3dfont { FILTER: glow(color=ffffff,strength=0) shadow(color=cccccc,direction:135); POSITION: relative; WIDTH: 100% }
</style>
<table border="0" width="100%">
<tr>
<td width="100%" class="3dfont"><font color=RED><CENTER> ☆☆☆☆☆☆ 永久通知 ☆☆☆☆☆☆</font>
<br>
<P align=left>
★杨清瑶是世界上最漂亮的姑娘!</B><br><br>
杨清瑶我真的好爱你，真的真的好爱你!</B><br><br>
<MARQUEE>轩辕伊杨 2010125</body>
</html>
方法：
先将要轮流显示的编辑好，建议尺寸设置为一致！并转换为BMP格式的！
打开VB,新建工程,单击窗体中外接程序=>外接程序管理器=>选择VB 资源管理器，并加载它！
将添加进VB 资源管理器里面，文件的ID依次是 101 102 103
在工程项目中添加两个窗体,分别为 Form1 Form2
在Form1窗体中添加一个Command控件, 并在窗体中添加如下代码:
Private Sub Command1_Click()
Form2Show
End Sub
在Form2窗体中添加一个Timer控件,一个PictureBox控件,并在窗体中添加如下代码:
Dim i As Integer
Private Sub Form_Load()
Timer1Interval = 2000 '延时2000ms
i = 1
End Sub
Private Sub Timer1_Timer()
Picture1Picture = LoadResPicture(100 + i, vbResBitmap)
i = i + 1
If i = 6 Then i = 1 ' 数字6是代表有6张
End Sub
这样就按照你的要求做出一个每两秒钟就自动循环更换的程序了!
欢迎分享，转载请注明来源：表白网
微信扫一扫
支付宝扫一扫
评论列表（0条）