数据的输入和输出.ppt

，第4章数据输入和输出，4.1数据输入，4.2数据输出，4.3MsgBox函数，4.4字形和颜色控制，4.1数据输入，VB和用户之间的直接交互都是通过函数实现的，最常用的输入函数是InputBox()函数。4.1.1InputBox函数调用格式InputBox $(提示，Tiltle ，默认 ，XPOS，YPOS) (1)提示(必需):字符串，长度不超过1024个字符，以提示用户输入。(2)标题：字符串，即对话框的标题，显示在对话框的标题区域。(3)默认(默认):字符串。如果输入框中没有输入，默认值将作为输入内容进行更改。(4)Xpos，Ypos(坐标位置):确定屏幕上对话框左上角位置的两个整数值。如果省略，对话框将在屏幕上水平居中，在垂直方向上约占屏幕的1/3。4.1数据输入，例如：私有子窗体_单击()C1 $=CHR $ (13) CHR $ (10) STR 1 $=请输入一个字符串：str2$=输入后按回车键，或单击确定按钮 MSG $=STR 1 $ C1 $ STR 2 $ SS $=InputBox $(MSG $，输入函数InputBox示例， hello )prints $ end sub，p73.vbp，(1)函数返回一个字符串。当变量名=InputBox(参数表)输入一个值时，函数值需要在参与运算前由Val函数转换成一个值。(2)每次执行InputBox函数只能输入一个值。如果需要输入多个值，必须多次执行或调用InputBox函数。4.1.2使用InputBox函数的注意事项，例如，输入三角形的边长并找到面积。私有子窗体_单击()马頔！b！c！s！t。a=val(输入边长1:)，b=val(输入边长2:)，c=val(输入边长3:)，ifab=corbc=aorac=bthenprint 不能形成三角形，请重新输入三角形的边 endif，t=(ABC)/2:s=sqr(t *(t-a)*(t-b)*(t-c)print 区域：；SEndSub，Start:GoTostart，单精度实数，4.2数据输出，4 . 2 . 1打印方法，4.2.2打印格式函数，4.2.3与打印方法相关的标准函数，4.2.4与打印方法相关的属性和方法，4 . 2 . 1打印方法，1。调用格式对象名。打印表达式表 ，|；2。项目描述(1)对象名称：指示数据输出的位置，可以是表单、图片框、打印机或即时窗口。如果省略了“对象名”，它将在表单上输出。(2)表达式：是要输出的内容，可以是数字表达式或字符表达式。示例1: DEBUG。PRINT“立即窗口输出数据”示例2: PRINT 57，(1)输出多个字符串用逗号分隔，然后根据标准输出格式显示每个数据，一个输出行以14个字符位置为单位分为几个部分(输出区域)，逗号后的表达式在下一部分输出。(2)如果用分号分隔，数据将以紧凑的格式输出，例如：PrivateSubForm 1 _ Click()c $= reactive innovation :d $=所有河流入海 Debug。Printc$，d$分区输出调试。printc $；D$紧凑格式输出Endsub，3。输出格式描述，(2)输出值在值的左侧有一个符号位，在值的右侧有一个空格，例如：private subform 1 _ click()a=12: b=-3d ebug . printa；B aDebug。打印a，b分区输出Endsub，3。输出格式描述，(3)每次执行Print方法时，除非在末尾添加分号或逗号，否则该行将自动换行。(4)在4)打印方法后面没有表达式，这表示输出了空行；如果在前一个空的Print方法的末尾有逗号或分号，则Print语句将在前一个Print方法的末尾指示逗号或分号。例如：private subform _ click()a $= 5 : b $= 8 Debug . printb，一个自动换行调试。打印a，b，调试。Print13和上一个Print在“调试”下输出一个空行。打印调试。打印输出一个空行调试。Printb。a；调试。打印结束逗号或分号调试。Printb，aEndSub，3。输出格式描述，函数：打印格式函数指定输出数据的格式，返回值为字符串。格式：格式(表达式，格式字符串)描述：表达式：是要输出的内容，数字，日期或字符串类型的数量；FormatSTR:是指定输出格式的格式字符串。打印方法中通常使用Format()函数。例如：PRINT FORMAT (123.45， # # #。# # )输出为：123.45，4.2.2打印格式函数format()。1.数值格式以指定的格式输出数值表达式的值。如果小数位数大于格式字符串中的小数位数，则应四舍五入。P77，表4-1，4.2.2打印格式函数格式()，数字格式符号和函数，数字格式示例：1)打印格式$ (12345，“00000000”)，00012345，打印格式$ (12345，“# # # # # #”，打印格式$ (12345，“000”)，打印格式$(23.45，“# # # #”。# ，2)printformat$(3.45， 000.00 )，3)printformat$(12345.678， #，#。# ，4)printformat$(12.67，“00.0%”，5)printformat$(12.67，“$#0.00”)，6)printformat$(-123.45，“000.00”)，printformat$(123.45，“000.00”)，7)printformat$(1234.56，“0.00E 00”)，printformat$(1234.56，“0.00E-00”)，12344日期和时间数据的打印格式根据指定的格式输出日期和时间数据。注：m，mm:表示小时后分钟，hh；否则，这意味着月份以未格式化的说明符“-”、“/”和“:”输出，例如：private subform _ click()print format(现在，“yyy-mm-dddddd”)print format(现在，“dddddd”)(现在，“yyyy-mm-ddddddhh-mm-ssam/pm”)PrinForm(现在，“ddmmyyyyy”)PrinForm(现在，“h :mm 3360s”)PrinForm(现在，“m/d/yyh:mm)字符串打印格式，例如：私有子窗体_ Click()打印格式(“你好”，“”)打印格式(“你好”，“ ”)打印格式(“你好”，“选项卡(15)；“姓名”；标签(30)；“专业”调试。打印“001”；标签(16)；“王玲”；标签(30)；计算机科学的调试。打印“002”；标签(16)；“李爽”；标签(30)；古代汉语EndSub，P80.vbp，描述：参数n是一个数字表达式，表示下一个输出位置的列号。如果当前显示位置超过N，它将自动向下移动到下一行的这个位置进行输出。(2)当N比行宽时，实际输出位置是nMod行宽。如果为n1，输出位置移动到第一列。SPC函数(1)函数调用格式：Spc(n)(2)函数函数函数：用于打印方法，其函数表示输出N个空格。注：参数n为数值表达式，取值范围为0 32767的整数。函数Tab(n)和Spc(n)的区别：Tab(n)表示输出到列n的位置(从对象的左端开始计算)。而空格(n)表示两个输出项之间的一个空n网格。1。ScaleWidth和ScaleHeight属性函数：设置或返回对象的宽度和高度。使用格式：对象名。scaleHeight=值对象名。ScaleWidth=value描述：对象名称可以是表单名称、图片框名称或打印机对象。如果省略了对象名，它表示当前的形式。(2)只能在程序代码中使用，不能在设计界面中设置其值。如果省略“=值”，则返回当前对象的宽度和高度。4.2.4与打印方法相关的属性和方法，2。CurrentX和CurrentY属性函数：设置或返回对象的输出位置坐标。使用格式：对象名。当前=x对象名。CurrentY=y“对象名”是一个窗体、图片框或打印机对象。如果省略了对象名，它表示当前的形式。(2)只能在程序代码中使用。(3)坐标是每个对象的坐标，其左上角作为参考点。PrivateSubForm_Click()打印当前坐标为(；表格1。CurrentX。“，”表格1。当前。)“CurrentX=1000CurrentY=800Print”当前坐标为(；表格1。 CurrentX“，”表格1。当前。) currentx=scale width/2 currenty=scale height/2 picture 1 . print 当前坐标为(；表格1。CurrentX。“，”_Form1。当前。)图片1。“打印”当前坐标为(“；图片1。CurrentX。“，”_Picture1。当前。) picture 1 . print iloveyou picture 1 . currentx=1000 picture 1 . currenty=500 picture 1 . print you endsubexam 4 _ 5 .vbp、3.textheight和TextWidth方法函数：返回文本字符串的高度和宽度值。调用格式：对象名。 textheight(字符串)对象名。 textwidth(字符串)描述：“对象名”是表单、图片框或打印机对象示例4.6p84，对象。高度=高度值对象。宽度=宽度值对象。左=离左的距离物体。顶部=距顶部的距离(校正教科书)。4.“高度”、“宽度”、“顶部”和“左侧”属性设置容器(如表单)中对象的大小(高度、宽度)和位置(顶部、左侧)。(1)对于表单对象，左侧和顶部属性是与屏幕的相对位置；(2.3.2，p19)对于控件对象，左和上属性是表单的相对位置。(2)屏幕对象屏幕只有两个属性，高度和宽度，并且是只读的。屏幕。宽度是屏幕的宽度，而屏幕。高度是屏幕的高度示例4.7将表单的大小设置为屏幕大小的50%，并将表单居中。Private子窗体_ click () width=screen.width * 0.5 设置窗体的宽度高度=screen.height * 0.5 设置窗体的高度left=(screen . width-width)/2top=(screen . height-height)/2endsubexam 4 _ 7 . vbp，5.cls方法函数：在窗体或图片框架中清除由Print方法和graphics方法生成的文本或图形。调用格式：对象名。 CLS 6。移动方法函数：用于移动窗体或控件并更改其大小。格式：对象。向左移动距离，顶部距离 ，宽度 ，高度描述：“对象”可以是一个窗体以及除计时器和菜单之外的所有控件。如果省略“对象”，则表单将被移动。例4.8，图形起点移动到表单的中心，同时图形框减少50%。PrivateSubForm_Load()图像1。顶部=0图像1。左=0图像1。图片=加载图片(应用程序。路径 诱人的水果小2.jpg )，endsubprivatebimage1 _ click()image1.moveform1.scalewidth/2, form1.scaleheight/2, _ image1.width/2, image1.height/2endsub(修订的教科书)示例4_8.vbp，4.3MsgBox函数和程序。MsgBox函数的功能是在对话框中显示一条消息，等待用户点击按钮，并返回一个整数数据。MsgBox过程与MsgBox函数具有相同的功能，只是它不返回值。1。调用的语法格式，函数调用：变量= MsgBox(提示，按钮 ，标题)过程调用：MsgBox提示，按钮 ，标题 1)变量：接收MsgBox函数返回值的变量。2)提示，标题：“提示”和“标题”。3)按钮：按钮样式，这是一个造型表达式，最多可添加4个数值。 ，1。调用的语法格式，3)按钮：按钮样式，这是一个塑料表达式，最多可添加4个数值。 ，标题，图标，提示，按钮，2，Msg