扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
先将文件的每一行数据一行一行读到变量中
成都创新互联公司长期为上千多家客户提供的网站建设服务，团队从业经验10年，关注不同地域、不同群体，并针对不同对象提供差异化的产品和服务；打造开放共赢平台，与合作伙伴共同营造健康的互联网生态环境。为阳明企业提供专业的成都网站建设、网站制作，阳明网站改版等技术服务。拥有十多年丰富建站经验和众多成功案例,为您定制开发。
然后执行一下下面
代码
就能取得
Dim
s
As
String
D_FILE
=
FreeFile
Open
你的文本地址
"\ini.txt"
For
Input
As
#D_FILE
Do
While
Not
EOF(D_FILE)
Line
Input
#D_FILE,
s
s
=
Replace(s,
vbTab,
"
")
Debug.Print
s
这里可以写出你想做的别的操作。
Loop
Close
#D_FILE
可以用Replace把他替换成空或别的字符：Vb的TAB表示方式为:vbTab 例：Replace(内容,vbTab,"")
chr(9),或直接定义一个字符串变量，令值＝“在这里敲一下Tab键”
连接时用字符串时加上这个就好了
其实是起了作用的，只不过vbTab跟4个字符有关系，所以显示的列，8的倍数个字符和不是8的倍数个字符之间就显示得有差异了。
tab就是如果不够4个字符就补齐4个字符的位置。 超过的话就是补齐4的整倍数个字符。
textBox1.Text = "a" vbTab "1" vbLf "b" vbTab "2"
想必你一定是用PictureBox1的graphics直接绘制的，不存在程序语句错误，问题在于绘制后TabPage切换时并没有被自动刷新，所以图形存在但不显示（按钮点击可以画出来相当于手工刷新了）
你可以定义一个bitmap，在TabControl2_Selected函数中先用这个bitmap的graphics绘制图形，然后PictureBox1.Image=这个bitmap
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网