VB.net窗体设计中，如何读取.txt文件中的数据？
更新日期：2024.06.02
1、新建一个标准的VB EXE工程，只有一个Form，Form上有两个按钮：Command1和Command2。
2、双击Command1添加如下代码
Private Sub Command1_Click()
Dim strFile As String
Dim intFile As Integer
Dim strData As String
strFile = "c:\学生成绩.txt"
intFile = FreeFile
Open strFile For Input As intFile
strData = StrConv(InputB(FileLen(strFile), intFile), vbUnicode)
Debug.Print strData
Close intFile
End Sub
3、按F8开始单步调试代码，点击Command1，进入单步调试功能，
4、多次按下F8或直接按下F5运行完成，就完成了读取文本文件内容并输出到立即窗口。
19529368651 :VB.net窗体设计中,如何读取.txt文件中的数据?
戎咏亲2091 :答：1、新建一个标准的VB EXE工程，只有一个Form，Form上有两个按钮：Command1和Command2。2、双击Command1添加如下代码 Private Sub Command1_Click() Dim strFile As String Dim intFile As Integer Dim strData &#...
19529368651 :VB.net 读取文本文件?
戎咏亲2091 :答：1、实现上传按钮方法代码。2、判断图片对象是否为空代码。3、取得数据库字段 dt.Rows(0)("Pic")方法代码。4、字节数组转换为Image类型方法代码。5、处理SQL中操作Image类型方法代码。6、实现的上传结果。
19529368651 :vb.net中如何遍历程序窗体中的控件?并读写控件的数据。
戎咏亲2091 :答：Public Sub GetAllControls(ByVal InContainer As Control, ByRef RecieveList As ListBox) For i As Integer = 0 To InContainer.Controls.Count - 1 If InContainer.Controls.Item(i).Text <> "" Then GetList.Items.Add(InContainer.Controls.Item(i).Text & vbCrLf) End If ...
19529368651 :VB.net中 datagridview控件如何读取框选区域内的行数和区域内的数据总和...
戎咏亲2091 :答：在窗体上加上三个标签控件：Label1、Label2、Label3 Private Sub DataGridView1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles DataGridView1.MouseUp Dim counter As Integer Dim SelectedCellTotal As Integer = 0 Dim SelectedCellCount As Integ...
19529368651 :VB.net如何读取文本文档的每一行 并把每一行的数据放到对应的文本框中...
戎咏亲2091 :答：Dim AllLine As String() = File.ReadAllLines("Mytxt.txt")For i = 0 To AllLine.length-1 textBox1.Text = textBox1.Text & AllLine(i) & vbCrlf Next
19529368651 :如何用vb.net2003读写内存
戎咏亲2091 :答：sFile.Read(byData, 0, 100); //第一个参数是被传进来的字节数组,用以接受FileStream对象中的数据,第2个参数是字节数组中开始写入数据的位置,它通常是0,表示从数组的开端文件中向数组写数据,最后一个参数规定从文件读多少字符.} catch (IOException e){ Console.WriteLine("An IO exception has ...
19529368651 :请问在vb.net中如何把sql中的数据读取到textbox中?
戎咏亲2091 :答：Dim f As New 主窗体 Dim strsql As String Dim strconn As String Dim objcommand As SqlClient.SqlCommand ' 声明一个SqlCommand变量 Dim objdr As SqlClient.SqlDataReader ' 声明一个SqlDataReader变量 Dim str1, str2 As String i = i – 1 ' 每次单击登录，计数器减1 If i...
19529368651 :VB.NET语法基础学习
戎咏亲2091 :答：表A:语法对比旧语法 新语法 说明窗体装载事件,类初始化事件 Sub New procedure Sub New称为构造方法(Constructor),它可以有参数。Property Let Property Set Let关键词不再有效。Currency Decimal 在VB6中,Decimal是Variant的一种子类型,但在。NET中它是一种固有的数据类型。。NET不再支持Currency数据类型。Variant ...
19529368651 :VB.net2008精彩实例,窗体应用技巧
戎咏亲2091 :答：打开 Visual Studio 在文件 (File) 菜单上 单击新建项目 (New Project) 在新建项目 (New Project) 对话框的模板 (Templates) 窗格中 单击 Windows 应用程序(Windows Application) 单击确定 (OK)窗体应用技巧一 创建浮动窗体 创建新工程后 选择Form 窗体 添加Timer 和Timer 控件 为窗体选择一个好看的...
19529368651 :vb.net 如何做到一个子窗体绑定一个数据库
戎咏亲2091 :答：加个模块，定义公共变量2个窗体都可以对数据库进行读写，每次读写之前先刷新一次，保证数据最新就行了。VB.NET的特点：1.真正成为面向对象以及支持继承性的语言。2.窗体设计器支持可视化继承，并且包含了许多新的特性，比如自动改变窗体大小、资源本地化支持、数据类工具内在支持XML数据。3.直接建立在.NET...
2、双击Command1添加如下代码
Private Sub Command1_Click()
Dim strFile As String
Dim intFile As Integer
Dim strData As String
strFile = "c:\学生成绩.txt"
intFile = FreeFile
Open strFile For Input As intFile
strData = StrConv(InputB(FileLen(strFile), intFile), vbUnicode)
Debug.Print strData
Close intFile
End Sub
3、按F8开始单步调试代码，点击Command1，进入单步调试功能，
4、多次按下F8或直接按下F5运行完成，就完成了读取文本文件内容并输出到立即窗口。
戎咏亲2091 :答：1、新建一个标准的VB EXE工程，只有一个Form，Form上有两个按钮：Command1和Command2。2、双击Command1添加如下代码 Private Sub Command1_Click() Dim strFile As String Dim intFile As Integer Dim strData &#...
戎咏亲2091 :答：1、实现上传按钮方法代码。2、判断图片对象是否为空代码。3、取得数据库字段 dt.Rows(0)("Pic")方法代码。4、字节数组转换为Image类型方法代码。5、处理SQL中操作Image类型方法代码。6、实现的上传结果。
戎咏亲2091 :答：Public Sub GetAllControls(ByVal InContainer As Control, ByRef RecieveList As ListBox) For i As Integer = 0 To InContainer.Controls.Count - 1 If InContainer.Controls.Item(i).Text <> "" Then GetList.Items.Add(InContainer.Controls.Item(i).Text & vbCrLf) End If ...
戎咏亲2091 :答：在窗体上加上三个标签控件：Label1、Label2、Label3 Private Sub DataGridView1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles DataGridView1.MouseUp Dim counter As Integer Dim SelectedCellTotal As Integer = 0 Dim SelectedCellCount As Integ...
戎咏亲2091 :答：Dim AllLine As String() = File.ReadAllLines("Mytxt.txt")For i = 0 To AllLine.length-1 textBox1.Text = textBox1.Text & AllLine(i) & vbCrlf Next
戎咏亲2091 :答：sFile.Read(byData, 0, 100); //第一个参数是被传进来的字节数组,用以接受FileStream对象中的数据,第2个参数是字节数组中开始写入数据的位置,它通常是0,表示从数组的开端文件中向数组写数据,最后一个参数规定从文件读多少字符.} catch (IOException e){ Console.WriteLine("An IO exception has ...
戎咏亲2091 :答：Dim f As New 主窗体 Dim strsql As String Dim strconn As String Dim objcommand As SqlClient.SqlCommand ' 声明一个SqlCommand变量 Dim objdr As SqlClient.SqlDataReader ' 声明一个SqlDataReader变量 Dim str1, str2 As String i = i – 1 ' 每次单击登录，计数器减1 If i...
戎咏亲2091 :答：表A:语法对比旧语法 新语法 说明窗体装载事件,类初始化事件 Sub New procedure Sub New称为构造方法(Constructor),它可以有参数。Property Let Property Set Let关键词不再有效。Currency Decimal 在VB6中,Decimal是Variant的一种子类型,但在。NET中它是一种固有的数据类型。。NET不再支持Currency数据类型。Variant ...
戎咏亲2091 :答：打开 Visual Studio 在文件 (File) 菜单上 单击新建项目 (New Project) 在新建项目 (New Project) 对话框的模板 (Templates) 窗格中 单击 Windows 应用程序(Windows Application) 单击确定 (OK)窗体应用技巧一 创建浮动窗体 创建新工程后 选择Form 窗体 添加Timer 和Timer 控件 为窗体选择一个好看的...
戎咏亲2091 :答：加个模块，定义公共变量2个窗体都可以对数据库进行读写，每次读写之前先刷新一次，保证数据最新就行了。VB.NET的特点：1.真正成为面向对象以及支持继承性的语言。2.窗体设计器支持可视化继承，并且包含了许多新的特性，比如自动改变窗体大小、资源本地化支持、数据类工具内在支持XML数据。3.直接建立在.NET...
