十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
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运行完成,就完成了读取文本文件内容并输出到立即窗口。
把结果用字节集变量,再其字节集数据,长整数就行了,多大都能取
你实例化一个文件对象,就可以获取这个文件的相关属性了,VB.NET实例,以你的文件为例:
Dim sourcefileinfo As New FileInfo(“ c:\1.txt”) '定义并实例化FileInfo对象。length就是它的大小!
label1.Text = "文件大小为: " sourcefileinfo.Length "字节"