登录
首页 » VB源码 » VB Seek语句设置随机访问文件的读取位置

VB Seek语句设置随机访问文件的读取位置

于 2022-03-24 发布 文件大小:2.03 kB
0 118
下载积分: 2 下载次数: 2

代码说明:

VB 设置随机访问文件的读取位置,本例中是使用Seek语句来设置随机访问文件的读取位置,代码编写方面,主要是掌握Seek的用法,以下代码将用户的单击行为作为触发Seek的事件条件:   Private Sub Command1_Click()    Dim str As String * 10    Open App.Path & "MyFile.txt" For Binary As #1    Seek #1, 5    Get #1, , str    Text1.Text = str    Close #1   End Sub   当用户单击按钮后,执行seek语句。

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • VB.NET应用程序管理工具-类似360桌布助手
    这是一个用VB.NET开发的应用程序管理工具-类似360桌布助手的某此功能,通过导入保存有常用程序列表的XML文件,来通过程序来管理各应用程序的快捷方式,用户可以把常用的程序收集起来,在这里可以直接双击列表中程序名称或点击【启动程序】来启动每个程序。不用到处找你所安装的程序或软件。方便,快捷,常用程序列表:(用户可以拖放任何文件到下面列表中)。   程序列表的操作有导入和导出。
    2022-08-20 10:25:11下载
    积分:1
  • VB整判断字符串中某一字符是否大写
    VB编写完整源码判断字符串中某一字符是否大写,执行下面的代码,这个例子简单哦,不多介绍了,直接看代码吧:   If Asc(Mid(Text1, Val(Text2), 1)) >= 65 And Asc(Mid(Text1, Val(Text2), 1)) = 97 And Asc(Mid(Text1, Val(Text2), 1))
    2022-06-27 09:12:36下载
    积分:1
  • vb根据用户输入的内容决定显示指定内容
    vb根据用户输入的内容决定显示指定内容,从例子来看,是一个数据库搜索的例子,也就是用户搜索的什么,列表中会显示出相关内容。只是说法不同而已,为了可以正常运行,本示例中的数据库采用Access数据库,数据库文件为:db_Client.mdb。
    2022-08-23 09:42:29下载
    积分:1
  • VB使用曲线图展示各项指标完成情况
    VB6.0折线图生成实例,使用曲线图展示各项指标完成情况,同样是使用了MSChart控件的功能,这个折线图的数据取自SQL数据库,在程序中会建立数据库操作模块,将数据读取出来,然后交给折线图生成模块,最终生成这种不同颜色的曲线图,每条曲线都代表一项指标,在视图方面,本示例中的折线图可以按行显示标记,也可以叠置显示,最终效果,如测试图示.   运行前,请确保已正确连接测试数据库,否则程序不能运行.
    2022-07-21 12:00:00下载
    积分:1
  • VB6.0检查是否有拨号连接
    VB6.0检查你的电脑是否有拨号连接,获取本机的网络连接列表,重点是检测是否有拨号网络连接。
    2022-07-25 20:56:18下载
    积分:1
  • vb实现调用其他应用程序的菜单
    vb演示如何调用其他应用程序菜单的方法,程序演示了在VB程序中,调用 windows记事本程序的菜单,不过测试发现,本程序在Windows 7中失效了,本代码写于2010年的,有些早了,当时可能只考虑了Windows XP,可能需要对以下代码加以修正,才能适用于windows 7/10环境:   hwnd = FindWindow(vbNullString, "无标题 - 记事本菜单")   If hwnd = 0 Then Exit Sub   hMainMenu = GetMenu(hwnd)   hMenu = GetSubMenu(hMainMenu, 0)   MenuID = GetMenuItemID(hMenu, 3)   AppActivate "无标题 - 记事本菜单"   Ret = SendMessage(hwnd, WM_COMMAND, MenuID, 0&)
    2022-06-26 16:44:01下载
    积分:1
  • VB6.0 实现表格样式的内容生成Excel表格式
    VB6.0 实现表格样式的内容生成Excel表格式,将DataGrid的表格数据转换成Excel格式,生成Excel表文件,用Offie套件就可以打开,在转换前可设置文字格式、样式等参数,看上去是一个国外的程序,代码里的注释全是英文的,如果E文好的话,推荐参考。
    2022-03-21 16:22:21下载
    积分:1
  • VB 6.0将时、分、秒转换为时间
    VB 6.0将时、分、秒转换为时间,就是把输入文本框中的内容,重新组合,并添加连接符,形成人们视觉习惯上的时间格式。   其实实现这个功能,不两行代码就可实现了:   Private Sub Command2_Click()    t = TimeSerial(Text1, Text2, Text3)    Label4.Caption = "时间为:" & t   End Sub
    2022-08-15 03:56:46下载
    积分:1
  • 在状态栏中显示当前状态-VB范例
    VB6.0在状态栏中显示当前状态,演示程序以一个画图程序来演示窗口状态栏的变化,当我们画直线、执行操作: 画正方形,执行操作: 画圆的时候,会显示出状态,要注意观察窗口的状态栏上的文字提示信息。这种形式现在不算什么高大上功能了,很早的VB示例中就实现了,因此本源码比较基础了,高手请绕行。
    2023-03-24 17:45:04下载
    积分:1
  • vb6 批量生成证书、房屋等编号
    vb6 批量生成证书、房屋等编号,学会了本例子,是个比较实用的技巧,在一些需要批量生成编号的地方,你都可以借鉴本程序,来实现编号生成,在本例中,是批量生成房屋的编号,用户可选择楼层范围、单元范围等参数后,即可快速生成编号。十分方便哦。这个小程序从界面和功能易用上来说,都设计的都好用的。
    2022-10-19 14:10:03下载
    积分:1
  • 696516资源总数
  • 106679会员总数
  • 14今日下载