初次接触VB分享一下学习中的笔记

LBound（arr）
获取数组arr的最小下标




UBound (arr) 
获取数组arr的最大下标




Jion（arr，"-"）


把数组arr转化为字符串，原数组的每个成员用字符“-”隔开


ReDim arr(length) 
为不定长数组指定长度，其中length为指定的长度，且可变




Tab[(n)] 
其功能是在指定的第n个位置上输出数据




chr()
函数是将一个ASCII码转为相应的字符，如果是其他进制则先转化


为对应十进制数值，该十进制数值被默认为ASCII值，并输出该


ASCII对应的字符。与它对应的函数是


ASC（）
函数，将一个字符转为相应的ASCII码


picture1.line  
是指一个点到另一个点的连线（必有起始端和终点端）


picture1.pset  
  是指在图形框中描出这个点（必只有一个点），如果有很多点则点


与点之间无连接




Len（str）
获取str的长度
 
Ucase（ch）
把ch转为大写 Lcase（ch）把ch转化为小写



Char ch = Mid（str，i，1）
把str字符串中第i起长度为1的字符赋值给




option base
在模块级别中使用，用来声明数组下标的缺省下界 


option base
后面只能是0或者1 


beep
让操作系统发出声音，声音一般是预设声音


mid函数
返回Variant类型
Mid$
函数返回String类型其它方面似乎无差异处理字符串Mid$应该比


Mid快


str(x)
正数返回的第一个有个空格，负数时没空格   


cstr(x)
没有空格


 s1 = RTrim(Text2.Text)
'将Text2的内容去除右侧空格后赋值给变量s1, RTrim函数作用是


返回去掉右侧空格(如果有的话)的字符串由于默认是0 所以是0的


时候可以不用option base语句 只有当你想Option Base 语句来取


代数组下标的缺省值 0时才有必要用option base 1而且只能


是option base 1而不能是 2 3 4。。。 但是这个语句不能限定TO


语句，举个例子吧： 
option base 1 
dim a(3),b(0 to 3) 
a(3)的下界就是1 而b(0 to 3)的下界是0


Option Explicit 
语句在模块级别中使用，强制显式声明模块中的所有变量。


在定义自定义过程时，如果不显示的给出访问权限，系统会默认为


Public屏幕的长宽就是屏幕的分辨率，用下面的代码实现，每句后


面已添加注释
 Dim x As Integer, y As Integer '定义2个整数型变量
 x = Screen.Width / Screen.TwipsPerPixelX '获取屏幕宽度
 y = Screen.Height 


'获取屏幕高度
上面是vb的语法
下面是Vb.Net的语法：
        Dim x, y As Long '定义2个整数型变量
        x = Screen.PrimaryScreen.Bounds.Width.ToString  '获取屏幕宽度
        y = Screen.PrimaryScreen.Bounds.Height.ToString  '获取屏幕高度


 lng_S = InStr(mstrCode, " Sample:")
返回Sample首次在mstrCode出现的下标
Int_num = Val("&H001E")
可以直接把十六进制转化为十进制的值（H001E = 十进制的30 ）