下载

1下载券

加入VIP
  • 专属下载特权
  • 现金文档折扣购买
  • VIP免费专区
  • 千万文档免费下载

上传资料

关闭

关闭

关闭

封号提示

内容

首页 [vb基础教程]VB语言基础

[vb基础教程]VB语言基础.doc

[vb基础教程]VB语言基础

wang丹王
2017-09-30 0人阅读 举报 0 0 暂无简介

简介:本文档为《[vb基础教程]VB语言基础doc》,可适用于活动策划领域

vb基础教程VB语言基础vb基础教程VB语言基础篇一:VB语言基础VB语言基础一、数据类型、数值型:取值范围:Byte占字节,无符号Integer占字节,long占字节,single占字节略Double占字节略Currency占字节小数点左位右位、逻辑型:Boolean占字节true或false、字符串型:Stringaa定长型占字符串长度变长型再加、日期型:Date占字节,、对象型:Object占字节任何Object引用、变体型:Variant变体型数字占字节变体型字符占字节字符串长注:此类型还包含三种特定值:EmptyError、用户定义的数据类型:用户可以利用Type语句定义自己的数据类型。,格式如下Type数据类型名数据类型元素名As类型名……EndType用Type可定义类似于C语言中的结构体类型。是构成VB工程的一部分是包含数据和过程的集合。定义模块层变量只需在模块的通用部分加入DimPrivateGlobal或Public等声明语句即可。用Dim和Private声明的模块层变量作用域为所在模块范围而用Public和Global定义的模块层变量则可以全局使用。扩展:vb语言vb语言入门vb语言基础教程注:全局变量必须用Public或Global声明不能用Dim三(常量常量是一个有意义的名字用来表示程序运行时不变的数值和字符串。VisualBasic中的常量分为文字常量和符号常量两种文字常量又可分为数字常量和字符串常量。符号常量:在程序中程序员用Const声明的常量。使用常量时应注意:用Const声明的常量在程序运行过程中是不能被重新赋值的。在常量声明的同时赋值。可以为声明的常量指定数据类型如ConstconValAsCurrency=缺省时为所赋值的类型。在用常量为常量初始化时注意不可有循环引用。例如:模块中:Publicconstcon=con……模块中:PublicConstcon=con*……四(数组(数组的定义:必须用Global或Dim语句定义。Dim语句的语法格式如下:Dim数组名Astype在这里每对lower和upper为数组的一维lower是该维下标的下限upper是该维下标的上限如不标明lower其默认值为。Upper不可省略。例如:一维数组的定义:DimRecordAsInteger定义了一个有六个数据元素的整型数组二维数组的定义reeView控件只能使用一个ImageList。这意味着当TreeView控件的Style属性被设置成显示图像的样式时TreeView控件中每一项的旁边都有一个同样大小的图像。(多媒体控件(多媒体控件MultimediaMCI控件管理媒体控制接口设备上的多媒体文件的记录与回放。从概念上说这种控件就是一组按钮它被用来向诸如声卡、MIDI序列发生器、CDROM驱动器、视频CD播放器和视频磁带记录器及播放器等设备发出MCI命令。MCI控件还支持Windows视频文件的回放。在允许用户从MultimediaMCI控件选取按钮之前应用程序必须先将MCI控件上启用适当的按钮。在VisualBasicMCI设备打开并在Multimedia中应将MCIOpen命令放到FormLoad事件中。(媒体播放器控件可以播放各种多媒体文件主要属性有:filename可以在属性窗口中设置也可以用代码实现。AutoStart默认是True。AutoRewind默认是False。PlayCount默认是。(图象列表和图象组合框(图象列表ImageList控件是包含ListImage对象的集合该集合中的每个对象都可以通过其索引或关键字被引用。)ImageList控件不能独立使用只是作为一个便于向其它控件提供图象的资料中心。ImageList控件的作用象图像的储藏室同时它需要第二个控件显示所储存的图像。第二个控件可以是任何能显示图像Picture对象的控件也可以是特别设计的、用于绑定ImageList控件的Windows通用控件之一。这些控件包括ListView、ToolBar、TabStrip、Header、ImageCombo、和TreeView控件。为了与这些控件一同使用ImageList必须通过一个适当的属性将特定的ImageList控件绑定到第二个控件。对于ListView控件必须设置其Icons和SmallIcons属性为ImageList控件。,)对于TreeView、TabStrip、ImageCombo、和Toolbar控件必须设置ImageList属性为ImageList控件。一旦ImageList与某个Windows通用控件相关联就可以在过程中用Index属性或Key属性的值来引用ListImage对象。当与Windows通用控件一起使用ImageList控件时在将它绑定到第二个控件之前按照希望的顺序将全部需要的图像插入到ImageList。一旦ImageList被绑定到第二个控件就不能再删除图像了并且也不能将图像插入到ListImages集合中间。但是可以在集合的末尾添加图像。(图象组合框ImageCombo控件是标准Windows组合框的允许绘图版本。控件列表部分中的每一项都可以有一幅指定的图片。它可以显示一个包含图片的项目列表每一项可以有自己的图片也可以对多个列表项使用相同的图片。除了支持图片之外ImageCombo还提供了一个对象和基于集合的列表控件。控件列表部分的每一项是一个不同的ComboItem对象而且列表中的所有项组合起来构成ComboItems集合。这就使它容易一项一项地指定诸如标记文本、ToolTip文本、关键字值以及缩进等级等属性。(通用对话框控件Windows应用程序里的Open对话框SaveAs对话框在各个应用程序里看起来都是一样的通用对话框控件就可以提供这些对话框的标准功能。(Open对话框及SaveAs对话框打开Open对话框使用ShowOpen方法打开SaveAs对话框使用ShowSave方法。PrivateSubmnuOpenClickOnErrorGoToErrorHandlerCommonDialogCancelError=TrueCommonDialogFilter=“TextFiles|*txt|BatchFiles|*bat|AllFiles|**”CommonDialogShowOpen„显示打开对话框CallOpenFileErrorHandler:ExitSubEndSub其中第三行决定了在文件格式类型栏里出现的文件类型。第五行需要一个自己的打开文件的过程这个过程需要的参数就是通用对话框返回的文件名。通用对话框的CancelError属性设为True的话用户单击Cancel按钮将产生一个错误信息程序凭借这个信息程序可以检测到用户的放弃操作。,,(Color对话框下面的过程可用用户选择的颜色作为窗体的底色。PrivateSubmnuColorClickOnErrorGoToCancelButtonCommonDialogCancelError=TrueCommonDialogShowColorFormBackColor=CommonDialogColorCancelButton:ExitSubEndSub(Fonts对话框下面的过程可用字体对话框改变文本框的字体:PrivateSubmnuFontsClickOnErrorGoToCancelButtonCommonDialogCancelError=TrueCommonDialogFlags=cdlCFBoth„FlagspropertymustbesettocdlCFBothCommonDialogShowFont„DisplayFontcommondialogboxTextFontName=CommonDialogFontNameTextFontSize=CommonDialogFontSizeTextFontBold=CommonDialogFontBoldTextFontItalic=CommonDialogFontItalicTextFontUnderline=CommonDialogFontUnderlineTextFontStrikethru=CommonDialogFontStrikethruTextForeColor=CommonDialogColorCancelButton:ExitSubEndSub代码的第三行出现了通用对话框的Flags属性决定了通用对话框的一些可选项不过即使不赋值给Flags代码也一样会按缺省的情况去执行的。篇三:VB编程基础教程篇四:vb基础实例教程VB教程第二章:控件学习第一节Label控件在第一章我们已经知道任何一个VB程序都是由操作界面及与之相应的程序代码组成而操作界面则是由诸如“命令按钮控件”、“标签控件”等控件以及窗体共同组成。从本章开始我们进入控件的学习过程。Label是图形控件主要作用在于显示文字信息如大家比较熟悉的程序安装界面:在某个软件安装过程中常常会显示一些帮助信息或与产品相关的介绍信息而这些大多是用标签控件制成的。与以后我们要学到的文本框控件不同的是标签控件显示的文字不能直接进行修改要修改的话只能在设计阶段进行文本框既可以用来显示文本还能够在文本框中输入文本。在VisualBasic工具箱中标签控件的图标如图一所示。标签的默认名称和标题为LabelX规范的命名方式为:LblX图一一、标签控件的主要属性:、Caption属性:此属性用来设置在标签上显示的文本信息可以在创建界面时设置也可以在程序中改变文本信息如第一章的例子中通过点击按钮改变标签显示的字样。如果要在程序中修改标题属性代码规则如下:标签名称Caption=“欲显示的文本”如第一章在程序中改变标签LblShow的Caption属性:LblShowCaption=“跟我来学VB神童教程”但是请大家注意上面的代码应该写入供触发的控件对应的程序代码区如第一章中是在命令按钮的程序代码区输入的代码而不是标签本身的代码区哟。这也是初学者常常大惑不解的地方为什么我要让标签改变字样却要在其他控件中输入代码,这是因为我们是通过触发其他控件这个事件来让标签改变Caption属性的。当然你也可以让标签本身来触发Caption属性改变事件如用鼠标点击标签这时你就需要在标签对应的程序代码区输入代码了但在实际编写中这种情况非常罕见。毕竟标签控件用于显示信息的本意远远超过了响应鼠标点击的意图。、BorderStyle属性:本属性用来设置标签的边框类型有两种值可选:代表标签无边框代表标签有边框并且具有三维效果如图二显示的两个标签:图二BorderStyle属性可以在设计界面时指定如图三:图三也可以在程序中改变程序代码规则:标签名BorderStyle=习题一:创建一个标签、两个按钮点按CmdChange标签有边框点按CmdChange标签无边框。联想:在完成本题后你可能会想到有没有办法用一个按钮来完成本题的功能,即鼠标点击一下标签有边框再点一下标签边框消除再点一下边框又出现以此类推。回答是肯定的不过这是在以后的学习中要讲的。读者答案PrivateSubCommandClickLabelBorderStyle=EndSubPrivateSubCommandClickLabelBorderStyle=EndSub、Font属性:本属性用来设置标签显示的字体既可以在创建界面时设定也可以在程序中改变。在创建界面时设定如图四:图四在图四的设置界面中除了可以选择字体还可以设置显示文字是否为粗体、斜体、下划线等。在程序中改变Font属性程序代码书写规则如下:字体改变:标签名FontName=“字体类型”其中“字体类型”可以是中文如“宋体”、“隶书”也可以是英文名如“Arial”、“TimesNewRoman”等等不过这些字体名称必须是电脑上有的。字体大小改变:标签名FontSize=X其中X是阿拉伯数字代表字体是几号字。如:LblShowFontSize=。粗体、斜体、下划线、删除线属性的设置值是代表真假的逻辑判断值TrueFalse如下:LblShowFontBold=TrueFalseLblShowFontItalic=TrueFalse习题二:一个标签用于显示文本按钮可以让标签显示的字体变成隶书按钮可以让标签显示的字体变成号字按钮可以让字体变成粗体。读者答案PrivateSubCommandClickLabelBorderStyle=EndSubPrivateSubCommandClickLabelBorderStyle=EndSubPrivateSubcmdClickLabelFontName=“隶书”EndSubPrivateSubcmdClickLabelFontSize=EndSubPrivateSubcmdClickLabelFontBold=TrueEndSub、Alignment属性:此属性用来设置标签上显示的文本的对齐方式分别是:左对齐右对齐居中显示。可以在界面设置时设定如图五:图五也可以在程序中改变代码如下:标签名Alignment=、Visible属性:本属性在大多数控件中都有它能设定该控件是否可见。当值为True控件可见当值为False控件隐藏。控件的可见属性可以在界面设置时设定如图六:图六也可以在程序中改变代码如下:标签名Visible=TrueFalse习题三:一个标签在界面设置时为可见按钮能够让标签隐藏按钮能够让标签显现。篇五:vb基础实例教程VB教程第二章:控件学习第一节Label控件在第一章我们已经知道任何一个VB程序都是由操作界面及与之相应的程序代码组成而操作界面则是由诸如“命令按钮控件”、“标签控件”等控件以及窗体共同组成。,从本章开始我们进入控件的学习过程。Label是图形控件主要作用在于显示文字信息如大家比较熟悉的程序安装界面:在某个软件安装过程中常常会显示一些帮助信息或与产品相关的介绍信息而这些大多是用标签控件制成的。与以后我们要学到的文本框控件不同的是标签控件显示的文字不能直接进行修改要修改的话只能在设计阶段进行文本框既可以用来显示文本还能够在文本框中输入文本。在VisualBasic工具箱中标签控件的图标如图一所示。标签的默认名称和标题为LabelX规范的命名方式为:LblX图一一、标签控件的主要属性:、Caption属性:此属性用来设置在标签上显示的文本信息可以在创建界面时设置也可以在程序中改变文本信息如第一章的例子中通过点击按钮改变标签显示的字样。如果要在程序中修改标题属性代码规则如下:标签名称Caption=“欲显示的文本”如第一章在程序中改变标签LblShow的Caption属性:LblShowCaption=“跟我来学VB神童教程”但是请大家注意上面的代码应该写入供触发的控件对应的程序代码区如第一章中是在命令按钮的程序代码区输入的代码而不是标签本身的代码区哟。属性:本属性用来设置标签的边框类型有两种值可选:代表标签无边框代表标签有边框并且具有三维效果如图二显示的两个标签:图二BorderStyle属性可以在设计界面时指定如图三:图三也可以在程序中改变程序代码规则:标签名BorderStyle=习题一:创建一个标签、两个按钮点按CmdChange标签有边框点按CmdChange标签无边框。联想:在完成本题后你可能会想到有没有办法用一个按钮来完成本题的功能,即鼠标点击一下标签有边框再点一下标签边框消除再点一下边框又出现以此类推。回答是肯定的不过这是在以后的学习中要讲的。读者答案PrivateSubCommandClickLabelBorderStyle=EndSubPrivateSubCommandClickLabelBorderStyle=EndSub、Font属性:本属性用来设置标签显示的字体既可以在创建界面时设定也可以在程序中改变。LabelBorderStyle=EndSubPrivateSubCommandClickLabelBorderStyle=EndSubPrivateSubcmdClickLabelFontName=“隶书”EndSubPrivateSubcmdClickLabelFontSize=EndSubPrivateSubcmdClickLabelFontBold=TrueEndSub、Alignment属性:此属性用来设置标签上显示的文本的对齐方式分别是:左对齐右对齐居中显示。属性:本属性在大多数控件中都有它能设定该控件是否可见。当值为True控件可见当值为False控件隐藏。控件的可见属性可以在界面设置时设定如图六:图六也可以在程序中改变代码如下:标签名Visible=TrueFalse习题三:一个标签在界面设置时为可见按钮能够让标签隐藏按钮能够让标签显现。读者答案PrivateSubcmdClickLabelVisible=FalseEndSubPrivateSubcmdClickLabelVisible=TrueEndSub二、标签控件的主要事件:所谓的事件其实就是用户对应用程序的操作如第一章中用鼠标点击命令按钮触发的Click事件。)事件的作用在于触发程序的执行如第一章中的Click事件改变了标签控件的Caption属性。标签控件的主要作用在于显示文本信息但也支持一些为数不多的事件。、Click事件:用鼠标点击标签时触发的事件如改变标签的字体属性:PrivateSubLblShowClickLblShowFontName=“隶书”EndSub、DbClick事件:鼠标双击引发的事件如改变标签的可见性:PrivateSubLblShowDbClickLblShowVisible=FalseEndSub三、知识点:、用VB编写程序犹如搭积木把每块“积木”放在合理的位置然后以某种机制将这些“积木”们运用起来最后就搭成了我们需要的东西。LblShowCaption=“跟我来学VB神童教程”EndSubPrivateSubCmdShowClick代表一个过程共由两部分组成CmdShow代表CmdShow这个按钮Click代表这个按钮的触发事件。以此类推PrivateSubLblShowDbClick也代表一个过程LblShow是个标签DbClick是双击事件。另外Private意为“私有”表明这个事件过程的类型此外还有Public即“公有”事件。Sub表明这个过程是“子程序”若干个“子程序”共同组成最终的应用程序。里面是用来装参数的关于参数我们以后讲述如果没有参数里面为空。四、答案区:第一题:第一个按钮的点击事件:PrivateSubCmdChangeClickLblShowBorderStyle=EndSub第二个按钮的点击事件:PrivateSubCmdChangeClickLblShowBorderStyle=EndSub第二题:按钮:PrivateSubCmdClickLblShowFontName=“隶书”EndSub按钮:PrivateSubCmdClickLblShowFontSize=EndSub按钮:PrivateSubCmdClickLblShowFontBold=TrueEndSub第三题:按钮:PrivateSubCmdClickLblShowVisible=FalseEndSub按钮:PrivateSubCmdClickLblShowVisible=TrueEndSub第二节TextBox控件在VisualBasic操作界面中TextBox控件所代表的图标如图一:图一TextBox控件主要用来显示文本或用来输入文本如Windows登陆时的“口令”窗口或者记事本的整个编辑区域。,)双击工具箱中的文本框控件或者单击文本控件然后用鼠标在VB的工作区域拖拉就可以创建文本框了。如图二:图二文本框控件的默认名称为TextX命名规则为TxtX一、文本框控件的主要属性:、Text属性:本控件最重要的属性用来显示文本框中的文本内容可以在界面设置时指定如图三:图三也可以在程序中动态修改程序代码规则:文本框控件名Text=“欲显示的文本内容”如要在一个名为TxtFont的文本框控件中显示“隶书”字样那么输入代码:TxtFontText=“隶书”习题一:创建一个文本框用来显示文本按钮一点击时文本框内容变为“跟我来学VB神童教程”按钮二点击时文本框内容清空。,)PrivateSubcmdClickTextText=“跟我来学vb神童教程”EndSubPrivateSubcmdClickTextText=““EndSub、SelText属性:本属性返回或设置当前所选文本的字符串如果没有选中的字符那么返回值为空字符串即”“。请注意本属性的结果是个返回值或为空或为选中的文本。一般来说选中文本属性跟文件复制、剪切等剪贴板操作有关如要将文本框选中的文本拷贝到剪贴板上:ClipboardSetText文本框名称SelText要将剪贴板上的文本粘贴到文本框内:文本框名称SelText=ClipboardGetText例:一个文本框按钮一用于复制文本框中的选中文本按钮二用于将剪贴板上的内容粘贴到文本框内。按钮一:PrivateSubCmdCopyClickClipboardSetTextTxtContentSelTextEndSub按钮二:PrivateSubCmdPasteClickTxtContentSelText=ClipboardGetTextEndSub、SelStart与SelLength属性:SelStart选中文本的起始位置返回的是选中文本的第一个字符的位置。,SelLength选中文本的长度返回的是选中文本的字符串个数。例如:文本框TxtContent中有内容如下:跟我一起学习VB神童教程假设选中“一起学习”四个字那么SelStart为SelLength为。、MaxLength属性:本属性限制了文本框中可以输入字符个数的最大限度默认为表示在文本框所能容纳的字符数之内没有限制文本框所能容纳的字符个数是K如果超过这个范围则应该用其他控件来代替文本框控件。这跟Windows中用记事本打开文件一样当文件过大系统会自动调用写字板来打开文件而不是用记事本。文本框控件MaxLength属性既可以在界面设置过程中予以指定如图四:图四也可以在设计时予以改变代码如下:文本框控件名Maxlength=X。、MultiLine属性:本属性决定了文本框是否可以显示或输入多行文本当值为True文本框可以容纳多行文本当值为False文本框则只能容纳单行文本。本属性只能在界面设置时指定程序运行时不能加以改变。LabelCaption=TextTextEndSub。、ScrollBars属性:本属性可以设置文本框是否有滚动条。)当值为文本框无滚动条值为只有横向滚动条值为只有纵向滚动条值为文本框的横竖滚动条都具有。如图七:图七、Locked属性:当值为False文本框中的内容可以编辑当值为True文本框中的内容不能编辑只能查看或进行滚动操作。二、文本框控件的事件:除了Click、DbClick这些不常用的事件外与文本框相关的主要事件是Change、GotFocus、LostFocus事件。、Change事件:当用户向文本框中输入新内容或当程序把文本框控件的Text属性设置为新值时触发Change事件。、GotFocus事件:本事件又名“获得焦点事件”。所谓获得焦点其实就是指处于活动状态。在电脑日常操作中我们常常用AltTab键在各个程序中切换处于活动中的程序获得了焦点不处于活动的程序则失去了焦点。、LostFocus事件:失去焦点详情如上。例子:一个文本框默认状态下内容为空当获得焦点时文本框内容显示“大家好课程还难吗”字样当失去焦点文本框回到初始状态。另外再创建一个标签当用户试图向文本框输入文本或改变文本框本来的文本时标签显示“标签的作用大家还清楚吗”字样。界面如图八:图八程序如下:文本框:PrivateSubTxtContentGotFocusTxtContentText=“大家好课程还难吗”EndSubPrivateSubTxtContentLostFocusTxtContentText=““EndSubPrivateSubTxtContentChangeLblShowCaption=“标签的作用大家还清楚吗”EndSub三、知识点:、请记住Clipboard指的是Windows剪贴板剪贴板最常用的操作是所选文本的拷贝与粘贴。TxtContentText=“跟我来学VB神童教程”EndSub按钮二:PrivateSubCmdClickTxtContentText=““EndSub习题二:按钮:PrivateSubCmdShowClickLblShowCaption=TxtPasswordTextEndSub第三节在前面两节里我们学到了VB的操作方法以及Label与TextBox控件的使用方法现在我们用这两节学到的知识来做一个简单的文本编辑器。,)一、程序最终目的:用户可以在程序的编辑窗口输入文本对输入的文本可以进行复制、粘贴、清除操作另外还能在两个标签上分别显示选中文本的起始位置、选中文本的长度。二、界面设置:根据程序的要求我们需要制作一个文本框控件它将做为程序的输入窗口另外还有四个按钮分别是复制按钮、粘贴按钮、清除按钮、退出程序按钮此外还需要两个用来显示所选文本起始位置的标签一和显示所选文本长度的标签二。最终界面如图一:图一请大家仿照图一制作。、统一尺寸:以某个控件为参照物统一其他控件的大小尺寸。、水平间距与垂直间距:调整某几个控件的水平间距或垂直间距。活用上面几个操作将使你的工作事半功倍~在VisualBasic操作界面中CommandButton控件所代表的图标如图一:图一CommandButton控件在程序中主要作为按钮进行使用。默认的名称为CommandX命名规则为CmdX。一、CommandButton的主要属性:、Cancel属性:当一个按钮的Cancel属性设置为True时按ESC键与单击此命令按钮的作用相同因此这个命令按钮被称为取消按钮。在一个窗体中只允许一个命令按钮的Cancel属性为True。如图二:图二、Default属性:当一个按钮的Default属性设置为True时按回车键与单击此命令按钮的作用相同因此这个命令按钮被称为默认按钮。与Cancel的设置一样在一个窗体中只允许一个命令按钮的Default属性设置为True如图三:图四、Enabled属性:本属性决定了控件是否可用的问题。,)当值为False按钮在程序运行时呈灰色不能响应用户的鼠标动作只有当值为True按钮才能使用。本属性可以在设置界面时予以指定如图五:图五也可以在程序中修改代码如下:按钮控件名称Enabled=TrueFalse例一:两个命令按钮按钮一初始状态为可用按钮二初始状态不可用。与Picture属性:也许你想让应用程序的操作界面更美观一点也许你想在某个按钮上添加幅小图片那么你就得使用到本控件的Style与Picture属性。铵钮控件共有两种Style一种是标准型VB中用VbButtonStandard或者表示另外一种是图形型VB中用VbButtonGraphical或者表示。Style属性可以在界面设置过程中予以指定如图七:图七也可以在程序中改变代码如下:按钮名称Style=VbButtonStandardVbButtonGraphical或者:按钮名称Style=只有当按钮的Style设置为Graphical类型时按钮的Picture属性才起作用。本属性能在指定的按钮上添加图片。可以在界面设置过程中为按钮指定图片如图八:图八也可以在程序中进行指定代码如下:按钮名称Picture=“图形文件所在的路径与文件名”例如:CmdPicturePicture=“D:imagejpg”二、CommandButton的事件:命令按钮最常用的事件是鼠标点击事件当点击按钮时犹如发出了一道命令而这也正是“命令按钮”这个说法的由来。,)在VisualBasic中单选与复选按钮控件主要作为选项提供给用户选择。不同的是在一组选择按钮中单选控件只能选择一个其他单选控件自动变为未被选中状态而在一组复选按钮中可以选定任意数量的按钮。一、单选控件与复选控件的主要属性:单选控件默认名称为OptionX起名规则为OptX复选控件默认名称为CheckX起名规则为ChkX。在VB操作界面中单选控件与复选控件的图标如图一所示:图一以前讲到的大多数属性都适用于单选与复选控件包括:Caption、Enabled、Font、Name、Height等等此处不再赘述。Value属性是单选与复选控件最主要的属性但单选与复选控件的Value值有些微的差别。单选控件:选中时Value值为True未被选中Value值为False。TxtContentFontName=“Arial”EndSub、单选按钮二:PrivateSubOptModernClickTxtContentFontName=“Modern”EndSub四、复选按钮的判断过程:复选按钮的使用跟单选按钮相似但由于一次可以选择多个复选按钮所以复选按钮的选择比单选按钮多了一个判断过程。,这个判断过程在VB中可以用IfThenElseIfEndIf语句完成。IfThenElseIfEndIf是VB中的块结构条件语句主要用来针对不同的情况让应用程序做出不同的反应。语句功能如下:If假设情况一Then假设情况一成立时执行的语句块一,ElseIF假设情况二Then假设情况二成立时执行的语句块二,,ElseIf假设情况三Then假设情况三成立时执行的语句块三,,Else所有条件都不成立时要执行的语句块,EndIf上面的语句块含义为:如果“情况一”成立则执行“语句块一”否则如果“情况二”成立则执行“语句块二”如果所有情况都不成立则执行Else之后的语句块并最后跳出判断过程。例:假设输入学生成绩如果分数小于标签显示“成绩不及格”如果分数大于标签显示“成绩优秀”如果分数介于两者之间标签显示“成绩优良”。IfScoreLblShowCaption=“成绩不及格”ElseIfScore>ThenLblShowCaption=“成绩优秀”ElseLblShowCaption=“成绩优良”EndIf有几点必须加以注意:、在上面的语句块中ElseIf之间没有空格如果有空格即ElseIf块结构则不成立。ElseIf这种形式只能在单行结构条件语句中成立而不能在块结构条件中成立。、执行语句块的程序代码不能紧跟Then必须放到下一行中这是块状结构的规定。、在块结构判断语句中ElseIf子句的数量没有限制可以根据需要加入任意多个ElseIf子句。IfChkBoldValue=ThenTxtContentFontBold=TrueElseTxtContentFontBold=FalseEndSub复选按钮二:PrivateSubChkItalicClickIfChkItalicValue=ThenTxtContentFontItalic=TrueElseTxtContentFontItalic=FalseEndSub复选按钮三:PrivateSubChkUnderlineClickIfChkUnderlineValue=ThenTxtContentFontUnderline=TrueElseTxtContentFontUnderline=FalseEndSub联想:复选按钮是不是非得经过这种选择判断,能不能如单选按钮那样直接使用呢,这是许多初学者包括笔者自己曾经感到疑惑的地方。,)还是上面这个例子假设复选按钮一不经过判断而直接在点击事件中输入代码:PrivateSubChkBoldClickTxtContentFontBold=TrueEndSub那么你会发现复选按钮一经点击就不能取消字体加粗的效果了而实际上复选按钮一的功能是点击一次即选中时字体加粗点击第二次即取消选择字体不再加粗以此类推。六:知识点:、切记单选按钮与复选按钮的Value值是不同的。单选按钮:选中时Value值为True未被选中时Value值为False。复选按钮:选中时Value值为未被选中时Value值为禁止选择Value值为。你可以试验一下将复选按钮的Value值分别用TrueFalse代替看一下会出现什么问题。、两种选择按钮都针对Click事件做出反应但单选按钮比较简单只需直接输入代码即可复选按钮比较复杂需经过条件判断后再做出反应。切记~、IfThenElseIfEndIf只是条件判断方法的一种以后我们还会学到其他的方法这节课中代码出错喽可能是老师故意让我们自己发现问题吧~代码缺少了endif在前面两节中我们学习了命令按钮、单选按钮、复选按钮的使用本节将就前两节的知识做个总结。显示“LearningVisualBasic”字样三个单选按钮:按钮一让文本字体变为Arial类型按钮二让文本字体变为Modern类型按钮三让文本字体变为TimesNewRoman类型三个复选按钮:按钮一让文本字体变为黑体按钮二让文本字体变为斜体字按钮三给文本增加下划线。另外还有一个退出按钮作用在于退出程序。三、属性设置:根据图一进行属性设置。四、书写程序:TxtContentFontName=“Modern”EndSubOptRoman按钮:PrivateSubOptRomanClickTxtContentFontName=“TimesNewRoman”EndSubChkBold按钮:PrivateSubChkBoldClickIfChkBoldValue=ThenTxtContentFontBold=TrueElseTxtContentFontBold=FalseEndSubChkItalic按钮:PrivateSubChkItalicClickIfChkItalicValue=ThenTxtContentFontItalic=TrueElseTxtContentFontItalic=FalseEndSubChkUnderline按钮:PrivateSubChkUnderlineClickIfChkUnderlineValue=ThenTxtContentFontUnderline=TrueElseTxtContentFontUnderline=FalseEndSubCmdQuit按钮:PrivateSubCmdQuitClickEndEndSub五、分组控件的学习:从前面学到的知识我们知道单选按钮只能多选一那么下面这种分组选项的选择又该如何制作呢,如图二:图二在图二中既可以选择性别又可以选择年级它们是通过选项框分组控件得以实现的。简单地说选项框控件是将不同的选项分类在某一类里只能多选一但多个类别的交叉使用可以完成比较复杂的多项选择。不仅仅如此我们还可以将单选按钮、多选按钮分组不同组内的操作不会影响其他组的操作。如图三:图三分组控件的制作方法:先在窗体上绘制合适大小的框架然后点选单选控件或多选控件最后将鼠标移到框架内并拖拉出选项按钮。注意:请不要使用双击选择按钮控件然后将其拖动到分组框内的办法否则分组会失败。VisualBasic提供了列表框控件以供用户进行多个项目的选择。,)在工具箱面板上列表框控件的图标如图一所示:图一默认的列表框控件名为ListX规则的命名方式为:LstX。一、列表框控件的主要属性:列表框中可以有多个项目供选择用户通过单击某一项选择自己所需要的项目如果项目太多超出了列表框设计时的长度则自动增加竖向滚动条如图二:图二除了一些常见的诸如Font、Height、Left、Width、Enabled、Name等属性外列表框还有一些特殊的属性:、List属性:List是列表框最重要的属性之一其作用是罗列或设置表项中的内容。可以在界面设置时直接输入内容如图三:图三在程序运行时列表框中所有的选项都可以通过List的形式表示。中取出第三项内容可以用下面的代码做到:A$=LstList其中A是一个变量$指明了这个变量的类型:字符串型这句话的意思是:将Lst列表框中第三项取出来然后赋值给字符串变量A。象上面这种赋值办法在VB中是非常普遍的又如以前我们学到的:LblShowCaption=“VisualBasic”这句话是指将VisualBasic这个字符串赋值给LblShow标签控件并作为其标题。紧接上面的内容假设我们用一个标签显示出刚才取出的表项:LblShowCaption=A$那么显示的结果正是我们取出的选项。可见取出某个列表框中的某一表项并将其赋值给某个变量代码如下:字符串变量=列表框名称List其中X是下标。,,、通过List改变原有表项:假设我们要将如图二的列表框中第三项内容改为“跟我学VB”只需输入下面的代码即可:LstList=“跟我学VB”上句话的意思是将“跟我学VB”字符串赋值给Lst并作为其第三项的内容。结果如图四:图四可见要修改某个列表框中某一选项:列表框名称List=“欲修改成的内容”其中X是下标。,)、ListCount属性:本属性返回列表框表项数量的数值只能在程序运行时起作用。比如:一个有着四种选项的列表框那么ListCount就为一个列表框有五个选项那么ListCount就为。返回一个列表框的表项数量值并将其赋值给某个变量代码如下:数值型变量=列表框名称ListCount比如要返回图二列表框的ListCount:X=LstListCount其中X是变量表示X是整数类型的变量。、ListIndex属性:本属性用来返回或设置控件中当前选择项目的索引号只能在程序运行时使用。第一个选项的索引号是第二个选项的索引号是第三个选项的索引号是依此类推ListCount始终比最大的ListIndex值大。当列表框没有选择项目时ListIndex值为。在程序中设置ListIndex后被选中的项目呈反相显示如图五:图五在列表框控件的所有属性中本属性是非常重要的因为一个列表事先你并不知道用户将要选择哪一条项目这时只有根据ListIndex返回的数值我们才能让程序针对用户的选择做出适当的反应。返回ListIndex的代码如下:X=列表框名称ListIndex联想:根据前面的知识我们知道要取出第三项内容代码如下:A$=LstList假设现在选中的是第三项但我们事先不知道用户要选择这一项那么又应该如何访问这第三项呢,代码如下:A$=LstList此时LstListIndex等同于。,)仔细想一想为何要如此书写,、Columns属性:本属性用来确定列表框的列数当值为时所有项目呈单列显示当值为或者大于项目呈多列显示。Columns属性只能在界面设置时指定。如图六:图六默认状态时如果项目的总高度大于列表框的高度那么列表框右边会自动增加一个垂直滚动条用来上下移动列表框。、MultiSelect属性:本属性决定了选项框中的内容是否可以进行多重选择只能在界面设置时指定程序运行时不能予以修改。如图七:图七MultiSelect共有三个值:不允许多项选择如果选择了一项就不能选择其他项允许多重选择但功能不如可以用鼠标或空格选择功能最强大的多重选择可以结合Shift键或Ctrl键完成多个表项的多重选择。方法是:单击所要选择的范围的第一项然后按住Shift键再单击选择范围最后一项。、Style属性:本属性决定了列表框的外观共有两个值:Standard即为标准型如图八:图八CheckBox复选框型如图九:图九本属性只能在界面设置时确定。=TrueFalse注意索引号其实是项目的下标值如果是第三项那么索引值是如果是第十项那么索引值是以此类推。例一:有如图十这样一个应用程序:图十列表框中是人物的名称用户选择不同的名字下面的标签自动显示此人的相关信息。假设我们要在如图十这样的程序中增加项目:LstNameAddItem“郝海东”,、清除所有:Clear用Clear可以清除列表框中所有的内容代码如下:列表框名称Clear、删除选项:RemoveItem此方法可以删除列表框中指定的项目代码如下:列表框名称RemoveItem索引值其中索引值是必须的表示欲删除哪一个项目。同样如图十的程序假设我们要删除第三个项目代码如下:LstNameRemoveItem联想:对于任意一个列表框要删除已经选中的项目代码如下:列表框名称RemoveItem列表框名称ListIndex比如:LstNameRemoveItemLstNameListIndex为什么这样写,请大家仔细想想。四、知识点:、本节的难点在于List、ListIndex请大家一定要把它们吃透。、本节提到了变量关于它们的详细情况我们将在以后学习目前大家只需要知道这里的变量只是个临时工主要用来储存一些临时数据。组合框控件将文本框控件与列表框控件的特性结合为一体兼具文本框控件与列表框控件两者的特性。它可以如同列表框一样让用户选择所需项目又可以如文本框一样通过输入文本来选择表项。组合框默认的名称是ComboX规则的命名方式为:CboX。组合框在VB工具箱面板中的图标如图一:图一一、组合框控件的主要属性:列表框控件的大部分属性同样适合于组合框此外组合框还有一些自己的一些属性:、Style属性组合框共有三种Style:当值为组合框是“下拉式组合框”与下拉式列表框相似但不同的是下拉式组合框可以通过输入文本的方法在表项中进行选择可识别Dropdown、Click、Change事件如图二:图二当值为组合框称为“简单组合框”由可以输入文本的编辑区与一个标准列表框组成可识别Change、DblClick事件如图三:图三当值为组合框称为“下拉式列表框”它的右边有个箭头可供“拉下”或“收起”操作。它不能识别DblClick及Change事件但可识别Dropdown、Click事件如图四:图四综上所述如果你想让用户能够输入项目则应将组合框设置成或如果只想让用户对已有项目进行选择则应将组合框设置成。、Text属性:本属性值返回用户选择的文本或直接在编辑区域输入的文本可以在界面设置时直接输入如图五:图五但要显示多个选项不能简单地用Text属性指定因为后一选项会覆盖前面的选项这时常常要用到窗体的载入事件。FormLoad的意思是在打开窗口的同时将指定的内容载入。详细情况见后面的窗体篇。二、组合框的事件:根据组合框的类型它们所响应的事件是不同的。例如当组合框的Style属性为时能接收DblClick事件而其他两种组合框能够接收Click与Dropdown事件当Style属性为或时文本框可以接收Change事件。三、组合框的方法:跟列表框一样组合框也适用AddItem、Clear、RemoveItem方法。四、组合框举例:有如图六这样一个应用程序:图六在名为CboChoose的下拉组合框中任意选择一种机型自动会在名为LblShow的标签上显示出来。程序代码如下:窗体:下拉式组合框的Click事件:VB神童教程第二章第九节综合示例三作者:未知阅读人次:文章前面我们学了列表框控件与组合框控件本节将就它们制作一个简单的应用程序。,)一、程序界面:界面如图一图一二、程序目的:两个列表框左列表框罗列了一些歌手名字右列表框初始状态为空点击向右按钮可以将左列表框中的指定选项移动到右边列表框点击全部向右按钮可以将左列表框中所有的内容搬到右列表框中点击向左按钮可以将右列表框中选定的表项移动到左列表框中点击全部向左按钮可以将右列表框中的所有内容移动到左列表框中。三、属性设置:见图一注意列表框的Style都为即标准类型。四、程序代码:、窗体的载入事件PrivateSubFormLoadLstLeftAddItem“刘德华”LstLeftAddItem“张学友”LstLeftAddItem“郭富城”LstLeftAddItem“黎明”LstLeftAddItem“谭咏麟”LstLeftAddItem“梅艳芳”LstLeftAddItem“张曼玉”EndSub、向右按钮的点击事件PrivateSubCmdRightClickLstRightAddItemLstLeftListLstLeftRemoveItemLstLeftListIndexEndSub、全部向右按钮的点击事件PrivateSubCmdAllRightClickLstRightAddItem“刘德华”LstRightAddItem“张学友”LstRightAddItem“郭富城”LstRightAddItem“黎明”LstRightAddItem“谭咏麟”LstRightAddItem“梅艳芳”LstRightAddItem“张曼玉”LstLeftClearEndSub、向左按钮的点击事件PrivateSubCmdLeftClickLstLeftAddItemLstRightListLstRightRemoveItemLstRightListIndexEndSub、全部向左按钮的点击事件:PrivateSubCmdAllLeftClickLstLeftAddItem“刘德华”LstLeftAddItem“张学友”LstLeftAddItem“郭富城”LstLeftAddItem“黎明”LstLeftAddItem“谭咏麟”LstLeftAddItem“梅艳芳”LstLeftAddItem“张曼玉”LstRightClearEndSub五、注意事项:、窗体载入事件:就是窗体打开时自动加载的信息也可以在界面设置时通过左列表框的List属性设定。)如图二:图二、无论是部分转移还是全部移动都要记着将本已移动的表项在原有列表框中清除如代码:LstLeftRemoveItemLstLeftListIndex如果不清除那么表项移动后原先的表项还在原处用户可能对同一表项多次选择。如图三图三、第一个应用程序还没编写完仔细看一下哪里还需要再编写,没错就是向左按钮与向右按钮的点击事件还没完善按照上面的程序如果在初始状态下点击向左或向右按钮会产生程序错误。所以我们得在原来向左或向右按钮的事件中增加判断过程修改后的代码如下:向右按钮:PrivateSubCmdRightClickIfLstLeftSelCount>ThenLstRightAddItemLstLeftListLstLeftRemoveItemLstLeftListIndexEndIfEndSub向左按钮:PrivateSubCmdLeftClickIfLstRightSelCount>ThenLstLeftAddItemLstRightListLstRightRemoveItemLstRightListIndexEndIfEndSub看见了吧向左与向右按钮还得增加列表框中是否有表项被选中的判断。,、大家先移动左列表框中的一个项目到右列表框中然后再全部移过去你又会发现什么样的问题呢,这时你会发现右列表框的项目多了一项而这多出来的表项正是最先移过去的那个项目那么全部移动的按钮还需要加以完善。如图四:图四解决办法很简单在全部移动时先清除目标列表框的内容再进行移动修改后的代码如下:全部向右按钮:PrivateSubCmdAllRightClickLstRightClearLstRightAddItem“刘德华”LstRightAddItem“张学友”LstRightAddItem“郭富城”LstRightAddItem“黎明”LstRightAddItem“谭咏麟”LstRightAddItem“梅艳芳”LstRightAddItem“张曼玉”LstLeftClearEndSub全部向左按钮:PrivateSubCmdAllLeftClickLstLeftClearLstLeftAddItem“刘德华”LstLeftAddItem“张学友”LstLeftAddItem“郭富城”LstLeftAddItem“黎明”LstLeftAddItem“谭咏麟”LstLeftAddItem“梅艳芳”LstLeftAddItem“张曼玉”LstRightClearEndSub、本节的程序只是为了让大家便于理解才这样编写的而最为科学、最为有效的编写方法我们将在下一节讲述。(,在开始下一节课程之前大家可以将两个列表框的Style改成即复选类型你会发现本节所编写的程序又有很多问题了该如何解决呢,下一节见

用户评价(0)

关闭

新课改视野下建构高中语文教学实验成果报告(32KB)

抱歉,积分不足下载失败,请稍后再试!

提示

试读已结束,如需要继续阅读或者下载,敬请购买!

文档小程序码

使用微信“扫一扫”扫码寻找文档

1

打开微信

2

扫描小程序码

3

发布寻找信息

4

等待寻找结果

我知道了
评分:

/146

[vb基础教程]VB语言基础

VIP

在线
客服

免费
邮箱

爱问共享资料服务号

扫描关注领取更多福利