判断text1输入的内存大小进行合法性检验课件

1、实验G1实验G1判断text1输入的内存大小进行合法性检验，确保最后两个字符为“MB”，其他的都是数字字符。Dim n%, x$, y$Private Sub Text1_LostFocus()n = Len(Text1)x = Right(Text1, 2)y = Left(Text1, n - 2)x = UCase(x)If x = MB And IsNumeric(y) ThenPrint Text1.TextElseMsgBox 输入非法数字，请重新输入！Text1 = Text1.SetFocusEnd IfEnd Sub把list1内容赋值给list2Private Sub Li

2、st1_Click()List2.AddItem List1.TextEnd Sub2判断text1输入的内存大小进行合法性检验，确保最后两个字符Dim x!, y$, z$Private Sub Check1_Click()Text1.FontBold = TrueEnd SubPrivate Sub Check2_Click()Text2.FontItalic = TrueEnd SubPrivate Sub Command1_Click()Text2 = Str(x)End SubPrivate Sub Form_Load()End SubPrivate Sub Option1_Clic

3、k()x = Sin(Val(Text1)End SubPrivate Sub Option2_Click()x = Exp(Val(Text1)End SubPrivate Sub Option3_Click()x = Sqr(Val(Text1)End Sub3Dim x!, y$, z$3第8章 数据文件8.1 文件概述 8.2 顺序访问模式8.3 随机访问模式8.4 二进制访问模式4第8章 数据文件8.1 文件概述 48.1 文件概述 1. 记录由若干个相互关联的数据项组成。例如，由学生的学习成绩信息组成的记录2. 文件分类 文件是记录的集合，VB提供了三种访问模式 :顺序访问模式：顺

4、序文件，记录可长可短随机访问模式：随机文件，记录的长度相同二进制访问模式：二进制文件数据项总分物理成绩语文成绩数学成绩姓名学号本章目录58.1 文件概述 1. 记录2. 文件分类 数据项总分物理文件分类 (1) 顺序文件按顺序依次把记录写入或读出来的文件。记录n记录n-1记录3记录2记录1文本文件 一行一条记录，记录可长可短，以换行符分隔记录。(2) 随机文件记录长度相同，根据记录号可直接访问任意一个记录。#n记录n记录n-1#2记录2#1记录1(3) 二进制文件直接把二进制码存放在文件中。本章目录6文件分类 (1) 顺序文件记录n记录n-1记录3记录2记录8.2 顺序文件1. 打开文件例8.

5、1 对文件C:Scores.dat进行读写Open 文件名 For 模式 As #文件号 模式Output 进行写操作 Input 进行读操作 Append 在末尾追加记录 文件号 1511注意：文件名可以为字符串常量，也可以是字符变量。 本章目录78.2 顺序文件1. 打开文件本章目录7顺序访问模式-写操作 写入数据使用语句Print和Write (1) WriteWrite #文件号，输出列表 Write在数据项之间插入“,”并给字符串加上双引号。例如 Write（1, “One”, “Two”, 123）写入到文件后格式：One,Two,123 本章目录8顺序访问模式-写操作 写入数据使

6、用语句Print和Write(2) PrintPrint # 文件号，输出列表 Print #语句功能与Write 基本相同，区别在于字符串不加双引号，数据之间没有“,”。例如，Print #1，One，Two，123写入到文件后格式：One Two 123例8.2 利用Print 和Write 语句把数据写入文件本章目录9(2) Print本章目录9关闭文件 输出语句是将数据送到缓冲区，关闭文件时才将缓冲区中数据写入文件。关闭文件形式： Close( #文件号)例 Close(1) 关闭1号文件。如果省略了文件号，Close语句将关闭所有已经打开的文件 本章目录10关闭文件 输出语句是将数据

7、送到缓冲区，关闭文件时才将缓冲区中读操作 (1) Input# 从打开的顺序文件中读出数据并将数据赋给变量。 Input #文件号，变量列表 (2) LineInput 读出一行数据 LineInput #文件号, 字符串变量说明：读出的数据中不包含回车换行符 (3) EOF (文件号)测试文件指针是否到文件末尾(4) LOF (文件号)测试文件的长度本章目录11读操作 (1) Input# 从打开的顺序文件中读出数应用举例 例8.3 设计一个文件加密程序。例8.4 编写顺序文件读写程序。选择“添加数据”，则将一个学生的学号、姓名和成绩（Integer）添加到Score.txt文件中选择“读取

8、数据”，则从文件读取数据并计算总分和平均成绩，最后送入文本框。 本章目录12应用举例 例8.3 设计一个文件加密程序。本章目录128.3 随机访问模式 随机访问模式中文件的打开和关闭打开文件Open 文件名 For Random As #文件号 Len=记录长度随机文件打开后，可以同时进行写入与读出操作记录长度默认值是128个字节 关闭随机文件 Close(#文件号) 例8.5 编写一个随机文件应用程序 本章目录138.3 随机访问模式 随机访问模式中文件的打开和关闭本章目录随机访问模式中文件的读写 Put#文件号，记录号，变量名 将一个记录变量的内容，写入所打开的磁盘文件中指定的记录位置处。

9、如果忽略记录号，则在当前记录前插入一条记录。Get #文件号，记录号，变量名 将指定的记录内容读入记录变量中。如果忽略记录号，则表示读出当前记录后的那一条记录 例8.6 编写学生信息管理程序 本章目录14随机访问模式中文件的读写 Put#文件号，记录号，变8.4 二进制访问模式二进制访问模式与随机访问模式类似，读写语句也是Get和Put，区别在于二进制模式的访问单位是字节，而随机模式的访问单位是记录例如:Open C:Student.Dat For Binary As # 1 本章目录158.4 二进制访问模式二进制访问模式与随机访问模式类似，读写例8.7 编写一个文件复制程序Dim char

10、 As ByteOpen C:S.Dat For Binary As # 1Open C:S.Bak For Binary As # 2Do While Not EOF(1) Get #1, , char 读源文件一个字节 Put #2, , char 写一个字节到目标文件LoopClose #1 关闭源文件Close #2 关闭源文件本章目录16例8.7 编写一个文件复制程序本章目录16本章小节文件 文件是记录的集合，三种访问模式 顺序访问 打开 Open 文件名,模式,文件号 写 Print Write 读 Input # 文件号，变量 LineInput #文件号随机访问Open 文件名 For Random As #文件号 Len=长度 读Get 写 Put二进制访问 与随机访问模式类似本章目录17本章小节文件 文件是记录的集合，三种