txt文件:
界面上数据库表格:
还望大家多帮忙,用oleDB.access。
4条回答 默认 最新
- threenewbee 2015-04-23 03:18关注
Imports System.IO Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim ofd As New OpenFileDialog If ofd.ShowDialog() = Windows.Forms.DialogResult.OK Then Dim query = File.ReadAllLines(ofd.FileName) _ .Where(Function(x) System.Text.RegularExpressions.Regex.IsMatch(x, "^\d{1,2}\s+\d{1,2}\s+\d{4}\s+")) _ .Select(Function(x) x.Split(" ".ToCharArray(), StringSplitOptions.RemoveEmptyEntries)) For Each x In query DataGridView1.Rows.Add(x) Next End If End Sub End Class
本回答被题主选为最佳回答 , 对您是否有帮助呢?解决 无用评论 打赏 举报
悬赏问题
- ¥20 微信网友居然可以通过vx号找到我绑的手机号
- ¥15 spring后端vue前端
- ¥15 寻一个支付宝扫码远程授权登录的软件助手app
- ¥15 解riccati方程组
- ¥15 display:none;样式在嵌套结构中的已设置了display样式的元素上不起作用?
- ¥15 使用rabbitMQ 消息队列作为url源进行多线程爬取时,总有几个url没有处理的问题。
- ¥15 Ubuntu在安装序列比对软件STAR时出现报错如何解决
- ¥50 树莓派安卓APK系统签名
- ¥65 汇编语言除法溢出问题
- ¥15 Visual Studio问题