vbs学习，书籍，看书笔记(1)

vbs书籍百度云下载链接：
链接：https://pan.baidu.com/s/1lTzaOTfwA7hV0nSQqGyiSw
提取码：lkwe

1.inputbox注意点
2.do loop while
3.mid，len函数使用
4.注意代码的模块化(modularization)
5.function如何返回值
6.自顶向下模型和事件驱动模型
7.匈牙利变量命名法和行连续符
8.vbscript说明
9.vbs运行时的优缺点
10.ASP初识
11.数据类型
12.子类型的检查和数据转换
13.关于日期的格式
14.关于is的用法及函数
15.显式隐式转换类型
16.empty 与 null

1.inputbox注意点

如果什么都没有输入点确定，也是有返回的，返回的是空值，与点击取消相同
输入之后点确定，返回对应值到变量里

小例子：

dim name
dim info
name = inputbox("请输入你的名字：")
if name ="" then	'根据你是否输入信息，来制定不同的回复方案
	info = "好吧，你不想告诉我你的名字" '存到info变量中
else
	info = "欢迎您" &name     '可以用缩进让代码更清晰
end if
msgbox  info						'打印输出info中的值

————————————————————————————————————————
2.do loop while 相关
格式：
do
falg = false
loop while flag = true //flag = true为终止条件
————————————————————————————————————————
3.mid，len函数使用

dim count,name,input
input = inputbox("输入一段话：")
count = len(input)       'len用来统计字符串的个数
for i=1 to count 
	msgbox mid(input,i,1)  		 'mid函数是从i位置截取1个
	name = name & mid(input,i,1) '拼接打印出的字符 
next
msgbox name

————————————————————————————————————————
4.注意代码的模块化(modularization)
模块化：将代码组织成模块
黑盒：有简单且定义明确功能的接口并能执行某些功能的设备，如msgbox，inputbox
子过程：是没有返回值的过程
————————————————————————————————————————

5.function如何返回值

dim info
function  Name
	info = inputbox("输入您要输入的信息：")
	Name = info        '让此函数名字得到info，就相当于返回值
end function
msgbox Name            '调用函数，从而输出返回值

————————————————————————————————————————

6.自顶向下模型和事件驱动模型
自顶向下：从上往下执行代码
事件驱动：在某个特定事件发生时才使用，如word，excel，经常用于web编程中
例子：

<html>
<head>
<title>Simple VBScript Example</title>    '这里是标题
<script language = "vbscript">		  
	sub buttonclicked                 '函数
		window.alert ("you clicked on the button!")
	on sub
</script>
</head>								  '标题部分结束
<body>								  '主题部分
	<button name = "Button1" type="BUTTON" onclick="buttonclicked">   '按钮部分
	Click Me If you can !!!
	</button>
</body>
</html>

————————————————————————————————————————

7.匈牙利变量命名法和行连续符
匈牙利变量命名法：要求给变量一个前缀说明变量的作用域和数据类型
行连续符：_ 用于一段句子太长分为两行来写

————————————————————————————————————————
8.vbscript说明
vbscript：一种强大的解释型的脚本语言，包括用于客户端和服务端，是visual basic 的子集
程序设计语言的最终产物通常是经过编译的二进制可执行程序
在这里插入图片描述
windos脚本版本及应用平台：

vbs和vba 都属于vb中的子集，都需要一个宿主应用程序
宿主就是一个能编译，解释vbs语言的应用程序
windos脚本宿主：(windows script host,WSH),可以在windos操作系统中运行vbs
————————————————————————————————————————
9.vbs运行时的优缺点
缺点：

运行速度降低
容易查看到代码，并且修改，并不像别的语言那样，编译过后为二进制
不像别的语言一样在编译时或写时出现错误，vbs只有在运行时才会提示错误

优点：

能嵌入到别的语言中如HTML,XHTML,XML,其他脚本语言
脚本无需复杂的IDE，更容易学习
不仅可以在客户端运行，还可以在服务端运行

————————————————————————————————————————
10.ASP初识

ASP：是一种服务器端脚本编写环境,它以VBScript或JScript作为脚本语言,可以用来创建包含HTML标记、文本和脚本命令的动态网页,称为ASP动态网页,其文件扩展名是.asp。

————————————————————————————————————————
11.数据类型
通用数据类型：Variant
脚本语言分弱型脚本语言和强型脚本语言
弱型：无需声明变量的数据类型——vbs也属于弱型,如：dim a 相当于将a定义成Variant——通用数据类型
强型：在对于定义数据类型上很严格——visual basic 属于强型，如：dim a as currency——定义成对应金额类型

————————————————————————————————————————
12.子类型的检查和数据转换
TypeName()：返回文本形式
VarType()：返回数字形式

dim a
a = 123
dim str
str = "123"
msgbox a & "的类型为" & VarType(a)       
msgbox str & "的类型为" & TypeName(str) 
'判断 if vartype(str) = vbstring  或者 = 8  用于判断是否为对应类型

————————————————————————————————————————
13.关于日期的格式

dim vart,vart1
vart = #5/16/2020 12:30PM#   '用##来包括也属于，如果只是""那么就不会识别为date而是string
msgbox vart & "的类型为:" & typename(vart)   
vart1 = cdate("5/16/2020 12:30PM")
msgbox vart1 & "的类型为:" & typename(vart1)	'这两个都是date类型

————————————————————————————————————————

14.关于is的用法及函数
isnumeric(),isdate()

dim age
age = inputbox("请输入您的年龄：")
msgbox "初始age输入的类型为：" & typename(age)  '初始为string类型
if IsNumeric(age) then						   '您输入的是数字，采用isnumeric判断还是成功的
	age = clng(age) 
	age = age + 50 
	msgbox "50年后年龄为：" & age
else
	msgbox "您输入的值不符"
end if

'if isnumeric(age) = true  同等与 if isnumeric(age)
'if not isnumeric(age)     同等与 if isnumeric(age) = false

————————————————————————————————————————
15.显式隐式转换类型
显式：人为转换数据类型，如clng(age)
隐式：计算机自己转换数据类型，如inputbox 传给一个变量，首先电脑会自己定义其为string类型
当输入的数据超过int上限时，计算机会自动帮你转换数据类型到long

————————————————————————————————————————
16.empty 与 null

**Empty：相当于未初始化的类型——隐式的

dim age
msgbox "age未初始化的类型为：" & typename(age) '会返回empty类型，意思就是为初始话数据

如果你想让一个值变为未初始化的那么就可以这样表示：age = Empty
测试：此时判断可以这样：

if isEmpty(age) 或者 if age = Empty

**Null：表示变量中没有合适的值，常用于数据库中没有值

并且想要得到null数据类型之有手动赋类型给它：age = Null ——显式的
测试：

不能用=来测试，只能用isNull()函数来测试
如果用=号会一直得到false的结果

导航