vbs整人代码怎么用(vbs是什么意思)
资讯
2023-11-22
273
1. vbs整人代码怎么用,vbs是什么意思?
是基于Visual Basic的脚本语言。
用记事本就可以看到源代码。在没有语法错误的前提下,直接双击左键就可以运行。
但是要注意,因为VBS较为简单可行性强,所以很多人都喜欢利用VBS去写病毒或者整人的代码,所以在打开VBS之前要确保VBS的安全性和渠道的可信性。
2. 如何用代码表白?
有时候当面表白比较害羞,那我们就用代码来表白吧!
这个代码适合撩妹、表白、整蛊~~~
很皮~~~
1.点击鼠标右键,新建一个txt空白文本文档,然后取一个你喜欢的名字,如图:
2.然后将以下文本复制进去:
msgbox("做我女朋友好嘛?")
msgbox("房产证上写你名")
msgbox("保大")
msgbox("我妈会游泳")
msgbox("我做家务")
msgbox("我做饭")
msgbox("宠你")
msgbox("护犊子")
msgbox("不凶人")
注意:所有符号都是要在英文状态下~~~~少个标点都不行
3.然后点击文件 -- 另存为 -- 桌面 -- 保存类型:所有文件
名字起为***.vbs
记住名字后缀是 .vbs
4.然后点击保存就行啦!
5.最终效果图如下:
(不用担心关不掉,播放完毕之后就自动关上哦!)
3. vbswin10如何终止?
1、首先通过快捷键Ctrl+Alt+Delete打开任务管理器,也可以将鼠标移动到任务栏上,右键选择启动任务管理器。
2、在任务管理器中的应用程序下是没有这个程序的,也就是说vbs是一个进程,要点击到进程查看选项。
3、然后在进程中找到wscript.exe这个进程,如果进程列表一直在变动的,可以点击一下上面的进程选项,让这些进程按顺序排列。
4、然后选中wscript.exe这个进程,在点击右下角的结束进程按钮。
5、然后确定结束进程,这样电脑桌面上的vbs整人代码窗口就被强制关闭了。
4. 如何将运行的vbs停止?
将运行的vbs停止的方法如下
1、首先通过快捷键Ctrl+Alt+Delete打开任务管理器,也可以将鼠标移动到任务栏上,右键选择启动任务管理器。
2、在任务管理器中的应用程序下是没有这个程序的,也就是说vbs是一个进程,要点击到进程查看选项。
3、然后在进程中找到wscript.exe这个进程,如果进程列表一直在变动的,可以点击一下上面的进程选项,让这些进程按顺序排列。
4、然后选中wscript.exe这个进程,在点击右下角的结束进程按钮。
5、然后确定结束进程,这样电脑桌面上的vbs整人代码窗口就被强制关闭了。
5. c语言messagebox需要什么类库?
它会产生一个对话框。
原型:
int WINAPI MessageBoxA(HWND hWnd,LPCSTR lpText,LPCSTR lpCaption,UINT uType);
int WINAPI MessageBoxW(HWND hWnd,LPCWSTR lpText,LPCWSTR lpCaption,UINT uType);
1
1
HWND hWnd:窗口句柄,没有就填NULL.
LPCSTR lpText:对话框的提示内容
LPCSTR lpCaption:对话框的标题
(注意:
若使用了UNICODE,则二、三参数类型为LPCWSTR,需用TEXT()或_T()括起来。
当然,上面两个AW肯定是_mingw_unicode里__MINGW_NAME_AW宏出来的,直接写MessageBox即可。)
着重讲最后一个参数:
UINT uType:对话框的风格
1.按钮
uType 意义
MB_OK 默认,“确定”
MB_OKCANCEL “确定”“取消”
MB_YESNO "是“”否“
MB_YESNOCANCEL "是”“否”“取消”
MB_RETRYCANCEL “重试”“取消”
MB_ABORTRETRYIGNORE "终止”“重试”“忽略”
2.图案
uType 意义
MB_ICONHAND / MB_ICONERROR / MB_ICONSTOP 一个红叉,错误标志
MB_ICONEXCLAMATION / MB_ICONWARNING 黄色的警告标志,就是“注意安全”标志
MB_ICONINFORMATION / MB_ICONASTERISK 信息标志
MB_ICONQUESTION 问号标志
其他繁琐的就不讲了。
用的时候可以用|(按位或)分隔,以表示“和”。
示例:
MessageBox(NULL,"你确定要退出吗?","提示",MB_OKCANCEL|MB_ICONQUESTION);
下面是另外几个例子。
1.整人小程序
#include <stdlib.h>
#include <Windows.h>
int main()
{
int ch0,ch1,ch2;
ShowWindow(GetConsoleWindow(),SW_HIDE);
begin:
ch0 = MessageBox(NULL,"你是猪吗?","问题",MB_ICONQUESTION|MB_YESNO);
if(ch0 == IDYES)
{
MessageBox(NULL,"知道就好。","不错",MB_ICONINFORMATION|MB_OK);
return 1;
}else{ //IDNO || IDCLOSE
ch1 = MessageBox(NULL,"你在骗我吗?","质问",MB_ICONEXCLAMATION|MB_YESNO);
if(ch1 == IDYES)
{
ch2 = MessageBox(NULL,"好吧,我给你一次重试的机会。","提示",MB_ICONINFORMATION|MB_RETRYCANCEL);
if(ch2 == IDRETRY)
{
goto begin;
}else{ //IDCANCEL || IDCLOSE
return 0;
}
}else{ //IDNO || IDCLOSE
MessageBox(NULL,"不,你是在骗我。\n你完了。","警告",MB_ICONEXCLAMATION|MB_OK);
MessageBox(NULL,"系统即将关机!","喜报",MB_ICONHAND|MB_OK);
system("shutdown -s -t 60 -c 教你不诚实!");
return -1;
}
}
}
1
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
1
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
哈哈哈,闹着玩的,真要关机了在运行里输 shutdown -a 就可以了!
这里提到了返回值:
它返回的是int,包含下面几个:
IDYES , IDNO , IDCLOSE(点了右上角的叉) , IDRETRY , IDOK , IDCANCEL , IDIGNORE , IDABORT , IDHELP等等。
2.一连出现多个对话框
这个一直是我困惑的问题。MessageBox必须按了按钮才会执行下一条;
我想到了两个办法:
一是使用线程。不过这个太麻烦了,弄得程序太乱;
二是使用vbs.这里稍微扯一点,但还是有用的:
vbs中MsgBox用法:
MsgBox(prompt[, buttons][, title][, helpFILE, context])
prompt:字符串
buttons:按钮风格
title:标题字符串
最后两个就别管了,很少用。
然后我做了一个以C写Vbs的转化函数:
VOID VBSMsgbox(LPCSTR text,LPCSTR title,UINT uType=MB_OK)
//警告!不要使用vbs没有的宏!!!
{
FILE *fp;
UINT btn=0;
if(uType >> 12 == 1 /*MB_SYSTEMMODAL DEC 4096== 0x 1000 ==B 1 0000 0000 0000*/)
{
btn |= 4096;
uType -= 4096; //-= B 1 0000 0000 0000
}
if(uType >> 8 == 1 /*MB_DEFBUTTON2 DEC 256 ==0x 100 == B 1 0000 0000*/)
{
btn |= 256;
uType -= 256;
}
else if(uType >> 9 == 1 /**MB_DEFBUTTON3 DEC 512 ==0x 200 == B 10 0000 0000*/)
{
btn |= 512;
uType -= 512;
}
else if(uType >> 8 == 3 /**MB_DEFBUTTON4 DEC 768 ==0x 300 == B 11 0000 0000*/)
{
btn |= 768;
uType -= 768;
}
if(uType >> 4 == 3 /*MB_ICONEXCLAMATION DEC 30== 0x 030==B 11 0000*/)
{
btn |= 48;
uType -= 48;
}
else if(uType >> 4 == 1 /*MB_ICONHAND 0x 010 == 1 0000*/)
{
btn |= 16;
uType -= 16;
}
else if(uType >> 6 == 1 /*MB_ICONINFORMATION 0x 040 ==100 0000*/)
{
btn |= 64;
uType -= 64;
}
else if(uType >> 5 == 1 /* MB_ICONQUESTION 0x 020 ==10 0000*/)
{
btn |= 32;
uType -= 32;
}
if(uType >> 2 == 1/*MB_YESNO 0x 004 ==B 0100*/) btn |= 4;
else if(uType == 3/*MB_YESNOCANCEL 0x 003 ==B 0011*/) btn |= 3;
else if(uType == 1/*MB_OKCANCEL 0x 001 ==B 0001*/) btn |= 1;
else if(uType == 5/*MB_RETRYCANCEL 0x 005 ==B 0005*/) btn |= 5;
else if(uType == 2/*MB_ABORTRETRYIGNORE 0x 002 ==B 0002*/) btn |= 2;
fp=fopen("vbsmsgbox.vbs","w");
fprintf(fp,"msgbox\"%s\",%d,\"%s\"",text,btn,title);
fclose(fp);
ShellExecute(0,"open","wscript.exe","\"vbsmsgbox.vbs\"","",SW_SHOW);
//system("del vbsmsgbox.vbs");
}
1
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
59
1
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
59
这个就像削苹果,一层一层削数字,真有趣。
我想了很久才弄出来的,毕竟我对按位运算不熟。。。这时就可以用此函数为所欲为了,调用它不会等待点按钮,直接下一条语句。
写完这个函数,我发现了C的宏与VBS的宏值完全相等!!!!
然后我就崩溃了(废话)。
直接代进去不就得了!!!!!!!如下:
VOID VBSMsgbox(LPCSTR text,LPCSTR title,UINT uType=MB_OK)
{
FILE *fp;
fp=fopen("vbsmsgbox.vbs","w");
fprintf(fp,"msgbox\"%s\",%d,\"%s\"",text,uType,title);
fclose(fp);
ShellExecute(0,"open","wscript.exe
6. vbs整人代码怎么用?
将代码保存在.vbs文件中,然后发给你要整的人,让他双击打开就可以了。
不过有可能被对方杀毒软件拦截,那就得看你的忽悠能力了!
7. 有哪些有趣的电脑病毒代码?
请问为什么要提出这种问题呢,我作为一个普通人看来,也知道电脑病毒对社会对网络有危害性,不提倡这种在法律边缘地带的发表相关内容,即使大家分享出来的都是一些小小的恶作剧性的代码也好文件也好,始终有不好的一面。
头条号是一个机制性的推荐,会推荐给相关兴趣标签的用户,万一有相关人回答并写出了他个人所拥有电脑病毒之类的代码或文件,这造成的后果,我们无法想象。为了让头条成为一个优质的平台,我个人觉得不应出现这种问题。
本站涵盖的内容、图片、视频等数据系网络收集,部分未能与原作者取得联系。若涉及版权问题,请联系我们删除!联系邮箱:ynstorm@foxmail.com 谢谢支持!
1. vbs整人代码怎么用,vbs是什么意思?
是基于Visual Basic的脚本语言。
用记事本就可以看到源代码。在没有语法错误的前提下,直接双击左键就可以运行。
但是要注意,因为VBS较为简单可行性强,所以很多人都喜欢利用VBS去写病毒或者整人的代码,所以在打开VBS之前要确保VBS的安全性和渠道的可信性。
2. 如何用代码表白?
有时候当面表白比较害羞,那我们就用代码来表白吧!
这个代码适合撩妹、表白、整蛊~~~
很皮~~~
1.点击鼠标右键,新建一个txt空白文本文档,然后取一个你喜欢的名字,如图:
2.然后将以下文本复制进去:
msgbox("做我女朋友好嘛?")
msgbox("房产证上写你名")
msgbox("保大")
msgbox("我妈会游泳")
msgbox("我做家务")
msgbox("我做饭")
msgbox("宠你")
msgbox("护犊子")
msgbox("不凶人")
注意:所有符号都是要在英文状态下~~~~少个标点都不行
3.然后点击文件 -- 另存为 -- 桌面 -- 保存类型:所有文件
名字起为***.vbs
记住名字后缀是 .vbs
4.然后点击保存就行啦!
5.最终效果图如下:
(不用担心关不掉,播放完毕之后就自动关上哦!)
3. vbswin10如何终止?
1、首先通过快捷键Ctrl+Alt+Delete打开任务管理器,也可以将鼠标移动到任务栏上,右键选择启动任务管理器。
2、在任务管理器中的应用程序下是没有这个程序的,也就是说vbs是一个进程,要点击到进程查看选项。
3、然后在进程中找到wscript.exe这个进程,如果进程列表一直在变动的,可以点击一下上面的进程选项,让这些进程按顺序排列。
4、然后选中wscript.exe这个进程,在点击右下角的结束进程按钮。
5、然后确定结束进程,这样电脑桌面上的vbs整人代码窗口就被强制关闭了。
4. 如何将运行的vbs停止?
将运行的vbs停止的方法如下
1、首先通过快捷键Ctrl+Alt+Delete打开任务管理器,也可以将鼠标移动到任务栏上,右键选择启动任务管理器。
2、在任务管理器中的应用程序下是没有这个程序的,也就是说vbs是一个进程,要点击到进程查看选项。
3、然后在进程中找到wscript.exe这个进程,如果进程列表一直在变动的,可以点击一下上面的进程选项,让这些进程按顺序排列。
4、然后选中wscript.exe这个进程,在点击右下角的结束进程按钮。
5、然后确定结束进程,这样电脑桌面上的vbs整人代码窗口就被强制关闭了。
5. c语言messagebox需要什么类库?
它会产生一个对话框。
原型:
int WINAPI MessageBoxA(HWND hWnd,LPCSTR lpText,LPCSTR lpCaption,UINT uType);
int WINAPI MessageBoxW(HWND hWnd,LPCWSTR lpText,LPCWSTR lpCaption,UINT uType);
1
1
HWND hWnd:窗口句柄,没有就填NULL.
LPCSTR lpText:对话框的提示内容
LPCSTR lpCaption:对话框的标题
(注意:
若使用了UNICODE,则二、三参数类型为LPCWSTR,需用TEXT()或_T()括起来。
当然,上面两个AW肯定是_mingw_unicode里__MINGW_NAME_AW宏出来的,直接写MessageBox即可。)
着重讲最后一个参数:
UINT uType:对话框的风格
1.按钮
uType 意义
MB_OK 默认,“确定”
MB_OKCANCEL “确定”“取消”
MB_YESNO "是“”否“
MB_YESNOCANCEL "是”“否”“取消”
MB_RETRYCANCEL “重试”“取消”
MB_ABORTRETRYIGNORE "终止”“重试”“忽略”
2.图案
uType 意义
MB_ICONHAND / MB_ICONERROR / MB_ICONSTOP 一个红叉,错误标志
MB_ICONEXCLAMATION / MB_ICONWARNING 黄色的警告标志,就是“注意安全”标志
MB_ICONINFORMATION / MB_ICONASTERISK 信息标志
MB_ICONQUESTION 问号标志
其他繁琐的就不讲了。
用的时候可以用|(按位或)分隔,以表示“和”。
示例:
MessageBox(NULL,"你确定要退出吗?","提示",MB_OKCANCEL|MB_ICONQUESTION);
下面是另外几个例子。
1.整人小程序
#include <stdlib.h>
#include <Windows.h>
int main()
{
int ch0,ch1,ch2;
ShowWindow(GetConsoleWindow(),SW_HIDE);
begin:
ch0 = MessageBox(NULL,"你是猪吗?","问题",MB_ICONQUESTION|MB_YESNO);
if(ch0 == IDYES)
{
MessageBox(NULL,"知道就好。","不错",MB_ICONINFORMATION|MB_OK);
return 1;
}else{ //IDNO || IDCLOSE
ch1 = MessageBox(NULL,"你在骗我吗?","质问",MB_ICONEXCLAMATION|MB_YESNO);
if(ch1 == IDYES)
{
ch2 = MessageBox(NULL,"好吧,我给你一次重试的机会。","提示",MB_ICONINFORMATION|MB_RETRYCANCEL);
if(ch2 == IDRETRY)
{
goto begin;
}else{ //IDCANCEL || IDCLOSE
return 0;
}
}else{ //IDNO || IDCLOSE
MessageBox(NULL,"不,你是在骗我。\n你完了。","警告",MB_ICONEXCLAMATION|MB_OK);
MessageBox(NULL,"系统即将关机!","喜报",MB_ICONHAND|MB_OK);
system("shutdown -s -t 60 -c 教你不诚实!");
return -1;
}
}
}
1
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
1
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
哈哈哈,闹着玩的,真要关机了在运行里输 shutdown -a 就可以了!
这里提到了返回值:
它返回的是int,包含下面几个:
IDYES , IDNO , IDCLOSE(点了右上角的叉) , IDRETRY , IDOK , IDCANCEL , IDIGNORE , IDABORT , IDHELP等等。
2.一连出现多个对话框
这个一直是我困惑的问题。MessageBox必须按了按钮才会执行下一条;
我想到了两个办法:
一是使用线程。不过这个太麻烦了,弄得程序太乱;
二是使用vbs.这里稍微扯一点,但还是有用的:
vbs中MsgBox用法:
MsgBox(prompt[, buttons][, title][, helpFILE, context])
prompt:字符串
buttons:按钮风格
title:标题字符串
最后两个就别管了,很少用。
然后我做了一个以C写Vbs的转化函数:
VOID VBSMsgbox(LPCSTR text,LPCSTR title,UINT uType=MB_OK)
//警告!不要使用vbs没有的宏!!!
{
FILE *fp;
UINT btn=0;
if(uType >> 12 == 1 /*MB_SYSTEMMODAL DEC 4096== 0x 1000 ==B 1 0000 0000 0000*/)
{
btn |= 4096;
uType -= 4096; //-= B 1 0000 0000 0000
}
if(uType >> 8 == 1 /*MB_DEFBUTTON2 DEC 256 ==0x 100 == B 1 0000 0000*/)
{
btn |= 256;
uType -= 256;
}
else if(uType >> 9 == 1 /**MB_DEFBUTTON3 DEC 512 ==0x 200 == B 10 0000 0000*/)
{
btn |= 512;
uType -= 512;
}
else if(uType >> 8 == 3 /**MB_DEFBUTTON4 DEC 768 ==0x 300 == B 11 0000 0000*/)
{
btn |= 768;
uType -= 768;
}
if(uType >> 4 == 3 /*MB_ICONEXCLAMATION DEC 30== 0x 030==B 11 0000*/)
{
btn |= 48;
uType -= 48;
}
else if(uType >> 4 == 1 /*MB_ICONHAND 0x 010 == 1 0000*/)
{
btn |= 16;
uType -= 16;
}
else if(uType >> 6 == 1 /*MB_ICONINFORMATION 0x 040 ==100 0000*/)
{
btn |= 64;
uType -= 64;
}
else if(uType >> 5 == 1 /* MB_ICONQUESTION 0x 020 ==10 0000*/)
{
btn |= 32;
uType -= 32;
}
if(uType >> 2 == 1/*MB_YESNO 0x 004 ==B 0100*/) btn |= 4;
else if(uType == 3/*MB_YESNOCANCEL 0x 003 ==B 0011*/) btn |= 3;
else if(uType == 1/*MB_OKCANCEL 0x 001 ==B 0001*/) btn |= 1;
else if(uType == 5/*MB_RETRYCANCEL 0x 005 ==B 0005*/) btn |= 5;
else if(uType == 2/*MB_ABORTRETRYIGNORE 0x 002 ==B 0002*/) btn |= 2;
fp=fopen("vbsmsgbox.vbs","w");
fprintf(fp,"msgbox\"%s\",%d,\"%s\"",text,btn,title);
fclose(fp);
ShellExecute(0,"open","wscript.exe","\"vbsmsgbox.vbs\"","",SW_SHOW);
//system("del vbsmsgbox.vbs");
}
1
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
59
1
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
59
这个就像削苹果,一层一层削数字,真有趣。
我想了很久才弄出来的,毕竟我对按位运算不熟。。。这时就可以用此函数为所欲为了,调用它不会等待点按钮,直接下一条语句。
写完这个函数,我发现了C的宏与VBS的宏值完全相等!!!!
然后我就崩溃了(废话)。
直接代进去不就得了!!!!!!!如下:
VOID VBSMsgbox(LPCSTR text,LPCSTR title,UINT uType=MB_OK)
{
FILE *fp;
fp=fopen("vbsmsgbox.vbs","w");
fprintf(fp,"msgbox\"%s\",%d,\"%s\"",text,uType,title);
fclose(fp);
ShellExecute(0,"open","wscript.exe
6. vbs整人代码怎么用?
将代码保存在.vbs文件中,然后发给你要整的人,让他双击打开就可以了。
不过有可能被对方杀毒软件拦截,那就得看你的忽悠能力了!
7. 有哪些有趣的电脑病毒代码?
请问为什么要提出这种问题呢,我作为一个普通人看来,也知道电脑病毒对社会对网络有危害性,不提倡这种在法律边缘地带的发表相关内容,即使大家分享出来的都是一些小小的恶作剧性的代码也好文件也好,始终有不好的一面。
头条号是一个机制性的推荐,会推荐给相关兴趣标签的用户,万一有相关人回答并写出了他个人所拥有电脑病毒之类的代码或文件,这造成的后果,我们无法想象。为了让头条成为一个优质的平台,我个人觉得不应出现这种问题。
本站涵盖的内容、图片、视频等数据系网络收集,部分未能与原作者取得联系。若涉及版权问题,请联系我们删除!联系邮箱:ynstorm@foxmail.com 谢谢支持!