`
Odysseus_110
  • 浏览: 120381 次
  • 性别: Icon_minigender_1
  • 来自: 武汉
社区版块
存档分类
最新评论

初学VB

    博客分类:
  • VB
阅读更多

val():转换成数值。
& 将非字符串转换成字符串。
fix(X):取整,去掉小数部分。
int(X):求不大于指定值的整数。
abs(X):求绝对值
sgn(x):判断指定值是正数负数还是零,整数1 负数 -1 零 0
sqr(x):求平方根

trim(s):删除空格
Ltrim(s)删除左端空格
Rtrim(s):删除右端空格
left(s,6): 从左端开始截取字符串6个字符串
mid(s,2,6): 从指定位置开始截取字符串
right(s,6): 从右端开始截取字符串

Len(a):长度
Space(a):插入指定的空格
UCase(a):小写转大写
LCase(a):大写转小写
Str(a): 将数值转换成字符串
instr(a,b):在a中查找字符串b 结果0没找到
Asc(a):a 的ASCII编码
RGB(0,0,255):颜色值

PictureBox: picboxname.Print 在PictureBox中输出字符串
                   picboxname.Cls 清除PictureBox中的字符串。

 

 

1. ASC(X),Chr(X):转换字符字符码

  [格式]:

  P=Asc(X) 返回字符串X的第一个字符的字符码

  P=Chr(X) 返回字符码等于X的字符

  [范例]:

  (1)P=Chr(65)

  ‘ 输出字符A,因为A的ASCII码等于65

  (2)P=Asc(“A”)

  ‘ 输出65

  2. Len(X): 计算字符串X的长度

  [格式]:

  P=Len(X)

  [说明]:

  空字符串长度为0,空格符也算一个字符,一个中文字虽然占用2 Bytes,但也算一个字符。

  [范例]:

  (1) 令X=”” (空字符串)

  Len(X) 输出结果为0

  (2) 令X=”abcd”

  Len(X) 输出结果为4

  (3) 令X=”VB教程”

  Len(X) 输出结果为4

  3. Mid(X)函数:读取字符串X中间的字符

  [格式]:

  P=Mid(X,n)

  由X的第n个字符读起,读取后面的所有字符。

  P=Mid(X,n,m)

  由X的第n个字符读起,读取后面的m个字符。

  [范例]:

  (1) X=”abcdefg”

  P=Mid(X,5)

  结果为:P=”efg”

  (2) X=”abcdefg”

  P=Mid(X,2,4)

  结果为P=”bcde”

  4. Replace: 将字符串中的某些特定字符串替换为其他字符串

  [格式]:

  P=Replace(X,S,R)

  [说明]:将字符串X中的字符串S替换为字符串R,然后返回。

  [范例]:

  X=”VB is very good”

  P=Replace(X,good,nice)

  输出结果为:P=”VB is very nice”

  5. StrReverse:反转字符串

  [格式]:

  P=StrReverse(X)

  [说明]:

  返回X参数反转后的字符串

  [范例]:

  (1)X=”abc”

  P=StrReverse(X)

  输出结果:P=”cba”

6. Ucase(X),Lcase(X):转换英文字母的大小写

  [格式]:

  P=Lcase(X)

  ‘ 将X字符串中的大写字母转换成小写

  P=Ucase(X)

  ‘ 将X字符串中的小写字母转换成大写

  [说明]:除了英文字母外,其他字符或中文字都不会受到影响。

  [范例]:

  (1) 令 X=”VB and VC”

  则Lcase(X)的结果为”vb and vc”,Ucase(X)的结果为”VB AND VC”

  7. InStr函数:寻找字符串

  [格式]:

  P=InStr(X,Y)

  从X第一个字符起找出Y出现的位置

  P=InStr(n,X,Y)

  从X第n个字符起找出Y出现的位置

  [说明]:

  (1) 若在X中找到Y,则返回值是Y第一个字符出现在X中的位置。

  (2) InStr(X,Y)相当于InStr(1,X,Y)。

  (3) 若字符串长度,或X为空字符串,或在X中找不到Y,则都返回0。

  (4) 若Y为空字符串,则返回0。

  ----------------------------------------------------------------------------------------------

  mid(字符串,从第几个开始,长度) ByRef 在[字符串]中[从第几个开始]取出[长度个字符串]

  例如 mid("小欣无敌",1,3) 则返回 "小欣无"

  instr(从第几个开始,字符串1,字符串2) ByVal 从规定的位置开始查找,返回字符串2在字符串1中的位置

  例如 instr(1,"小欣无敌","小") 则返回 1,instr(2,"小欣无敌","小"),则返回 0 。 0 表示未找到

  InStrRev(字符串1,字符串2,从第几个开始) ByVal 从规定的位置开始,从后住前查找,返回字符串2在字符串1中的位置,此处注意,虽是从后住前查找,但是返回的值还是从前往后算的。

  例如 instrRev("小欣无敌","小",2) 则返回 2 ; instrRev("小欣无敌","欣",1) 则返回 0 ,因为它从"小欣无敌"的第1个字开始往前查找,所以找不到 。0 表示未找到。  left(字符串,长度) ByVal 从[字符串]的左边开始返回[长度]个字符

  例如 Left("小欣无敌,3) 则返回 "小欣无"

  right(字符串,长度) ByVal 从[字符串]的右边开始返回[长度]个字符

  例如 Right("小欣无敌",3) 则返回 "欣无敌"

  ucase(字符串) ByVal 返回[字符串]的大写形式,只对英文字符有效

  例如 ucase("xiaoXINwuDi") 则返回 "XIAOXINWUDI"

  lcase(字符串) ByVal 返回[字符串]的小写形式,只对英文字符有效

  例如 lcase("xiaoXINwuDi") 则返回 "xiaoxinwudi"

  asc(字符) Byval返回[字符]的ascii编码,若有多个字符,则只返回首字符的ascii编码,和Chr()函数是一个可逆的过程

  例如 asc("小") 则返回 -12127 ; asc("小欣无敌") 也返回 -12127

  chr(ASCii编码) Byval 返回[Ascii]编码所代表的字符,和Chr()函数是一个可逆的过程

  例如 chr(-12127) 则返回 "小" ;chr(asc("小")) 则返回"小"(这里是为了说明asc和chr的可逆性,例用此特性可以加密文本)

  trim(字符串) Byval 返回去掉了前、后之后的[字符串]

  例如 trim(" 小 欣 无敌 ") 则返回 "小 欣 无敌" ,中间的空格不受任何影响

  string(个数,字符) Byval 返回[个数]个[字符]

  例如 string(3,"小") 则返回 "小小小" , 而 string(3,"小欣无敌") 也返回 "小",只有首字符才有效

  space(个数) Byval 返回[个数]个空格

  例如 space(5) 则返回 " "

  strconv(字符串,转换的类型) Byval 将字符串转成指定的类型。常用的类型只有两个,vbwide 半角转成全角,vbNarrow 全角转成半角

  例如 strconv("xiao",vbwide) 则返回 "XIAO",而strconv("XIAO",vbnarrow) 则返回 "XIAO"

  '备注 vbwide = 4 ,vbnarrow = 8

  len(字符串) Byval 返回[字符串]的长度

  例如 len("小欣无敌") 则返回 4

  ------------------------------------------------------------------------------------------

  Len Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数

  Trim Trim(string) 将字符串前后的空格去掉

  Ltrim Ltrim(string) 将字符串前面的空格去掉


Rtrim Rtrim(string) 将字符串后面的空格去掉

  Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串

  Left Left(string,length) 从string字符串的左边取得length长度的字符串

  Right Right(string,length) 从string字符串的右边取得length长度的字符串

  LCase LCase(string) 将string字符串里的所有大写字母转化为小写字母

  UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母

  StrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1

  InStr InStr(string1,string2[, compare]) 返回string1字符串在string2字符串中第一次出现的位置

  Split Split(string1,delimiter[, count[, start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格("")作为分隔符。

  count 返回的子字符串数目,-1 指示返回所有子字符串。

  start为 1 执行文本比较;如果为 0 或者省略执行二进制比较。

  Replace Replace(expression, find, replacewith[, compare[, count[, start]]]) 返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)

  [示例:]

  1、Len函数示例:

  下面的示例利用 Len 函数返回字符串中的字符数目:

以下是引用片段:
  Dim MyString
  MyString = Len("VBSCRIPT") 'MyString 包含 8。

  2、Trim、Ltrim、Rtrim函数示例:

  下面的示例利用 LTrim, RTrim, 和 Trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格:

以下是引用片段:
  Dim MyVar
  MyVar = LTrim(" vbscript ") 'MyVar 包含 "vbscript "。
  MyVar = RTrim(" vbscript ") 'MyVar 包含 " vbscript"。
  MyVar = Trim(" vbscript ") 'MyVar 包含"vbscript"。

  3、Mid函数示例:

  下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符:

以下是引用片段:
  Dim MyVar
  MyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar 包含 "Script"。

  4、Left函数示例:

  下面的示例利用Left 函数返回MyString 的左边三个字母:

以下是引用片段:
  Dim MyString, LeftString
  MyString = "VBSCript"
  LeftString = Left(MyString, 3) 'LeftString 包含 "VBS

  5、Right函数示例:

  下面的示例利用 Right 函数从字符串右边返回指定数目的字符:

以下是引用片段:
 Dim AnyString, MyStr
  AnyString = "Hello World" '定义字符串。
  MyStr = Right(AnyString, 1) '返回 "d"。
  MyStr = Right(AnyString, 6) ' 返回 " World"。
  MyStr = Right(AnyString, 20) ' 返回 "Hello World"。

  6、LCase函数示例:

  下面的示例利用 LCase 函数把大写字母转换为小写字母:

以下是引用片段:
  Dim MyString
  Dim LCaseString
  MyString = "VBSCript"
  LCaseString = LCase(MyString) ' LCaseString 包含 "vbscript"。

  7、 UCase函数示例:

  下面的示例利用 UCase 函数返回字符串的大写形式:

以下是引用片段:
  Dim MyWord
  MyWord = UCase("Hello World") ' 返回"HELLO WORLD"。

  8、StrComp函数示例:

  下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较;如果第三个参数为 0 或者省略执行二进制比较。

以下是引用片段:
  Dim MyStr1, MyStr2, MyComp
  MyStr1 = "ABCD": MyStr2 = "abcd" '定义变量。
  MyComp = StrComp(MyStr1, MyStr2, 1) ' 返回 0。
  MyComp = StrComp(MyStr1, MyStr2, 0) ' 返回 -1。
  MyComp = StrComp(MyStr2, MyStr1) ' 返回 1。


9、InStr示例:

  下面的示例利用 InStr 搜索字符串:

以下是引用片段:
  Dim SearchString, SearchChar, MyPos
  SearchString ="XXpXXpXXPXXP"???
  SearchChar = "P"??
  MyPos = Instr(SearchString, SearchChar)???'返回 9.

  注意:返回的不是一个字符串在另一个字符串中第一次出现的字符位置,而是字节位置。

  10、Split函数示例:

以下是引用片段:
  Dim MyString, MyArray, Msg
  MyString = "VBScriptXisXfun!"
  MyArray = Split(MyString, "x",-1,1)
  ' MyArray(0) contains "VBScript".
  ' MyArray(1) contains "is".
  ' MyArray(2) contains "fun!".
  Response.Write(MyArray(0))

  11、Replace函数示例:

  Replace("ABCD", "BC", "12") '得到A12D

  ------------------------------------------------------------------------------------------------

  1.Chr[$](数值)函数

  返回标准扩展码的对应字符。

  说明:

  (1)数值范围在0到255之间。

  (2)Chr()返回的是数值类型,而Chr$()则返回字符类型。

  (3)ANSI是ASCII码的扩充,其前128个字符都与ASCII码相同。

  例如,我们常用以下的语句加入回车换行符。Chr(13)+Chr(10)

  2.Asc("字符")函数

  此函数用来返回字符的ANSI码值。

  说明: 若输入为一字符串,则只返回第一个字符的ASCII码值。

  例如,

  x=Asc("a"),则, x=97

  x=Asc("ab"),则,x=97

  3.String[$](个数,字符)

  用于重复某一个字符。

  说明:

  (1)“个数”用来指定重复的次数。

  (2)若“字符”为一字符串,则只重复复制第一个字符。

  4.Len(字符串) 函数

  用于返回字符串的长度。

  5.Left[$](字符串,字符个数)

  用于返回“字符串”最左边的长度为“字符个数”的字符串。

  例如,

  Dim substr As String

  substr=Left("Visual Basic",3)

  则

  substr="Vis"

  6.Right[$](字符串,字符个数)

  用于返回“字符串”最右边的长度为“字符个数”的字符串。

  例如,

  Dim substr As String

  substr=Right("Visual Basic",3)

  则

  substr="sic"

  7.Mid[$](字符串,起始位置,[字符个数])

  用于返回一个子字符串。

  说明:

  (1)子字符串从“起始位置”开始,以“字符个数”为长度。

  (2)若省略“字符个数”,则从起始位置到字符串的结尾。

  8.Lcase(字符串)和Ucase(字符串)函数

Lcase:不论字符串中的字符为大写还是小写,一律输出为小写。

  Ucase:不论字符串中的字符为大写还是小写,一律输出为小写。

  9.Ltrim(字符串)、Rtrim(字符串)、Trim(字符串)函数

  Ltrim(字符串):用于去掉字符串中左边的空格。

  Rtrim(字符串):用于去掉字符串中右边的空格。

  Trim(字符串):用于去掉字符串中左右两边的空格。

  10.Str(数值)函数 和 Val(字符串) 函数

  Str(数值):用于将数字转化为字符串。

  Val(字符串):用于将字符串转化为数值。

  例如,

  Dim a As String

  Dim b As Long

  a=Str(345.45)

  b=Val("234.45")

  则

  a="345.45"

  b=234.45



转自:http://dev.yesky.com/305/7644805.shtml

 

 

(1)Load方法

它的语法结构如下:

Load [窗体名称]

使用Load方法调用的窗体被存入内存,并不显示出来,同时会产生一个Form_Load()事件。

例如:Load Form2 '将Form2窗体存入内存

(2)Show方法

它的语法结构如下:

[窗体名称].Show

Show方法用来显示被调用的窗体。Show方法兼有装入和显示两种功能,也就是说,在执行Show方法时,如果窗体不在内存中,则Show方法会自动的把窗体调入内存,然后再显示出来。

例如: Load Form2

Form2.Show '将Form2存于内存,并显示Form2窗体

(3)Hide方法

它的语法结构如下:

[窗体名称].Hide

使用Hide方法会隐藏被调用的窗体,既不在屏幕上显示,但仍在内存中(与Unload方法不同),被调用的窗体中的属性等已经处于无效的状态。

例如:

Form1.Hide

Form2.Show '将Form隐藏,并显示Form2窗体

(4)Unload方法

它的语法结构如下:

Unload [窗体名称]

使用Unload方法会清除内存中指定的窗体,与此同时,窗体中的变量和属性等都会处于无效的状态,在移去窗体的同时会产生一个Form_QueryUnload()事件。

例如:Form1.Show

Unload Form2'显示Form1窗体,从内存中移去Form2窗体。

 

转自:http://www.stuun.cn/computer/erjikaoshi/VB/118170720527003.html

 

 

分享到:
评论

相关推荐

    初学vb,vb学习,vb入门,vb教程,vb资料,很不错的vb

    Visual Basic(简称VB)是微软公司推出的一种面向对象的、基于事件驱动的编程语言,尤其适合初学者入门。...提供的“初学VB”资料应该涵盖了这些基础知识,帮助初学者快速入门,理解VB的编程思想和实际应用。

    vb高级编程教程和初学VB之跟我学习VB教程 汇总

    VB教程本教程共11章,是学习VB进介必不可少的教程初学VB之 教程程开始跟我学习VB(2) 摘要:选中程序界面上的命令按钮,然后找到属性面板,如图十一: 图十一 其中,名称:Command1是此按钮的名称,主要用于程序引用...

    用VB来做调色板,是初学VB的例案,你用后就知了,案例

    用VB来做调色板,是初学VB的例案,你用后就知了,案例用VB来做调色板,是初学VB的例案,你用后就知了,案例用VB来做调色板,是初学VB的例案,你用后就知了,案例

    初学vb电子书.chm 648KB

    初学vb电子书.chm 648KB 学习vb的朋友可以看看了吧

    字体浏览器,用VB来做,是初学VB的例案,你用后就知了,案例

    用VB来做,是初学VB的例案,你用后就知了,案例

    神童教程VB(适合初学VB者)

    总之,"神童教程VB"针对初学者提供了丰富的VB上机实验指导,帮助他们从零开始学习编程,理解VB的核心概念,提升编程能力。通过实践,不仅可以增强理论知识的理解,还能锻炼解决问题的实际能力,为后续的软件开发打下...

    100多个vb编程实例,初学vb最佳选选择

    这个“100多个vb编程实例”集合为初学者提供了丰富的学习材料,帮助他们快速掌握VB编程的核心概念和技术。 VB编程实例通常包括各种基本和高级的编程元素,如变量声明、数据类型、控制结构(如If...Then...Else、For...

    VB小游戏全集 初学VB者的摇篮

    《VB小游戏全集:初学者的编程乐园》 VB(Visual Basic)是微软公司推出的一种基于事件驱动的编程语言,以其简单易学、界面友好、功能强大等特点深受初学者喜爱。"VB小游戏全集"正是为初学者提供了一个绝佳的学习...

    适用于初学VB者的反编译软件

    学习VB过程中常需要对某些经典程序进行学习,但有时苦于没源代码而苦恼或者分不清窗口而不便,这里提供几款反编译软件,综合利用可以得出一些经典程序额窗体和代码(有错误,但结构清晰),希望能帮助大家学习 ...

    VB制作电子书源码-----可供初学VB者参考

    《VB制作电子书源码——初学者的编程实践指南》 VB(Visual Basic)是一种由微软公司开发的事件驱动编程语言,它以其易学性和强大的功能深受初学者和专业开发者的喜爱。本压缩包提供的“VB制作电子书源码”为初学者...

    vb命令集.chm 初学vb者福音

    vb的命令集 下载的网页文件 本人利用软件编译为chm文件 方便初学者浏览学习

    vb初学电子书,适合vb初学者学习

    本压缩包提供的“初学vb电子书.chm”是一个专门为VB初学者设计的学习资料,旨在帮助初学者快速掌握VB的基本概念和编程技巧。 电子书首先会介绍VB的基础知识,包括VB的开发环境、界面设计、基本语法结构等。在VB的...

    初学VB神器、员工管理增、删、改、查询、access数据库丶导出Excel、打印报表、图片导入显示、皮肤控件显示、mshf控件颜色渐变、和登陆权限认证等功能

    对于初学者来说,VB提供了一个易于上手的环境,通过拖拽控件和编写简单代码就能实现各种功能。 【Access数据库应用】 Access是微软Office套件中的数据库管理系统,它支持结构化查询语言(SQL),方便数据的存储和...

    初学vb电子书(里面配有图像)

    Visual Basic,简称VB,是当今世界上应用最广泛的编程语言之一,它也被公认为是编程效率最高的一种编程方法。无论是开发功能强大、性能可靠的商务软件,还是编写能处理实际问题的实用小程序,VB都是最快速、最简便的...

    初学vb 编个浏览器 (含源码)

    查找 全屏 禁止弹出广告页 还没完成 清除漂浮广告功能也不强 主要是学习控件 函数等 高手给点意见 截图:http://www.chinadforce.com/attachments/day_090113/20090113_de974e6c29d7f5fa4bb0e7FfBhXKwCD0.jpg ...

    VB电子书合集(VB精华文摘 VB基础教程)

    "初学vb电子书.chm"很可能是针对VB初学者设计的教程,CHM格式是一种帮助文件格式,通常包含了丰富的文字、图片和代码示例,用于指导用户从零开始学习VB的基本语法、控件使用、事件处理以及窗体设计等基础知识。...

    抽奖器VB源码(适合初学者)

    1.软件功能并不完善,...该软件系作者大一初学VB时的练笔制作,因当时没有语言基础,加之作者并非出自计算机相关专业(机械设计),且后来一直无暇修改,故有程序不合理之问题,请见谅,也可邮件交流。 QQ:853366735

    2~10进制转换器,适合初学VB的同志们

    自制的进制转换,能够在2~10进制内任意转换,加入了许多人性化的操作。

    VB6.0 数据库开发完整实例

    一个非常棒的VB数据库开发学习的完整实例,对初学VB数据库的新手来说是如获至宝。运行程序前,先把Data下面的数据库放到位于SQL Server安装目录\MSSQL.1\MSSQL\Data下,然后在SQL Server里面的“数据库”上右键选中...

    VB.NET 计算器增强版

    初学VB.net 上次发了一个VB.net 2008 做的计算器,这回对上次那个计算器进行了升级,增加了许多功能(有些功能其实对于计算器来说没有必要,但我只是为了学习VB.net,所以把常用的控件几乎都在这个计算器实现了一下!...

Global site tag (gtag.js) - Google Analytics