vb点虐 简体中文版 vbnet ide

vb点虐 如何打开txt文件?

说明:以下代码在Microsoft Visual Basic 2005 (简体中文版)中通过。

永仁网站制作公司哪家好,找创新互联!从网页设计、网站建设、微信开发、APP开发、响应式网站建设等网站项目制作,到程序开发,运营维护。创新互联从2013年创立到现在10年的时间,我们拥有了丰富的建站经验和运维经验,来保证我们的工作的顺利进行。专注于网站建设就选创新互联。

创建新项目:

在窗体上添加文本框2个:TextBox1,TextBox2

TextBox1 -- 用来编辑要写入的文本文件的内容,或显示打开的文本文件的内容

TextBox2 -- 用来输入要打开或要写入的文件名(包括盘符,路径)(例如:c:\123.txt)

在窗体上添加2个按钮:Button1,Button2

Button1 -- 写入文件

Button2 -- 打开文件

代码如下:

Imports System.IO

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim w As New StreamWriter(TextBox2.Text)

w.Write(TextBox1.Text)

w.Close()

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim r As New StreamReader(TextBox2.Text)

Dim s As String

TextBox1.Text = ""

Do While r.Peek -1 '是否到文件尾

s = r.ReadLine

' MessageBox.Show(r.Peek)

TextBox1.Text = TextBox1.Text s vbCrLf

Loop

r.Close()

End Sub

End Class

补充:你要把读出的数据赋值给一个变量,只要:声明一个变量为数值类型,然后只要读取一行就可以了,把这行数据经过转换成数值后赋给这个变量.

哪里有vb点虐 下载的?

可以安装成中文的

微软上的vs下载中心

;productID=C0037913-9E11-4A2D-8FD1-0BA441296CBC

vs点虐

2003

下载

MSDN

library

CD1

;downid=1

MSDN

library

CD2

;downid=2

MSDN

library

CD3

;downid=3

VISIO

CD1

;downid=4

2005版下载

Visual.Studio.点虐 .2005.简体中文版].rar

;downid=1

我要vb点虐 的下载地址 中文版的

一楼兄弟真有气魄啊。在线发送2GB在的。你是愚公啊???

楼主请到360的软件管家里下载。。那里有个软件宝库,里面有个VB2008标准版,,是中文的 差不多是80MB左右吧。


网站题目:vb点虐 简体中文版 vbnet ide
URL标题:http://cdiso.cn/article/ddcpdcj.html

其他资讯