cmd表白心形 心形表白代码c+
如何用cmd画爱心
1、创建一个新的HTML文件,在body标签中加入如下的html代码,设置显示爱心的对象。在head标签中添加css样式标签style,并写入CSS样式,把爱心的对象变成红色的方块。给这个元素设置伪元素CSS样式,这个爱心的一半就出来了,接下来只需要再添加另外一边的爱心即可。工具原料:台式机组装电脑windows1020h2dreamwarecc201、打开运行电脑中安装的dreamware软件,打开文件菜单中的新建功能,创建一个新的HTML文件。
cmd表白心形 心形表白代码c+
cmd表白心形 心形表白代码c+
cmd表白心形 心形表白代码c+
2、在body标签中加入如下的html代码,设置显示爱心的对象。
3、在head标签中添加css样式标签style,并写入CSS样式,把爱心的对象变成红色的方块。
4、给这个元素设置伪元素CSS样式,此时图形就变成如图所示。
5、这个爱心的一半就出来了,再给它进行一下角度的45度旋转。
6、接下来只需要再添加另外一边的爱心,再把两个叠加在一起就完成了。
editplus写的ja爱心代码怎么在cmd不现实
因为editplus和在cmd命令编辑窗口所使用的字符字体不一样。
通常类似字符图案的这种,要想控制的整齐,多半会使用等宽字体,所谓等宽字体,就是不管字符实际所占的字型宽、窄、高、低,宽度都是一样的,比如:在等宽字体中,字母 i, j 和w, m宽度是一样的。
因此,i,j 会显得两侧空白较多,而字母w,m等显得相当拥挤。
我想用cmd脚本实现,在cmd窗口内,一个字一个字的出现一段话。就像正在输入一样的效果,请大神给个
@echo off
::设置文本内容
set "str=你知道吗?其实我已经喜欢你很久了,可是我怕对你表白后,被你拒绝,那么我会很尴尬,所以一直到现在,只能默默的暗恋着你,却不敢当面表白。"
call :strlen len
:A
setlocal EnableDelayedExpansion
set /a num+=1
set txt=!str:~,%num%!
cls&echo !txt!
if %num% equ %len% echo.&pause&exit
ping 0 -n "2">nul
goto A
goto :eof
:strlen
setlocal EnableDelayedExpansion&set n=0
:strlen_loop
if "!str:~%n%,1!" neq "" set /a n+=1&goto strlen_loop
endlocal&set "%~1=%n%"&goto :eof
我想编写一个vbs整人代码来表白,谁能帮我一下
下边代码才是完成版,2楼有语法错误
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 180 -c ""三分钟内决定是否嫁给我,否则会被关机......"" ",0 ,true
dim a
do while (a <> "我愿意")
a = inputbox ("你愿意嫁给我么","爱的表白","",8000,7000)
if ( a <> "我愿意" ) then
msgbox "不愿意么?再考虑一下哦"
end if
loop
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox "哈哈哈哈,好乖"
菜鸟改了两个小时,如下
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 180 -c ""三分钟内决定是否当我的女朋友,否则会被关机......"" ",0 ,true
dim a
do while (a <> "愿意")
a = inputbox ("你愿意当我的女朋友吗","爱的表白","",8000,7000)
if ( a <> "愿意" ) then
msgbox "不愿意么?再考虑一下哦"
end if
loop
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox "嘿嘿嘿"
msgbox "叫我老公"
msgbox "快点"
dim b
do while (a <> "老公")
a = inputbox ("叫吧","叫的你就是我老婆了","",8000,7000)
if ( a <> "老公" ) then
msgbox "不愿意叫吗?再考虑一下哦"
end if
loop
msgbox "老婆~"
msgbox "mua~"
msgbox "爱你"
msgbox "嘿嘿"
文字都可随便替换,同时msgbox为弹窗,是可以增加,删除的
怎么用cmd表白
在电脑桌面新建一个txt文本,然后将下面内容进文本中:
msgbox("做我女朋友好不好")
msgbox("我会做饭")
msgbox("爱你一辈子")
msgbox("带你去旅游")
magbox("你说啥是啥")
msgbox("永远爱你")
内容粘贴完成后保存,将文档后缀改为vbs格式,就OK了!
其中msgbox可以不断添加,添加的越多弹窗越多。
火电脑cmd代码
1、新建一个文本文件,命名为表白.txt 输入代码
(以下是示例)
msgbox("做我女朋友好吗?")
msgbox("房产证写你名字...")
msgbox("保大...")
msgbox("我妈会游泳..")
x=msgbox("做我女朋友好不好",VbOkCancel)
if x=VbOk then
msgbox("爱你,么么哒")
elseif x=VbCancel then
msgbox("哼,再见")
end if
2、鼠标左键点击文本左上角文件,再点击另存为。
3、点击后会弹出以下窗口,文件名改成:表白.vbs,保存类型改为:所有文件,然后点击确定。
4、点击确定后,完成制作,电脑桌面上会显示一个vbs文件。鼠标左键双击单开刚才保存vbs文件,就会像里面的一样了。
声明:本站所有文章资源内容,如无特殊说明或标注,均为采集网络资源。如若本站内容侵犯了原著者的合法权益,可联系 836084111@qq.com 删除。