批处理之家 - Powered by Discuz! Board

标题: [问题求助] [已解决]求助VBS怎样对变量进行数字比较？ [打印本页]

作者: LTSC1809 时间: 2023-4-23 12:46 标题: [已解决]求助VBS怎样对变量进行数字比较？

本帖最后由 LTSC1809 于 2023-4-23 17:05 编辑

我做了一个用来测试vbs解释器性能的程序，打开后要求你输入运行次数，最后输出运行用时，代码如下:

dim t1,t2,a,number
number=inputbox("Type_RunNumber:")
t1=timer()
a=0
do
a=a+1
if a＞number then exit do
loop
t2=timer()
msgbox("Run_Number:"&a&"Run_Time:"&t2-t1)
复制代码

现在的问题是，运行后不管你输入多少，他都一直运行，任务管理器可以看到，占用很高，应该一直还在做加法，但是if那里number那个变量换成数字，他就能加法做到那个数字大小的时候跳出循环并输出，为什么换成变量就不行了

作者: Batcher 时间: 2023-4-23 14:15

回复 1# LTSC1809

InputBox返回的是字符串，先把它转换成数字，例如：
http://bbs.bathome.net/include/js/script56/html/vsfctint.htm
http://bbs.bathome.net/include/js/script56/html/vsfctcint.htm

作者: czjt1234 时间: 2023-4-23 15:04

number = 0 + inputbox("Type_RunNumber:")

作者: LTSC1809 时间: 2023-4-23 16:57

回复 2# Batcher 谢了，虽然那两篇文章感觉和这个没太大关联，但是inputbox返回的是字符串这个我确实没想到

作者: jyswjjgdwtdtj 时间: 2023-4-23 18:22

number=clng(inputbox("Type_RunNumber:"))
t1=timer()
a=0
do while number>a
a=a+1
loop
msgbox("Run_Number:"&a&"Run_Time:"&timer()-t1)

作者: LTSC1809 时间: 2023-4-23 19:08

回复 5# jyswjjgdwtdtj

没有声明变量感觉好别扭...我知道不声明也能运行，但是我看的新手教程是强烈建议先声明后使用

作者: jyswjjgdwtdtj 时间: 2023-4-23 19:08

回复 6# LTSC1809

好吧其实真的没用

作者: jyswjjgdwtdtj 时间: 2023-4-23 19:09

回复 6# LTSC1809

既然想保留这个好习惯不如在脚本前部加上option explicit来督促自己

作者: Batcher 时间: 2023-4-23 22:30

回复 6# LTSC1809

我支持你的观点，好习惯保持住，别被他人影响。

欢迎光临批处理之家 (http://bbs.bathome.net/)