百度360必应搜狗淘宝本站头条
python判断字典是否为空crontab每周一执行aes和des区别安装指定版本npmadb pull
当前位置：网站首页 > IT知识 > 正文

学习VB编程第20天，文件读取写入

liuian 2025-05-15 19:08 18 浏览

今天学习了刘金玉老师VB编程教程的第28期，学习的主要内容是文件读取写入。

1.do until......loop循环语句

①语法结构do until条件表达式的值类型

符合条件的要执行的代码

......loop

②代码解释：Do开始做事情until直到什么条件下就不再执行代码了，loop一次循环结束。

③Until的意思是直到什么跳出循环

2.文件读写语法格式

①打开关闭文件：

open文件路径for打开方式 as #文件号

打开方式：

（Append追加写入，在原来的基础上在文件最后的位置追加新的内容，

Input读取，

Output写入，覆盖性写入。）

Close#文件名

②补充知识：eof函数，end of file文件的末尾，参数就是写文件号

③补充知识：文件的绝对路径和相对路径

实例：

绝对路径：C:\VB\学习编程第20天.txt。一般用app.path表示工程文件所在的文件夹。

相对路径：假设文件1路径：C:\VB\学习编程第20天.txt

假设文件2路径：C:\VB\学习编程第21天.txt

那么文件1相对于文件2的相对路径就是.../学习编程第21天.txt

④listbox清空方法，用来List1.clear函数清空

3代码分享：

①从i=1开始输出，直到i=10

Private Sub Command1_Click()

Dim i%

i = 1

Do Until i = 11

Print i

i = i + 1

Loop

End Sub

②输出工程的路径

Private Sub Command2_Click()

Print App.Path

End Sub

③追加写入，如果没有文件，那么将自动生成文件

Private Sub Command3_Click()

Open App.Path & "/t.txt" For Append As #1

Print #1, Text1.Text

Close #1

End Sub

④覆盖写入，写入的内容将原有的内容覆盖

Private Sub Command4_Click()

Open App.Path & "/t.txt" For Output As #1

Print #1, Text1.Text

Close #1

End Sub

⑤读取文件内容，逐行读取文件内容，直到最后一行

Private Sub Command5_Click()

List1.Clear

Open App.Path & "/t.txt" For Input As #1

Do Until EOF(1)

Dim t$

Line Input #1, t

List1.AddItem t

Loop

End Sub

今天这期内容与我们平时工作学习比较紧密相关，可以用来管理我们的文本资料。马上中秋、国庆节就要到了，打算在川内走走，期间可能会断更。提前祝大家节日快乐。

相关推荐

Optional是个好东西，如果用错了就太可惜了

原文出处：https://xie.infoq.cn/article/e3d1f0f4f095397c44812a5be我们都知道，在Java8新增了一个类-Optional，主要是用来解决程...

IDEA建议:不要在字段上使用@Autowire了!

在使用IDEA写Spring相关的项目的时候，在字段上使用@Autowired注解时，总是会有一个波浪线提示：Fieldinjectionisnotrecommended.纳尼？我天天用，咋...

Spring源码|Spring实例Bean的方法

Spring实例Bean的方法，在AbstractAutowireCapableBeanFactory中的protectedBeanWrappercreateBeanInstance(String...

Spring技巧:深入研究Java 14和SpringBoot

在本期文章中，我们将介绍Java14中的新特性及其在构建基于SpringBoot的应用程序中的应用。开始，我们需要使用Java的最新版本，也是最棒的版本，Java14，它现在还没有发布。预计将于2...

Java开发200+个学习知识路线-史上最全(框架篇)

1.Spring框架深入SpringIOC容器：BeanFactory与ApplicationContextBean生命周期：实例化、属性填充、初始化、销毁依赖注入方式：构造器注入、Setter注...

年末将至，Java 开发者必须了解的 15 个Java 顶级开源项目

专注于Java领域优质技术，欢迎关注作者：SnailClimbStar的数量统计于2019-12-29。1.JavaGuideGuide哥大三开始维护的，目前算是纯Java类型项目中Sta...

字节跨平台框架 Lynx 开源:一个 Web 开发者的原生体验

最近各大厂都在开源自己的跨平台框架，前脚腾讯刚宣布计划四月开源基于Kotlin的跨平台框架「Kuikly」，后脚字节跳动旧开源了他们的跨平台框架「Lynx」，如果说Kuikly是一个面向...

我要狠狠的反驳“公司禁止使用Lombok”的观点

经常在其它各个地方在说公司禁止使用Lombok，我一直不明白为什么不让用，今天看到一篇文章列举了一下“缺点”，这里我只想狠狠地反驳，看到列举的理由我竟无言以对。原文如下：下面，结合我自己使用Lomb...

SpringBoot Lombok使用详解:从入门到精通(注解最全)

一、Lombok概述与基础使用1.1Lombok是什么Lombok是一个Java库，它通过注解的方式自动生成Java代码（如getter、setter、toString等），从而减少样板代码的编写，...

Java 8之后的那些新特性(六):记录类 Record Class

Java是一门面向对象的语言，而对于面向对象的语言中，一个众所周知的概念就是，对象是包含属性与行为的。比如HR系统中都会有雇员的概念，那雇员会有姓名，ID身份，性别等，这些我们称之为属性；而雇员同时肯...

为什么大厂要求安卓开发者掌握Kotlin和Jetpack?优雅草卓伊凡

为什么大厂要求安卓开发者掌握Kotlin和Jetpack？深度解析现代Android开发生态优雅草卓伊凡一、Kotlin：Android开发的现代语言选择1.1Kotlin是什么？Kotlin是由...

Kotlin这5招太绝了!码农秒变优雅艺术家!

Kotlin因其简洁性、空安全性和与Java的无缝互操作性而备受喜爱。虽然许多开发者熟悉协程、扩展函数和数据类等特性，但还有一些鲜为人知的特性可以让你的代码从仅仅能用变得真正优雅且异常简洁。让我们来看...

自行部署一款免费高颜值的IT资产管理系统-咖啡壶chemex

在运维时，ICT资产太多怎么办，还是用excel表格来管理？效率太低，也不好多人使用。在几个IT资产管理系统中选择比较中，最终在Snipe-IT和chemex间选择了chemex咖啡壶。Snip...

PHP对接百度语音识别技术（php对接百度语音识别技术实验报告）

引言在目前的各种应用场景中，语音识别技术已经越来越常用，并且其应用场景正在不断扩大。百度提供的语音识别服务允许用户通过简单的接口调用，将语音内容转换为文本。本文将通过PHP语言集成百度的语音识别服务，...

知识付费系统功能全解析（知识付费项目怎么样）

开发知识付费系统需包含核心功能模块，确保内容变现、用户体验及运营管理需求。以下是完整功能架构：一、用户端功能注册登录：手机号/邮箱注册，第三方登录（微信、QQ）内容浏览：分类展示课程、文章、音频等付费...

一周热门
最近发表
标签列表