vb读取txt文件中的内容，输出指定文字后面的内容
a=text1.textlabel1.caption=mid（a，val（a），val（a））把a从1.txt文件中找出来，然后输出a后面的a长度的a个字，注：a是字母，...
a=text1.text
label1.caption=mid（a，val（a），val（a））
把a从1.txt文件中找出来，然后输出a后面的a长度的a个字，
注：a是字母，a后面的是汉字，如：an爱你
val()是计算长度的，一个汉字一个缩写拼音，代码没错。如果没看懂，请离开。
例如：
txt内容是“wan我爱你”
text1.text=“wan”
那就label1输出“我爱你”
难道这个构思有错嘛，你可以在vb中试试。 展开
label1.caption=mid（a，val（a），val（a））
把a从1.txt文件中找出来，然后输出a后面的a长度的a个字，
注：a是字母，a后面的是汉字，如：an爱你
val()是计算长度的，一个汉字一个缩写拼音，代码没错。如果没看懂，请离开。
例如：
txt内容是“wan我爱你”
text1.text=“wan”
那就label1输出“我爱你”
难道这个构思有错嘛，你可以在vb中试试。 展开
3个回答
展开全部
如果a中不含数字 ，VAL（a）是0，Label1.caption=""
dim a1 as string,a2 as integer
a1=text1.text
label1.caption=mid（a1，a2，a2）
dim a1 as string,a2 as integer
a1=text1.text
label1.caption=mid（a1，a2，a2）
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
TableDI
2024-07-18 广告
在上海悉息信息科技有限公司，我们深知Excel在数据处理中的重要作用。在Excel中引用不同工作表（sheet）的数据是常见的操作，这有助于整合和分析跨多个工作表的信息。通过在工作表名称前加上感叹号“!”，您可以轻松地引用其他工作表中的数据...
点击进入详情页
本回答由TableDI提供
展开全部
mid（a，val（a），val（a））这句话是有问题的，无法做出这道题的，
mid函数后面两个值意思是在字符串a中第val（a）个位置往后找VAl（a）个字符，你认为能找到吗，，，
所以你要看一下有没写错，
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
mid函数后2个参数设置错误
你问题要求的很模糊好不好！
还是把原text文件发上来把
你问题要求的很模糊好不好！
还是把原text文件发上来把
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
