锐客网

  1. 首页 > 睿知 > >

vb程序设计实用教程 vb程序设计实例100( 七 )

睿知经验知识



为了保证程序正常运行，

Open Filel.Path+Filel.FileNameForlnput As #1改为：

Dun F$

If Right(Filel.Path，1)"\" Then' 表示选定的足根目录

F=Filel.Path+Filel.FileName

Else' 表示选定的是子目录,子目录与文件名之间加"\"

F=Filel.Path+"\"+Filel.FileName

End If

Open F For Input As # 1

4．Open语句中欲打开的名是常量也可以是字符串变量，但使用者概念不清，导致出现"文件未找到"出错信息

如在从盘上读入文件名为"C:\my\t1.txt"，

正确的常量书写如下：

Open"C:\my\t1.txt"For Input As#1' 错误的书写常量两边少双引号

或正确的变量书写如下：

Dim F$

F="C:\my\t1.txt"

Open F For Input As #1 ' 错误的书写变量F两边多了双引号

5．文件没有关闭又被打开，显示"文件已打开"的出错信息

如下语句：

Open"C:\my\t1.txt"For Input As #1

Print F

Open "C:\my\t1.txt"For Input As #1

Print "2"；F

执行到第二句Open语句时显示"文件已打开"的出错信息 。

6．如何读出随机文件中的所有记录，但又不知道记录号 。

不知道记录号而又要全部读出记录，则只要同顺序文件的读取相似，采用循环结构加无记录号的Get语句即可，程序段如下：

Do While Not EOF(1)

Get #1, , j

Print j；

Loop

随机文件读写时可不写记录号，表示读时自动读下一条记录，写时插入到当前记录后 。
原发布者:dorise婷
一个简单VB程序设计过程程序设计——编程人员使用程序设计语言设计一个计算机程序 。【引例】简单VB程序设计实例 。功能要求：单击←、→、↑、↓中的任何一个命令按钮，红色小球就会向相应方向移动一定距离 。1.3.1程序设计准备1、分析问题根据程序的功能要求，可见程序必须具有以下具体功能 。（1）程序必须能够接收程序用户输入的小球移动方向，即原始数据输入 。本例使用4个“命令按钮”向程序用户提供给方向数据输入平台 。（2）当程序用户输入一个方向数据后，程序必须能够立即自动计算小球新的位臵，即数据处理 。本例对于4个不同的移动方向分别计算新的位臵数据 。（3）程序必须能够向程序用户展示小球的移动效果，即输出结果数据 。本例使用一个红色小球图形向程序用户实时展示移动效果 。1.3.1程序设计准备2、建立一个VB应用程序工程启动VB6.0IDE后会弹出“新建工程”对话框，在“新建”选项卡中选择“标准.EXE”图标，单击“打开”命令按钮，或双击“标准.EXE”图标，即可新建一个默认名为“工程1”的应用程序设计工程项目 。?【问1-3-3】什么是工程？【答1-3-3】用来建造VB应用程序的设计文件 ***。在新建一个工程时后，VB6.0IDE会根据设计内容自动建立一系列设计文件 。第一个设计文件就是VB6.0IDE自动新建一个默认名为“Form1”的窗体对象，这个窗体对象就是程序界面的设计平台 。1.3.2设计程序界面在命令行操作系统下运行应用二：vb程序设计实例讲解VB中Length是一个控件的属性，另有一个Len函数可返回字符个数 。
Len 函数
返回 Long，其中包含字符串内字符的数目，或是存储一变量所需的字节数 。
注意LenB 函数作用于字符串中的字节数据，如同在双字节字符集(DBCS)语言中一样 。所以 LenB 返回的是用于代表字符串的字节数，而不是返回字符串中字符的数量 。如为用户自定义类型，LenB 返回在内存中的大小，包括元素之间的衬垫 。
Len 函数示例
本示例使用 Len 函数来得知某字符串的长度（字符数）或某变量的大小（位数） 。Type...End Type 程序区块定义一个自定义数据类型 CustomerRecord 。如果该数据类型定义在对象类模块中，则必需以关键字 Private 开头（表示为私有） 。若定义在常规模块中，Type 定义就可以为 Public 。

推荐阅读


上一篇：新疆高考招生网，新疆高考招生网上报名2023

下一篇：人生得意须尽欢莫使金樽空对月什么意思？人生得意须尽欢莫使金樽空对月下联