西南石油大学计算机科学学院VisualBasic语言基础知识西南石油大学计算机科学学院3.2窗体23.4VB应用程序的结构与工作方式43.3数据的输入与输出333.1语句31第三章VB程序设计基础▲▲西南石油大学计算机科学学院3.1VisualBasic基本语句语句由VisualBasic关键字、变量、常量、运算符等组成语句的功能是使计算机执行具体的操作。同一语句行中输入多条语句,语句之间用冒号“:”分隔。一条语句在多行显示,使用续行符“_”。3.1.1语句PrivateSubForm_Click()Dima%,b%,xAsdoublea=3:b=6x=(-b+sqr(b^2–4*a*c))/_(2*a)Form1.PrintxEndSub西南石油大学计算机科学学院3.1.2赋值语句[LET]变量/属性名=表达式/属性值DimStr1AsStringDimNumAsIntegerStr1=VisualBasic6.0Num=2Text1.Text=Str1VisualBasic6.0Str12Num1.赋值号左边只能是变量,不能是常量、常数符号或表达式sin(x)=x+y5=sqr(s)+x+yx+y=32.不能在一句赋值语句中给多个变量赋值Dimx%,y%,z%x=y=z=1思考:赋值语句中:a=b与b=a相同吗?西南石油大学计算机科学学院3.1.3数据输出-Print方法[对象名.]Print[表达式]在指定的对象中输出表达式的值,用于在窗体、图片框或打印机上输出数据。Form,PictureBox,Printer西南石油大学计算机科学学院Print方法说明Print方法前的“对象名”可省略,省略对象名就在当前窗体上打印出数据。表达式可以省略,则在对象上打印空行。Print方法后可跟多个表达式,当输出多个表达式时,各表达式用逗号|分号隔开。[对象名.]Print[表达式]西南石油大学计算机科学学院例PrivateSubForm_Click()DimA1AsInteger,A2AsInteger,Temp%A1=5:A2=10‘使用逗号分隔三个表达式Form1.Print交换,A1,A2Temp=A1:A1=A2:A2=TempForm1.Print得,A1,A2EndSub西南石油大学计算机科学学院用“;”(或空格)隔开数据项,打印时以紧凑格式输出字符串数据的紧凑格式输出时把各表达式连接起来输出数值数据的紧凑格式输出时,数据前有一个符号位,后有一个空格Print方法西南石油大学计算机科学学院用“,”隔开,以标准格式输出(分区输出格式),以14个字符宽度划分为一个区段。判断下面语句的输出结果?Print2,-4Print方法西南石油大学计算机科学学院Print方法具有计算与输出双重功能X=5:y=10Print(x+y)/3(对)但不具有赋值功能Printz=(x+y)/3(错)西南石油大学计算机科学学院Print方法,与;的妙用同一行作显示,必须用,或者;例:print“30+50=”;print30+50西南石油大学计算机科学学院PrintAB;CDEPrint2;-4,6PrintAB;CDE,‘末尾出现了逗号Print2;-4,6PrintAB;CDE;‘末尾出现了分号Print2;-4,6西南石油大学计算机科学学院与Print方法有关的函数Tab函数Tab(n)功能是在指定的位置显示输出信息。参数n为数值表达式,其值为一整数,它是下一个输出位置的列号。例:print“姓名”;Tab(8);”年龄”;_Tab(16);”职务”西南石油大学计算机科学学院例PrivateSubForm_Click()Print:PrintFontName=“黑体”‘字体类型为“黑体FontSize=16'字体大小为16Print姓名;Tab(8);年龄;Tab(16);职务;PrintTab(24);单位;Tab(32);籍贯PrintPrint张得功;Tab(8);25;Tab(16);科长;Tab(24);_劳动科;Tab(32);北京Print李得胜;Tab(8);32;Tab(16);处长;Tab(24);_科研处;Tab(32);上海EndSub西南石油大学计算机科学学院运行结果:西南石油大学计算机科学学院与Print方法有关的函数Spc函数Spc(n)功能是在两个输出表达式之间空n个空格。参数n为数值表达式,其值为一整数,它是两个表达式之间的空格数。例:print“abc”;spc(8);”def”注意:该函数仅用于输出,不可用于表达式西南石油大学计算机科学学院Space$(n)函数用于返回n个空格,与spc()函数功能相同,但它可用于表达式中,也可用于输出。例如:a$=“a”+space(4)+”b”printa$结果:ab西南石油大学计算机科学学院比较Tab函数需要从对象的左端开始计数Spc函数只表示两个输出项之间的间隔西南石油大学计算机科学学院Form1.Print“**********”‘共10个*Form1.PrintTab(2);*;Spc(8);*Form1.PrintTab(3);*;Spc(8);*Form1.PrintTab(4);*;Spc(8);*Form1.PrintTab(5);*;Spc(8);*Form1.PrintTab(6);*;Spc(8);*Form1.PrintTab(7);**********西南石油大学计算机科学学院Format函数将数值或日期按指定格式输出。Format$(表达式,格式字符串)西南石油大学计算机科学学院表3-1常用格式字符串表#表示一个数据位;不在前面或后面补00表示一个数据位,在前面或后面补0.显示小数点,与#或0结合使用,可放在任何位置,千位分隔符,用于在整数位插入分隔符号,放在小数点左边除头,尾的位置%百分比符号,用于在数字末尾显示百分号$美元符号,用于在数字前显示“$”符号-,+负、正号,用于在数字前强加上一个负号或正号,放在格式串的头部E+,E-指数符号,用于指数形式显示数值西南石油大学计算机科学学院Format函数将数值或日期按指定格式输出。Format$(表达式,格式字符串)西南石油大学计算机科学学院真题填空PrintFormat(Int(12345.6789*100+0.5)/100,0000,0.00)12,345.68西南石油大学计算机科学学院例编写程序,试验数值的格式化输出SubForm_Click()PrintFormat$(12345.6,000,000.00)PrintFormat$(12345.678,###,###.##)PrintFormat$(12345.6,###,##0.00)PrintFormat$(12345.6,$###,#0.00)PrintFormat$(12345.6,-###,##0.00)PrintFormat$(0.123,0.00%)PrintFormat$(12345.6,0.00E+00)PrintFormat$(0.1234567,0.00E-00)EndSub西南石油大学计算机科学学院注释语句语法格式:Rem注释内容´注释内容注释有利于程序的维护和调试(1)使用关键字Rem,在Rem和注释内容之间要加一个以上空格(2)在其他语句后使用Rem关键字,必须使用冒号(:)与前面的语句隔开。注释符(单引号’)可以直接写在其他语句后面。西南石油大学计算机科学学院暂停语句(Stop语句)在程序代码中设置断点(相当于中断),暂停程序的执行。PrivateSubForm_click()Dimi%,s%Debug.Printi,ss=s+iForm1.PrintsEndSubstop‘每一次的执行都会在此暂停西南石油大学计算机科学学院结束语句(End语句)用于结束一个程序的运行SubCommand1_Click()End‘结束程序EndSubEndIf、EndSelect、EndWith、EndType、EndFunction、EndSub等.西南石油大学计算机科学学院输出语句Print[对象.]Print[表达式列表][,|;](在指定的对象中输出表达式的值)注意:Print方法在Form_Load事件过程中起作用,必须设置窗体的AutoRedraw为True。[对象.]?[表达式列表][,|;]西南石油大学计算机科学学院窗体(Form)窗体是设计VB应用程序的基本平台。窗体本身是一个对象,又是其它对象的载体。大多数应用程序是从窗体开始执行的。一个应用程序可以有多个窗体。西南石油大学计算机科学学院窗体的结构系统菜单标题标题栏最小化按钮最大化按钮窗体关闭按钮ControlBoxCaptionMinButtonMaxButton西南石油大学计算机科学学院窗体的属性1.Height、Width、Top和Left属性2.字体Font属性组FontName(字体名称)FontSize(字体大小)FontBold(粗体字)FontItalic(斜体字)Fontstrikethru(加删除线)Fontunderline(加下划线)FontTransParent(重叠显示)西南石油大学计算机科学学院窗体的属性BackColor属性设置窗体的背景颜色ForeColor属性设置窗体的前景颜色BorderStyle属性设置窗体边框的类型Picture属性设置窗体中要显示的图片Caption属性决定控件上显示内容Name属性是对象的标识西南石油大学计算机科学学院AutoRedraw属性(自动重画)Form_load()事件使用Print方法的时候设置为True。窗体的属性Enabled属性(决定控件是否可操作)True:允许用户进行操作(缺省值)False:禁止用户进行操作。Visible属性(决定控件是否可见)True:运行时控件可见(缺省值)。False:运行时控件隐藏但控件本身是存在的。西南石油大学计算机科学学院窗体事件Load事件:是在窗体被装入工作区时触发的事件。当应用程序启动时,自动执行该事件。UnLoad事件:是卸载事件,当从内存中清除一个窗体时触发该事件。Load事件和UnLoad事件西南石油大学计算机科学学院窗体的方法[对象.]Print作用:在指定的对象(窗体、图片框)中输出值[对象.]Cls作用:清除运行时在窗体或图形框中显示的文本或图形[对象.]Move左边距离[,上边距离[,宽度[,高度]]]作用:移动窗体或控件,并可改变其大小[对象.]Show和[对象.]Hide作用:Show方法用来显示窗体,Hide方法用来隐藏窗体西南石油大学计算机科学学院例:简易计算器3.3数据的输入与输出3.3.1命令按钮西南石油大学计算机科学学院Caption:标题属性——命令按钮显示的内容Default:确认属性。设置为True时,按Enter键相当于用鼠标器单击了该按钮。Enabled:设置按钮是否为激活状态。Style:确定显示的形式0只能显示文字,1文字、图形均可。Picture:给命令按钮指定一个图片。1.命令按钮的属性西南石油大学计算机科学学院2.命令按钮的事件事件Click西南石油大学计算机科学学院标签(Label)文本框(Text)只用于显示文本(输出)信息,不能作为输入信息的界面。既显示正文内容,也可在该区域输入、编辑或者复制文本。3.3.2标签与文本框西南石油大学计算机科学学院标签的属性Caption:用来改变Label控件中显示的文本Alignment:设置Caption属性中文本的对齐方式(0,1,2)BorderStyle:有无边框0-None:无边框;1-FixedSingle:有边框;Autosize(True,False)Backstyle:是否透明(0,1)西南石油大学计算机科学学院文本框的属性Text:显