vb截取本地txt中某两个指定字符之间的字符串

我有一个文本:数据.txt内容是:张三,男,100,99,95李四,男,84,100,98王某人,女,0,20,58现在我想截取第二排的内容,并将5个数据分别记录到Tex... 我有一个文本:数据.txt
内容是:
张三,男,100,99,95
李四,男,84,100,98
王某人,女,0,20,58
现在我想截取第二排的内容,并将5个数据分别记录到Text1到Text5的文本框中。望高手解答!!!谢谢。。。
展开
 我来答
网海1书生
科技发烧友

2015-04-28 · 擅长软件设计、WEB应用开发、小程序
网海1书生
采纳数:12311 获赞数:26231

向TA提问 私信TA
展开全部
Dim s() As String, s1() As String
Open "数据.txt" For Binary As #1
s = Split(Input(LOF(1), #1))
Close #1
s1 = Split(s(1), ",") '第一行为s(0),第二行为s(1),依此类推
Text1.Text = s1(0)
Text2.Text = s1(1)
Text3.Text = s1(2)
Text4.Text = s1(3)
Text5.Text = s1(4)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式