精华内容
下载资源
问答
  • VB加载窗体属性设置后保存参数,适用于VB6.0的开发中,本源码功能介绍:  通过对配置文件的操作  1、判断程序是否异常关闭  2、实现使用次数的统计  3、记录窗体大孝位置  4、修改程序标题
  • 这是一个将excel嵌入到form窗体中。很实用
  • Public Sub ScreenShot ( ) Dim bit As Bitmap = New Bitmap ( Me .Width , Me .Height ) ..."保存截图成功" ..."保存截图失败 " & ex.Message ) End Try End Sub
     Public Sub ScreenShot()
            Dim bit As Bitmap = New Bitmap(Me.Width, Me.Height)
            Dim g As Graphics = Graphics.FromImage(bit)
            g.CompositingQuality = Drawing2D.CompositingQuality.HighSpeed
            g.CopyFromScreen(Me.Left, Me.Top, 0, 0, New Size(Me.Width, Me.Height))
            Try
                bit.Save("D:\tmp\1.png")
                lst_Log.Items.Add("保存截图成功")
            Catch ex As Exception
                MsgBox("保存截图失败 " & ex.Message)
            End Try
        End Sub
    
    展开全文
  • VB自动保存窗体控件值到一个INI文件中.ASDFASDFASDF
  • VB 实现在窗体内加载图片的简单源程序,这个例子只是教我们如何使用VB载入图片,别无其它功能,如果你想开发图像处理类的软件,还是有点用处的。
  • 模拟按Print Screen键,然后保存到BMP文件
  • 内容索引:VB源码,界面编程,窗体控制,INI 有时候,我们需要将VB窗体控件中的值临时写入INI文件,给控件加入“记忆”功能,这样用户在输入的时候就保存了这些值,下次打开会自动显示出这些值,本程序就是实现这一功能...
  • 你必须掌握的VB窗体知识

    千次阅读 2020-09-16 09:55:57
    窗体的概念 在VB6之中,窗体是应用程序的...在保存工程时,窗体会与工程文件保存在同一级目录下,窗体的扩展名为.frm格式,而工程的扩展名为.vbp格式。 窗体的常用属性 Name(名称)属性 Name属性用于设置窗体的名称,

    窗体的概念

    在VB6之中,窗体是应用程序的重要组成部分,一个窗体对应一个窗口。在程序设计阶段,窗体是程序员的“工作台”,程序员在窗体上建立应用程序界面,在运行程序时,窗体是用户与计算机的交互界面。

    窗体是VB中一类重要的对象,作为对象,窗体同样具有自己的三要素:属性、事件和方法。此外,窗体还作为其它控件的容器,用于放置其它控件。

    在保存工程时,窗体会与工程文件保存在同一级目录下,窗体的扩展名为.frm格式,而工程的扩展名为.vbp格式。

    窗体的常用属性

    Name(名称)属性

    Name属性用于设置窗体的名称,在窗体被创建时,默认名称为Form1、Form2等。Name属性只能在属性窗口修改,所有控件的Name属性都在属性窗口的第一行。在使用对象属性、事件和方法时,务必确保使用了正确的Name名称。
    在这里插入图片描述

    例如,以下是Form1窗体在修改Name名称前和修改Name名称为frm1后,调用隐藏该窗体的方法语句对比:

    Form1.hide    ' 修改Name名称前
    frm1.hide     '改Name名称为frm1后
    

    Caption属性

    Caption属性用于设置窗体的标题,默认情况下,窗体Caption属性与Name属性一致。可以根据需要修改为其它标题,修改方法为:

    窗体名称.Caption="自定义标题"   
    

    Caption属性可以修改,也可以读取。读取Caption属性的方法为:

    变量名称=对象名称.Caption    '将对象名称赋值给变量
    

    获取其它可读属性值的方法与此语法一致。

    Height和Width属性

    Height和Width属性用于设置窗体的高度和宽度。默认单位是twip,1twip=1/567cm。通常使用twip单位设置即可。例如:

    Form1.Height=2000      '设置Form1窗体的高度为2000twip
    Form1.Width=3000       '设置Form1窗体的宽度为3000twip
    

    Left和Top属性

    Left和Top属性用于设置窗体在屏幕中的位置,Left是指窗体左上角距离屏幕左边的距离,Top是指窗体左上角距离屏幕上边的距离。如果是其它控件,如Commmand1按钮,则其Left和Top表示控件在窗体中的位置。具体关系如下图所示。

    在这里插入图片描述

    Enabled属性
    Enabled属性用于设置窗体(包含窗体中的控件)是否可被用户操作。默认值为True可用,当设置为False时,则禁止用户对窗体进行操作。语法为:

    ![Form1.Enabled=True  '设置窗体Form1为允许操作](https://img-blog.csdnimg.cn/20200916095249986.png?x-oss-process=image/watermark,type_ZmFuZ3poZW5naGVpdGk,shadow_10,text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3dlaXhpbl8zOTQzMzI5Mw==,size_16,color_FFFFFF,t_70#pic_center)
    
    

    ForeColor和BackColor属性
    ForeColor属性为窗体显示文本的颜色,BackColor用于设置窗体背景颜色。设置颜色的方法有三种方法,以黑色为例:

    方法一:Form1.BackColor=vbBlack    
    方法二:Form1.BackColor=QBColor(0)  
    方法三:Form1.BackColor=RGB(0,0,0)
    

    方法一中,vbBlack在VB中是表示颜色的常量,代表黑色,类似的常量还有vbGreen绿色,vbBlue蓝色,vbYellow黄色,vbRed红色等。

    方法二中,QBColor(参数),其中参数范围是0-15之间的整数,代表不同的颜色,参数为0时代表黑色

    方法三中,RGB(参数1,参数2,参数3),参数1、2、3范围分别是0-255之间的整数。

    Icon属性

    Icon属性可以为窗体指定一个图片作为窗体左上角的显示图标,同时也作为显示在任务栏中的图标。图片格式必须为.ico格式。

    AutoRedraw属性

    该属性为False时,窗体在变动后(移动窗体、最大化最小化窗体、加载窗体等),用print方法打印的文本,将不会被自动重画,效果是窗体上用print方法打印的文本在窗体变动时将被清除。当设置为True时,使用print打印的文本会被自动重画,而不会被清除,或者说清除后又被重新打印了。此方法同样适用于在窗体上绘图。

    窗体常用事件

    Load事件

    Load事件是窗体的加载事件,当一个窗体被加载到内存时,会触发Load事件。可以利用Load事件,初始化窗体级的变量,设置控件的属性值。

    Unload事件

    当一个窗体从内存中卸载时,将触发Unload事件。

    Initialize事件

    Initialize事件为窗体初始化事件,当应用程序创建窗体实例时会发生该事件。对于窗体而言Initialize事件发生在窗体的Load事件之前。通常可以利用 Initialize事件初始化窗体所用数据。

    Activate事件

    当一个窗体变为活动窗体时,即当窗体获得焦点时,将会触发该事件。

    Deactivate事件

    与Activate事件相反,当窗体不再是活动窗体,即失去焦点时,将触发本事件。

    Click事件

    单击窗体时,触发此事件

    DbClick事件

    双击窗体时,触发本事件

    窗体常用方法

    Cls方法

    Cls方法用于清除窗体重利用print方法打印的文本,不会清除窗体中控件及控件内的文本。语法为:

    Form1.Cls    
    

    Show方法

    Show方法可以显示一个窗体,该窗体如果没有被加载到内存中,将会优先触发一次Load事件。使用Show方法后,窗体将会优先于其它窗体显示在最前面。语法为:

    Form1.Show
    

    Hide方法
    Hide方法用于隐藏一个窗体,仅将窗体隐藏起来,但是不会从内存中卸载,窗体上的参数仍然保存在内存中,使用Show方法重新显示窗体后,窗体与隐藏之前保持一致。语法为:

    Form1.Hide
    

    Load方法
    Load方法用来将窗体加载进内存,将会触发窗体的Load事件,但是窗体未被显示。该方法同样适用于其它控件。语法为:

    Load Form1
    

    Unload方法
    用来卸载窗体,将窗体所使用的参数从内存中卸载,包括窗体中的所有控件,卸载后,将不会再占用计算机内存资源。使用Unload方法后,窗体将会达到Hide方法的隐藏效果。该方法同样使用于其它控件。语法为:

    Unload Form1
    

    如何创建多窗体
    通常新建一个工程后,系统会为我们自动创建一个窗体,默认名称为Form1,此时当我们项目需要再创建一个窗体时,可以通过菜单栏——工程——添加窗体,在弹出的添加窗体窗口中,选择默认窗口,即可创建一个新的窗体。或者可以,在工程资源管理窗口中,在Form1窗体上右键——添加——添加窗体。
    在工程资源管理窗口中,双击窗体,即可进入该窗体的编辑界面。

    在这里插入图片描述

    删除窗体
    删除不需要的窗体,通过在工程资源窗口,选中需要删除的窗体,右键——移除。

    窗体实战练习题
    目标:通过本练习,基本掌握熟悉窗体属性、事件和方法的使用方法。

    步骤一:
    按照下图,建立两个窗体。并分别将Name名称属性修改为:frmLog和frmMain,并将窗体的Caption标题属性修改为“登录界面”和"主界面"

    在这里插入图片描述

    步骤二:
    在第一个窗体,frmLog窗体上,新建一个命令按钮,并将Caption属性修改为"登录"。

    在这里插入图片描述

    步骤三:
    双击登录按钮,在其事件过程中写入如下代码:

    frmMain.Show   '显示frmMain窗体
    Me.Enabled = False  '禁止frmLog窗体再被操作
    

    在这里插入图片描述

    Me代表当前窗体的名称,此处即frmLog,可以用frmLog代替。

    步骤四:
    在第二个窗体(frmMain)编辑窗口中,按照下图所示,建立1个Text文本框和5个命令按钮控件。

    在这里插入图片描述

    步骤五:
    进入frmMain窗体代码编辑窗口,按照下图在对应的事件过程下编写如下代码:

    在这里插入图片描述

    其中End语句,是退出应用程序,即该应用程序包含的所有窗体和控件将会全部从内存卸载。

    步骤六:
    运行程序,测试效果。单击窗体左移,窗体将向左移动,移动距离为text1文本框中的数值,同样的单击窗体右移,窗体将会右移。修改text1文本框数值为200,单击隐藏窗体,窗体被隐藏,在frmLog窗体中单击登录,frmMain窗体重新打开,且Text1文本框内的数值仍是200,单击卸载窗体,窗体被关闭,再次打开后,Text1文本框内数值变为初始值100,这就是hide与Unload方法的区别。单击退出按钮,整个应用程序被关闭。

    在这里插入图片描述

    好了,本节课程到此结束,相信大家通过本节课程,已经对于窗体有了一个全面且深刻的认识了。下节课我们再见吧。

    展开全文
  • 3、打开加载错误的窗体文件,并CTRL+A后CTRL+C复制全文。 4、在notepad++里点击菜单栏里的【编码】选项,选择【使用ANSI】编码。 5、CTRL+V将代码复制进“XXX.frm”后保存该文件。 6、运行VB6.0 IDE,选择“...

    1、新建一个文本文件,将文件名改为“XXX.frm”。

    2、用notepad++或其他可设置编码的文本编辑软件打开刚才创建的“XXX.frm”

    3、打开加载错误的窗体文件,并CTRL+A后CTRL+C复制全文。

    4、在notepad++里点击菜单栏里的【编码】选项,选择【使用ANSI】编码。

    5、CTRL+V将代码复制进“XXX.frm”后保存该文件。

    6、运行VB6.0 IDE,选择“XXX.frm”加载,即可正常加载为窗体。

     

    综上,此BUG可能是由字符编码问题导致。

    展开全文
  • 傍晚,很朋友都在朋友圈发文纪念。在《钢铁是怎样炼成的》中有句名言:“一个人的生命是应该这样度过的:当他回首往事的时候,不因虚度年华而悔恨,也不因碌碌无为而羞耻。“今天,我们从时间这个话题,带领大家来...
    VB中的时间知识 2e7ea9f0095ce22aba678c1bddc4de47.png

    大家好,今天是2020年2月29日。

    二月份是全年中最特殊的一个月份,因为这个要么是28天,要么是29天。今年是闰年,所以2月份有29天。傍晚,很多朋友都在朋友圈发文纪念。

    在《钢铁是怎样炼成的》中有句名言:“一个人的生命是应该这样度过的:当他回首往事的时候,不因虚度年华而悔恨,也不因碌碌无为而羞耻。“

    2e7ea9f0095ce22aba678c1bddc4de47.png

    今天,我们从时间这个话题,带领大家来学习VB编程中与时间有关的知识内容,并且写一下具体的程序,让大家真正把VB知识与实际联系起来。

    5b7203aa8b0576f331dca6bee0609333.png

    VB编程时间程序

    实际应用 1

    当用户单击”输入身份证号”按钮时,弹出输入输入框,接收用户输入的身份证信息后,从身份证号中提取相关信息并显示在指定控件上。

    程序实现过程分析:

    1、单击“输入身份证号”按钮,使用inputbox函数弹出以下对话框:

    身份证号=InputBox(对话框提示信息,标题,默认值)

    c8ee316ead808344bff926d35d200c0b.png

    当用户选择inputbox 的“确定”按钮时,执行身份证号判断操作。

    具体判断过程如下:

    当用户输入的身份证号不足18位时,使用msgbox函数,做出以下提示

    6fc42fa3e9c89212b0f1b210c693dfe4.png

    应用技巧:

    1 )检测身份证号长度使用 Len() 函数; 2 )使用 If选择 结构判断身份证号是否正确:    if   身份证号不足 18 位  then      msgbox 给出提示 else    在指定控件显示出生年月、性别以及年龄 End If

    3、当信息录入正确时,在指定控件显示出生年月、性别以及年龄。

    1) 在名为shengri的文本框中显示出生年月,出生年月为身份证号的第7-14位

    提示:使用mid函数

    2)在名为nianling的文本框中显示年龄

    提示:使用year(now())获得系统日期的年份,使用mid函数获取身份证中年份信息,相减可得年龄。

    3)在名为xingbie的文本框中显示性别:身份证的第17位为偶数则为“女”,奇数为“男”。

    提示:提取身份证第17位,放入整型变量x中,判断x的奇偶性(x mod 2=0 则 x为偶数,否则为奇数),由此可以决定性别

    4、保存工程文件和窗体文件。

    窗体界面设计

    2dfc1b1b802107a4e1ada6b5a79547b2.png

    987cf8e1ad2ce85667b766c27cbf7be2.png

    7c1205c6ed51de9e823a66a4ab6fa96c.png

    代码实现

    7c1205c6ed51de9e823a66a4ab6fa96c.png

    Private Sub Command1_Click() '输入身份证号

    Dim sfzh As String   '定义身份证号为字符类型,位数大,且最后一位存在X

    sfzh = InputBox("请输入18位身份证号", "身份证提取程序")  '输入对话框使用

    If Len(sfzh) < 18 Then

    MsgBox "身份证号输入错误,请重新输入!", vbOKOnly, "错误提醒"

    Else

    id = sfzh   '身份证号

    tiqu (sfzh)    '调用自定义tiqu过程

    End If

    End Sub

    Public Sub tiqu(sfzh As String)   '自定义过程

    Dim x As Integer

    shengri = Mid(sfzh, 7, 8)     ‘生日’

    nianling = Year(Now()) - Mid(sfzh, 7, 4)   '年龄

    x = Val(Mid(sfzh, 17, 1))

    If x Mod 2 = 0 Then

    xingbie = "女"

    Else

    xingbie = "男"     '性别

    End If

    End Sub

    实际运行图

    7f5aae0401fa3f308270bd76456e3a3d.png 185cae4ebf86d7a84f1e724d8144646b.png实际应用2

    请先看下面录制的程序运行视频

    程序运行界面如下图

    958704493924bbfb32373116aab98cbc.png

    程序代码如下

    '跟我学VB微信公众平台

    'VB大世界,跟我学VB。VB学习有问题,就找跟我学VB!

    Dim i As Integer

    Private Sub Command1_Click() '开始

    Timer1.Enabled = True

    End Sub

    Private Sub Command2_Click()  '暂停

    Timer1.Enabled = False

    End Sub

    Private Sub Form_Load()

    Rem 窗体装入时默认显示的笑脸

    Image1.Picture = LoadPicture(App.Path & "\1.jpg")

    End Sub

    Private Sub Timer1_Timer()

    Rem 定时器中定时触发的程序段

    If i = 3 Then  '当图片到达最后时,程序自动跳转到第一张图片再依次执行

    i = 1

    Else

    i = i + 1

    End If

    Image1.Picture = LoadPicture(App.Path & "\" & i & ".jpg")

    End Sub

    c36a5042e51489a726bb19830f817101.png

    本程序用到的核心控件--时钟控件。

    时钟控件具有两个非常重要的属性:Enabled和Interval 属性。

    通过Enabled属性可以控制程序是否执行计时器事件;

    通过Interval 属性可以设置时间间隔。

    当属性值小的时候,本程序可以做为幻灯片展示程序;

    当属性值大的时候,本程序则可以成为轮播图程序,结合单击事件,在不同的图片上写上相对应的事件处理过程,可以轻松实现类网站首页展示功能。

    d7c615ab66a20b2964f78788ef0fcd7c.gif

    大家在学习VB中有不懂之处,可以长按识别下图添加老师微信,学习问题在线答疑。

    1e6237ddce7725e55b88fff910efef7e.png

    6c1e0847589f792213c9f9b04c190d5f.png



    331984a22f82153cbebce6a86a89a42f.gif e68e7661cfa25ce7d8c67c41bc9890c1.png

    长按上图,关注跟我学VB公众平台

    更多VB知识,尽在跟我学VB

    展开全文
  • 28个目标文件 内容索引:JAVA源码,媒体网络,飞鸽传书 Java局域网通信——飞鸽传书源代码,大家都知道VB版、VC版还有Delphi版的飞鸽传书软件,但是Java版的确实不,因此这个Java文件传输实例不可错过,Java网络编程...
  • 一直都说的新教材还是没下来于是这个学年还是继续VB教学其实VB这个编程软件真的很老了已经好多好多年没有更新过了但是VB语法都是比较规范的它又是一个面象对象的编程软件所以比较适合学习编程的初学者那今天我们就...
  • VB绘图转存成位图文件,搜了次,资料甚少。仅见2处,代码还是错的。在其启发下,实践成功,分享。 代码中有详细的注释。同时对控件在窗体中的相对位置作了设置,可供参考。
  • vb.net 教程 3-11 窗体控件综合编程 2-1

    千次阅读 2017-06-13 22:04:47
    版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名...颜色对话框、打开文件对话框、保存文件对话框 具体参看下图: 菜单项设置: 文件菜单: 新建文件:新建一个rtf文档 载入文...
  • 【PC】自制QQ机器人(python+VB6)

    千次阅读 多人点赞 2019-08-28 17:21:43
    目前网上的那些QQ机器人都需要下载什么...VB6:1.定时获取QQ消息,也就是对方说了什么。2.定时发送来自python处理好的回答(txt文件格式)。3.对获取的QQ消息分析,既不能是对方上次发的消息(已经处理完并发送)也...
  • VB实现聊天程序中的文件传输-支持断点续传,此程序可以用来与对方互相收/发文件,支持断点续传和简单聊天功能.  使用方法分为两步:  1.任选一台PC建立主机,等待客户端连接  建立主机方法:让程序的IP输入框为空,...
  • VB 窗体实现文件拖拽获取路径方法

    千次阅读 2012-07-28 18:16:41
    窗体实现文件拖拽获取路径方法 ☆ VB :注册表的读写 ☆ vb 中空操作(等待)的指令、延时方法 ☆ VB 让控件可以当标题栏拖动 ☆ FSO 对象新建、打开、保存文件 ☆ 获取网关 IP 和 MAC 的 VB ...
  • Option Explicit On ...'窗体最大化定义 Private FormOldWidth As Long '原始宽度 Private FormOldHeight As Long '原始高度 Public Sub ResizeInit(FormName As Form) Dim Obj As Control FormOldWidth = ...
  • VB丢失的窗体找回来

    千次阅读 热门讨论 2015-07-23 15:27:00
    小编前言:在一次.exe病毒杀毒之后,做好的VB窗体在程序意外丢失,在文件中却依然还在,通过学习找到了原因和解决方法。  原因: 1.病毒是exe病毒,当程序生成.EXE文件后 会很容易被当成此病毒或因感染此病毒而被...
  • VB版抽奖1.zip

    2019-12-19 10:28:07
    简单的随机数字生成,加入了“重置”按钮,避免抽奖时重复人员的出现。 程序较为简单,页面并未进行过多的美化排版,需要者可以进行改进 本程序更面向初学VB者...本程序只保存窗体文件,并未保存完整的工程文件。)
  • VB文件拖放实现

    千次阅读 2017-02-21 11:02:54
    VB中,很控件都可以实现拖放功能。拖放功能有内部控件间的拖放和由程序外部对程序本身的拖放。 文件拖放应该使用OLEDragDrop事件,而不是DragDrop事件。 OLEDragDrop事件的语法如下: Private Sub object_...
  • vb.net—配置文件

    千次阅读 热门讨论 2015-04-26 19:29:51
    在敲vb.net版机房的时候往往会使用到配置文件,为什么呢?使用配置文件是不是能给我们带来好处呢?答案是肯定的。数据库连接字符串写在配置文件中,那么将来需要改动的时候,我们可以直接修改配置文件进行维护,而不...
  • VB讲课笔记11:多重窗体与环境...一、多重窗体应用程序一个VB工程里可以有窗体模块,那就涉及一个工程启动对象的问题。在VB里,可以将某个窗体设置为启动对象,也可以将标准模块里定义的Sub Main过程设置为启动...
  • VB.NET读取ini文件,有窗体Tab标签,滑动效果,界面美化等效果,集成在了一个程序中。本人新手,学习vb.net不久,前几天写了一个程序,觉得还可以,让新手借鉴,老手请直接飘过... (vb.net 2008 速成版编写,低版本...
  • 在用VB6.0的IDE环境编写程序时候,当保存自己编写的工程或者打开文件的时候,VB有自己的默认保存路径,此路径无法在IDE环境中修改。可以通过修改快捷方式的形式来改变默认的保存路径。
  • 使用vb.net语言编写的文本编辑界面窗体,可以实现对文字的编辑修改,希望大家可以学习交流下。
  • VB多窗体退出代码

    千次阅读 2012-04-15 09:32:34
    Private Sub Form_Unload(Cancel As Integer) Dim Frm As Form For Each Frm In Forms Unload Frm Set Frm = Nothing Next End Sub ★VB部分相关文章推荐:★ ...※VB 一个获得自己外网 IP 地址的程序...
  • 最难的问题 在于 控件数组 因为控件数组 下标 不定 比如三个TextBox 名为Text1的...做这件事最终目的 其实是想保存窗体上所有控件的值到一个ini文件 就是数组控件这里遇到了难题,请各位帮帮忙,看看有什么方法没
  • vb打开并重新保存EXCEL文件

    千次阅读 2007-08-01 15:43:00
    使用以下代码可实现打开并重新保存EXCEL文件,从而解决从程序导出的EXCEL文件格式不能被ADO访问的问题,据实验,光是处理一个文件的话需要5秒钟左右,但若批量一起处理的话能缩短到1秒/文件左右. ************下载来的...
  • 内容索引:VB源码,系统相关,串口 一个基于RS232串口的调试工具,模仿超级终端风格,具备MDI启动画面的动画窗体,程序可非常容易的读取和写入端口,发送支持ASCII字符模式,可以打开二进制文件以16进制格式显示发送。...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 9,462
精华内容 3,784
关键字:

vb保存多窗体文件