Visual Basic语言程序设计及实验教程课件：顺序结构程序设计.ppt

2．假设已使用如下变量声明语句：Dimdate_1AsDate则为变量date_1正确赋值的语句是A.date_1=date(1/1/2005)B.date_1=#1／1／2005#C.date_1=1/1/2005D.date_1=#1／1／2000#（二）用InputBox函数输入数据InputBox(提示串[,标题][,默认值][,xpos][,ypos])例：s=InputBox(“请输入尊姓大名”，“请输入”，“张三”)例：利用消息框输入圆的半径，单击窗体，分别在窗体上输出圆的周长，用消息框中输出圆的面积。PrivateSubForm_Click()DimrAsSingle,kAsSingle,sAsSingleConstpi=3.1415926r=InputBox(请输入圆的半径)k=2*pi*rs=r*r*piPrint圆的周长=;kMsgBox圆的面积=s,vbOKOnly,计算结果EndSub（三）用VisualBasic的控件输入数据a=Text1.Text一、数据输出的基本方法（一）用Print方法输出（二）用消息对话框输出（三）用VB的控件输出二、数据输入的基本方法（一）赋值语句（二）用InputBox函数输入数据（三）用VB的控件输入数据3.3常用基本语句注释语句Rem加载对象语句Load卸载语句Unload结束语句End暂停语句Stop3.4基本控件3.4.1控件的基本属性(1)Name属性：(2)Caption属性：(3)Enabled属性：(4)Visible属性：(5)Height，Width，Top和Lelf属性：(6)BackColor和ForeColor属性：(7)Font属性：3.4.1命令按钮Caption属性Style属性1、属性：2、方法：SetFocus方法3、事件：Click事件特别强调：命令按钮不支持DblClick事件Picture属性DownPicture属性DisabledPicture属性(1)Caption属性(3)AutoSize属性2、方法：Move方法3、事件：Click事件1、属性：(2)Alignment属性3.4.2标签例：利用标签和命令按钮设置一个测试游戏。3.4.3文本框(1)Text属性(3)PasswordChar属性2、方法：Move方法、SetFocus方法3、事件：Click事件、DblClick事件、Change事件1、属性：(2)Multiline属性例：产生1~N的三个随机正整数，显示在文本框中，其中N值由文本框输入。例：设计一个程序，在两个文本框中分别输入数据，然后交换这两个文本框显示的内容。例:利用文本框输入密码。PrivateSubCommand1_Click()MsgBox输入的密码是：Text1.Text,64,口令字的应用EndSub例：提取人民币方案。储户到银行提取存款共计N元，试问银行出纳员应如何付款，才可以使储户拿到的人民币的张数最小呢？(上机操作)3.4.4框架框架(Frame)控件是一个控件容器，可以用来对其他控件进行分组，以便于用户识别。(1)Caption属性1、属性：例:设计一个程序，实现标签的显示和隐藏，并改变字体的颜色。3.4.5PictureBox(图片框)(1)、属性Picture属性：(2)方法Print方法Move方法(3)事件Click事件Autosize属性：例：水果秀3.4.6滚动条(1)、属性Min、Max属性：Value属性SmallChangeLargeChange(2)事件Scroll事件：当用鼠标拖动滚动块时Change事件：当改变Value属性值时（1)滚动条的用途在许多Windows程序中，如Word、Excel等都使用滚动条，用户可以通过拖动滚动条看到显示的全部信息。VB提供的列表框、组合框等控件也有滚动条。本节介绍的是VB工具箱提供的滚动条控件，其作用是为那些不能自动支持滚动的应用程序和控件提供滚动功能，也可作为数据输入的工具。滚动条有水平和垂直两种，分别可通过工具箱中的水