我用vbs做了个华氏度和摄氏度转换器 - VBS求助&讨论 - 批处理之家 BAT,CMD,批处理,PowerShell,VBS,DOS

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

1楼 跳转到 »

发表于 2023-6-3 18:39 | 显示全部帖子

事实上作为一门用于网页的脚本语言如果只是用来启动网页 vbs的功能还是够的

 //jscript
window. onload=function(){
    alert(1)
}COPY

 'vbscript
sub window_onload()
alert 1
end subCOPY

你好

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

2楼

发表于 2023-6-3 18:40 | 显示全部帖子

hta甚至不需要按钮即可转换
话说你是不上网吗？🤔

你好

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

3楼

发表于 2023-6-3 19:23 | 显示全部帖子

本帖最后由 jyswjjgdwtdtj 于 2023-6-3 21:17 编辑

做一个

 <body>
F:<input id=f /><BR/>
C:<input id=c />
<script>
var f=document.getElementById("f")
var c=document.getElementById("c")
f.onkeydown=function(){
if(isNaN(f.value*1)){return}
c.value=(f.value-32)/1.8
}
c.onkeydown=function(){
if(isNaN(c.value*1)){return}
f.value=c.value*1.8+32
}
</script>
</body>COPY

你好

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

4楼

发表于 2023-6-3 19:27 | 显示全部帖子

本帖最后由 jyswjjgdwtdtj 于 2023-6-3 21:17 编辑

vbs版本

 <body>
F:<input id=f /><BR/>
C:<input id=c />
<script language=vbscript>
'set f=document.getElementById("f")
'set c=document.getElementById("c")
sub f_onkeydown()
if not isnumeric(f.value) then exit sub
c.value=(f.value-32)/1.8
end sub
sub c_onkeydown()
if not isnumeric(c.value) then exit sub
f.value=c.value*1.8+32
end sub
</script>
</body>COPY

最好不要用onpropertychange
最然很好用但是很容易造成堆栈溢出（起码hta是这么报错的）

1 评分人数

LTSC1809: 好的思路！我根本没想到！技术 + 1

你好

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

5楼

发表于 2023-6-3 21:10 | 显示全部帖子

回复 13# LTSC1809

嗯? 是你写错了吧

还有这分加的我受宠若惊
照你这样加法技术分得通货膨胀

你好

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

6楼

发表于 2023-6-3 21:15 | 显示全部帖子

本帖最后由 jyswjjgdwtdtj 于 2023-6-3 21:16 编辑

对了 hta里最好不要用vbs 硬要用（比如regexp很香 typename很香 foreach很香）事件最好这么些

 sub a
msgbox b
end sub
window.onload=getref("a")COPY

主要吧靠谱但是绝对没有js方便
js不难可以学学
难的是那些面向对象的奇诡方法比如集大成者jquery

你好

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

7楼

发表于 2023-6-3 21:18 | 显示全部帖子

回复 10# LTSC1809

谈不上好的思路吧理应如此

你好

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

8楼

发表于 2023-6-3 21:40 | 显示全部帖子

回复 18# LTSC1809

嗯……某种程度上来讲用end*确实是优点
但是像什么自增啊灵活的对象啊函数啊js还是好很多的

你好

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

9楼

发表于 2023-6-3 22:37 | 显示全部帖子

回复 20# LTSC1809

vbs是真简单

你好

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

10楼

发表于 2023-6-4 15:42 | 显示全部帖子

还有cdbl是无用的 vbs会自己隐式的调用

你好

Rank: 5 Rank: 5

帖子: 680
积分: 810
技术: 37
捐助: 0
注册时间: 2023-2-9

11楼

发表于 2023-6-4 17:10 | 显示全部帖子

回复 24# LTSC1809

cdbl在这里只有心里作用！错误的字符串cdbl也不会让它变成数字

你好