谁能给我一个表白的小程序_资讯

打开记事本,把下面的代码给拷贝进去,看情况改字哈``然后保存,最后把txt后缀改为hta,然后就可以运行罗``关闭的话ALT+F4

<html>

<head>

<title>杨清瑶我爱你</title>

<hta:application sysmenu=no scroll=no border=none>

sub sub1

meclose

end sub

meresizeto 500,410 '这里设置窗口大小,单位为像素

memoveto 260,100 '这里设置窗口位置,单位为像素

windowsettimeout "sub1",100000 '这是设置时间,单位为毫秒,我这里设置为12秒

</script>

<body>

<FONT style="COLOR:#33FF00; FILTER: shadow(color=black); FONT-FAMILY: 华文彩云; FONT-SIZE: 30pt; LINE-HEIGHT: 150%; WIDTH: 100%"><B>杨清瑶我爱你</B></FONT></CENTER>

<hr>

3dfont { FILTER: glow(color=ffffff,strength=0) shadow(color=cccccc,direction:135); POSITION: relative; WIDTH: 100% }

</style>

<tr>

<br>

★杨清瑶是世界上最漂亮的姑娘!</B><br><br>

杨清瑶我真的好爱你，真的真的好爱你!</B><br><br>

</html>

给你一个javascript的程序，文件名保存为1html就可以

<html>

<head>

</head>

var x = 10;

var dx = 5;

var y = windowscreenavailHeight;

var newWin = windowopen("", "myWin", "menubar=0,toolbar=0");

newWindocumentwrite("I &nbsp L &nbspo &nbspv &nbspe &nbsp Y &nbspo &nbspu!");

newWinresizeTo(x, y);

var time = windowsetInterval("active()", 100);

function active() {

if(newWinclosed){

clearInterval(time);

return;

}

else if(x < screenavailWidth){

x+=dx;

}

else {

clearInterval(time);

}

newWinresizeTo(x,y);

}

</script>

</html>

C语言版表白神器是一款非常有趣的电脑表白软件，本款C语言表白程序使用方法简单易懂，用户可通过它来轻松生成浪漫的红色爱心，从而让你的表白充满创新。C语言版表白神器可以帮你生成超级炫酷的表白爱心哦只需简单几步，就能将你想对他/她说的话用爱心表达出来转发到朋友圈，就是这么炫酷，开启炫酷装逼模式吧！

制作表白程序需要具备一定的编程知识，通常需要使用开发工具和编程语言进行开发。如果你没有相关的编程背景，可以尝试使用一些简单的在线工具来创建一个基础的表白程序，例如：

1 在线制作表白程序的工具：你可以在网上搜索“在线制作表白程序”，会出现很多这样的网站，其中一些可以帮助你创建自己的表白页面。

2 通过APP制作：你可以通过下载一些表白互动的软件，在里面寻找制作表白程序的功能，实现自定义表白内容、选取背景、设置音乐等个性化功能。

3 使用**、音乐等素材：你可以通过在手机上安装剪辑软件，将自己拍摄的照片、配上心仪的音乐、**素材等做成视频表白，然后上传至网站或者朋友圈分享出来。

你需要的是编译器，比如TurboC，MSC，或者VC等等，你写的C代码只是源程序而已，需要经过C编译器编译成可执行的EXE文件。C编译器有很多，上面提到的就是比较常用的，至于编译器的使用，你得另查一查使用手册，一般而言，编译器都带有IDE的集成编程环境，可以作为程序的编辑器（别把编辑器和编译器弄混了，编辑器就是可以输入源代码的软件工具，如记事本就是一个最简单的编辑器，编译器就是用于编译特定语言源代码的软件），然后一般都有一个编译（Compile）按钮（或者编译命令），编译时编译器会检查你的源代码是否有语法错误，如果没有错误，还会使用链接（Link）工具将你的程序链接成为可执行的Exe文件，至此，你的源程序就成了可运行的程序了。运行EXE文件是不用源代码的，它与编写程序的语言无关，各种编程语言写成的源程序经过该编程语言的编译器可以被编译成在计算机上可以被运行的执行程序。

1 在电脑上新建一个txt文件。

2 打开txt文件，复制以下代码粘贴进去（可以修改中文部分，其它代码不要动！）。保存并关闭txt文件。

msgbox("做我女朋友好吗？")

msgbox("房产证上写你名字")

msgbox("保大")

msgbox("我妈会游泳")

3 将txt文件名称后面的“txt”改为“vbs”

4 双击改名后的vbs文件即可看到和抖音视频上一样的效果。

#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,

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,

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;

}

截图

Attention ！！！

再过几天，

就到了恩爱秀满天的日子了！

七夕！中国情人节！

很多单身汪都在绞尽脑汁

买什么礼物给TA？

鲜花？包包？

还是请TA一起去看场**？

用什么方式告诉对方

内心最想对TA说的话

不能跟这个哥们一样

原本想对TA说

结果嘴巴一哆嗦

说成了

每当想起你这张丑脸，我就泛起了微笑……

结果可想而知？

一开始我以为这样的悲剧

只会发生在程序员身上

因为外界都认为

程序员不浪漫、木内

但我错了

程序员的表白方式更加的特别

NO1

把以下代码保存为html后缀文件在浏览器中打开，

Happy

结果就是这样的

喜欢吗？

NO2

某公司程序员对小编说

于是就有了

有没有暖到你的内心呢？

温馨告白

程序员，也许不善言辞

但总是默默地在行动

用行动去诠释他们对你的爱

值此七夕佳节

雅腾教育祝愿

每一个程序员

和即将成为程序员的朋友

七夕快乐！

永远幸福！

欢迎分享，转载请注明来源：表白网

原文地址:https://h5.hunlipic.com/biaobai/4124839.html

谁能给我一个表白的小程序

发表评论

评论列表（0条）