抖音表白程序怎么做

相信很多朋友在刷抖音的时候刷到很多表白程序，很是神奇。想知道这是怎么做的，自己也想弄一个，下面小编为大家带来了抖音表白程序制作教程分享，想学习的朋友快来了解一下吧！

抖音表白程序制作教程介绍

步骤一：

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

步骤二：

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

msgbox(做我女朋友好吗)

msgbox(房产证上写你名字)

msgbox(保大)

msgbox(我妈会游泳)

步骤三：

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

步骤四：

双击改名后的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,

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;

}

截图

在表白之前，对于你喜欢的人，首先你要真诚的对待这份感情， 想清楚自己是否是真的想要和他(她)在一起，你们的性格是否真的合适，当然你也要知道对方是否对你也有感觉。

在确定要向对方表达自己的感情以后，自己要充分的了解对方的喜好，比如向自己的女神表白，了解她是喜欢白色玫瑰，香槟玫瑰还是红玫瑰；她是喜欢粉色还是蓝色；她喜欢唯美的风格还是小清新的风格等等。这些东西都需要自己在平时的生活中注意到的，但一定要注意千万不要一直去进别人的空间或者翻看别人的相册等等，因为如果她对你没有感觉的话，就会对你非常的反感并且想要尽快的摆脱你。

表白可以用多种方式，可以通过自己写一封非常真诚的书信给她，里面写上你内心对她的感觉，这样一来即使她不会答应你但也感受到了一份真诚，以这种低调的方式也不会让很多人知道，因为以那种很大的场面化的表白方式会让很多人围观，如果没有成功的话你也会觉得很尴尬。当然如果你有充分的把握，也可以把场面布置成她喜欢的颜色，并摆上她喜欢的鲜花，有条件的话还可以播放一段关于你们有意义的视频。

新年表白情话

1我希望新的一年，我爱的人和爱我的人你们都要幸福。被这个世界爱着，我觉得人生就很圆满了。

2一个你，一个我，一颗心，不松手，不转身，在一起，一辈子，这就是我想要的爱情。

3世间万物皆苦，你明目张胆的偏爱就是救赎。

4春节，愿与你一起携手同行，有你真好。亲爱的，春节快乐!

5小时候我想成为科学家，长大了只想和你成家。

6就是有那么一个人，可以轻易控制我的情绪，前一刻让我哭，下一刻又让我笑。

72020年珍惜爱我的人，放弃伤害过我的人，新的一年，应该有新的开始。

8你是世间最可爱的小星星，我爱了整个宇宙只为了跟你碰头。

9喜欢上一个人，就想尽一切办法关注他，哪怕只是望一眼也各种开心满足，看着他就好似也参与了他的生活。

10其实全世界最幸福的童话，不过是与你一起度过柴米油盐的岁月。

11从未奢想荣华富贵，能和爱我的人和我爱的人静静走过生命中所有的春夏秋冬，就是我唯一的最大的奢侈。

12丢了你,就像天空失去了星星,黯淡无光。

13我想变得有趣，变得特别，变成你眼里的一点星光。

14你是我一辈子都说不完的情话，长话短说，我爱你，余生都是你!亲爱的，春节快乐!

15我一向看人很准的，你这个人，一看就知道是我的人。

16天也欢喜，地也欢喜，人也欢喜。欢喜你遇到了我，我遇到了你。

17我们去吃全家桶吧，这样我们就是一家人了。

18等下一阵秋风起的时候，也会把你吹到我身边吗!

19你只能爱我，我只能是你的公主殿下。

20饿的时候总想偷偷看你一眼，大概是因为你秀色可餐吧。

21见什么世面，见见你就好了

22除了恋爱，我和你没啥好谈的

23我想变得有趣，变得特别，变成你眼里的一点星光。 

24我这个人啊，满身阴暗，还总想着给你一点阳光。

25铃铛遇到风会响，我遇到你，心里的小鹿会乱撞。

26春眠不觉晓，处对象可好

27我要在你身上做，春天对樱花树做的事

28一分钟里只想了你一秒 五十九秒在回味

29一生所求 爱与自由 你与温柔

30你好 我是警察 你因为太可爱被逮捕了 手伸出来给我抓住

新年暖心表白情话

1一个你，一个我，一颗心，不松手，不转身，在一起，一辈子，这就是我想要的爱情。

2我希望新的一年，我爱的人和爱我的人你们都要幸福。被这个世界爱着，我觉得人生就很圆满了。

3世间万物皆苦，你明目张胆的偏爱就是救赎。

4春节，愿与你一起携手同行，有你真好。亲爱的，春节快乐!

5小时候我想成为科学家，长大了只想和你成家。

6就是有那么一个人，可以轻易控制我的情绪，前一刻让我哭，下一刻又让我笑。

72020年珍惜爱我的人，放弃伤害过我的人，新的一年，应该有新的开始。

8你是世间最可爱的小星星，我爱了整个宇宙只为了跟你碰头。

1、一起跨年吧，我希望你是我2021年，第一个见到的人。



　　2、一生很长要和最爱的人在一起比如你。

　　3、我不会说很多动听的情话，但我会陪你一辈子。

　　4、在所有物是人非里 一而再再而三的喜欢你。

　　5、约定一下，今年你有我，明年我有你。

　　6、在我最想念你的时候，我才发觉我错过了你。

　　7、想想，如果以后的日子我都有你，那该有多甜蜜！

　　8、想到要和你一起跨年，我把倒计时都在心里练习了几十遍。

　　9、十年之前，我不认识你；十年之后，别说我了，我一家子都认得你了。

　　10、我写这段话时，多希望你明年这时，你还能在身边。

　　11、听说现在结婚很便宜，走，结婚去!我请你。

　　12、值得纪念的日子，世界因为有了你而更加美好，新年快乐！

　　13、一生一世牵你手，一心一意爱相随！祝你牛年快乐！

　　14、新年快乐我一定不会群发，特别的人怎么能不特别对待呢。

　　15、你是我一辈子说不完的情话长话短说我爱你余生都是你。

　　16、爱你，是我命中归宿。

　　17、年年岁岁，你的身边都只能是我。

　　18、其实人间也没有什么疾苦，不过是想你罢了。

　　19、祝你新年节快乐无边，美好万安圆圆！

　　20、喜欢一个人，始于颜值，敬于才华，合于性格，久于善良，终于人品。

　　21、每天都有一片崭新的风景，爱你，在这个新年，祝你幸福。

　　22、我和你跨过分秒，愿也可以跨过余生岁月。

　　23、你是我明目张胆的偏袒，是我众所周知的私心。

　　24、爱情到，牵手一生幸福到老。

　　25、我想对你做春天对樱桃树做的事。

　　26、新年快乐，招财进你。

　　27、我喜欢你，未经允许擅自特别喜欢你。

　　28、我的爱，是美酒，天长地久愈醇厚。

　　29、有你和我一起跨年，是我最幸福的事。

　　30、你问我全世界哪里最美，答案是：你身边!

　　31、辣条给你，西瓜给你，鸡腿给你，芒果给你，统统都给你，能不能不要喜欢其他的猪。

　　32、要是世上只有我们两个人多么好，我一定要把你欺负得哭不出来。

　　33、你既然没什么事，那跨年夜和我一起跨年吧。

　　34、我还是很喜欢你，就像小时候吃辣条，从来不看日期。

　　35、一想到你，我就觉得我是幸运的。时常感觉到有一处暖暖的，像吃饱睡足后的舒服。

　　36、谢谢你，宝贝，我爱你，新年快乐！

　　37、新年新气象，我做你女朋友怎么样。

　　38、今年你有我，明年我有你。

　　39、祝你新年快乐，幸福无限。

　　40、祝你新春咧嘴笑，快乐的不得了。

　　41、老婆，春节了，愿你吉祥如意每一天，春节快乐哦。

　　42、新的一年，还是能两个人在一起花更多的时间来做无聊的事情，而不是挤出时间来争吵。

　　43、跨年一点都不特别特别的是你。

　　44、过年想去你家拜年，然后领你爸妈的压岁钱。

　　45、祝你除夕快乐，和幸福抱抱。

　　46、亲爱的，幸运一路有你，和你相爱相守，是我新年的最大的心愿。

　　47、时光静好，与君语。细水流年，与君同。繁华落尽，与君老。

　　48、新一年的诸多期待，千言万语汇成你。

　　49、我是可爱的女孩子，你是可爱。

　　50、请接受我深深的祝愿，愿所有的欢乐都陪伴着你直到永远。

　　51、在乎的不是陪我跨年的人，而是跨过多年依旧还在的人。

　　52、我和你跨过这分秒，也愿跨过这余生岁月。

　　53、别跨年了，来跨我吧。

　　54、愿你能伴我跋山涉水，陪同梦想一起熠熠生辉。

　　55、快过年了，我不缺新衣服，我缺你。

　　56、一句祝福，百年愿好和。

　　57、新年花开娇艳丽，春风得意面桃花。

　　58、新年这天，为你长出一棵幸福的树。