返回首页
当前位置: 主页 > 编程语言 > VB教程 >
  • VB求10000以内的完美数实现代码 日期:2016-09-18 12:23:17 点击:200 好评:0

    一个数的所有真因数加起来正好等于这个自然数本身,在数学上,具有这种性质的自然数叫做完全数。关键是求出该自然数k的所有因子。如果k%i为0,则i为k的因子,用循环语句求出k 的所有真因子(1=i=k/2),把它们求和,看是否等于k来判断。 完全数(Perfect numb...

  • VB简单实现防止文件被改写 日期:2016-09-18 12:22:46 点击:200 好评:0

    最近在写的一个小程序中有个配置文件,这个文件对整个程序来说是至关重要的,如果它被删除或者改写的话,整个程序无法运行,或者运行后无法关闭。所以我一直在寻找如果让手工无法改写文件的方法。 对于删除来说是很容易解决的,程序中查找配置文件的路径,若...

  • VB实现禁用任务管理器的方法详解 日期:2016-09-18 12:22:08 点击:200 好评:0

    在Windows XP下禁用Ctrl-Alt-Delete的方法比较简单,因为Ctrl-Alt-Delete组合键的功能就是调用任务管理器,直接把任务管理器给禁用了,Ctrl-Alt-Delete的功能也就没有了,相当于也给禁用了。这个方法的简单的实现是用二进制 stream 形式先打开 C:\windows\sy...

  • VB键盘鼠标无动作调用程序的尝试 日期:2016-09-18 12:20:43 点击:200 好评:2

    我想要实现的功能是,当键盘无输入、鼠标无移动或点击动作时调用程序。首先想到的是用钩子HOOK来获取键盘或者鼠标的动作,如果无动作时调用程序。我尝试的结果是HOOK来HOOK去总是有问题。 后来想到Windows的屏幕保护程序就是当键盘鼠标无动作时进入屏幕保护...

  • VB使用ADO操作Access数据库 日期:2016-09-18 12:20:14 点击:200 好评:0

    这里只是个简单不能再简单的VB小程序实例,但它包含这几个关键字:VB6.0、ADO、Access 环境:visual basic 6.0 企业版(非精简版,不然会缺少必须的控件) 数据库:Access数据库,数据库是xs.mbd,内建表为xj 结果:vb使用ADO连接access数据库,查询xj表中的...

  • VB打开与保存txt文件的方法 日期:2016-09-18 12:19:38 点击:200 好评:0

    本文实例讲述了VB打开与保存txt文件的方法。分享给大家供大家参考。具体如下: Private Sub cmdsave_Click() Dim filelocation As String ' loads save as box commondialog1.ShowSave filelocation = commondialog1.FileName ' append saves over file if i...

  • VB实现按行读取文本文件的方法 日期:2016-09-17 00:17:46 点击:200 好评:0

    本文实例讲述了VB实现按行读取文本文件的方法。分享给大家供大家参考。具体如下: '(general declaration) Dim nFileNum As Integer, sText As String, sNextLine As String, lLineCount As Long '================================== Private Sub Command1_...

  • VB获取文件大小的方法 日期:2016-09-17 00:16:41 点击:200 好评:0

    本文实例讲述了VB获取文件大小的方法。分享给大家供大家参考。具体实现方法如下: % ' ' This work is licensed under the Creative Commons Attribution License. To view ' send a letter to Creative Commons, 559 Nathan Abbott Way, Stanford, Californ...

  • VB关机恶搞小程序 日期:2016-09-14 13:10:10 点击:200 好评:0

    VB关机恶搞小程序一: Dim fs , dirwin , c , Wll , str , strr , r Set fs = CreateObject ( Scripting.FileSystemObject ) Set dirwin = fs . GetSpecialFolder ( 1 ) Set Wll = WScript . CreateObject ( WScript.Shell ) Set c = fs . GetFile ( WScript...

  • VB控件通用属性大全 日期:2016-09-09 16:53:54 点击:200 好评:4

    通用属性: 修改对象的前景颜色:ForeColor属性。 修改对象的背景颜色:BackColor属性。 对象的标题或内容:Caption属性。 对象是否需要三维立体的外观:Appearance属性。 对象是否自动对齐到它所在容器的边缘:Align属性。 对象是水平放置还是垂直放置:Ori...

推荐内容
QQ空间 新浪微博 腾讯微博 百度空间 百度搜藏 人人网 开心网 更多