精华内容
下载资源
问答
  • 想用VB实现图上按钮的自动点击,实际,鼠标移动有字的按钮上点击,就可以执行相应的程序。已取得网页源代码,但没有“input"、也没有”button",不知道该怎么,请教大佬们。 网页代码如下: ``` <HEAD><TITLE...
  • vb贪食蛇源代码

    2012-04-21 16:52:54
    vb小游戏定义蛇运动速度枚举值 Private Enum tpsSpeed QUICKLY = 0 SLOWLY = 1 End Enum '定义蛇运动方向枚举值 Private Enum tpsDirection D_UP = 38 D_DOWN = 40 D_LEFT = 37 D_RIGHT = 39 End Enum '...
  • VB模拟鼠标左键单击和移动,单击按钮后,鼠标会移动到正中间,产生向上或向下滚动鼠标滚轮事件,如果鼠标在其他应用程序窗口之上,获取鼠标下窗口中的鼠标句柄,并且代码中有一个键盘函数很实用哦。
  • VB编程大赛:求圆弧相交点代码 这是一个求两圆弧相交点程序。界面有图区,操作及显示区。操作分为两个步骤: 1· 创建圆弧" 。 点击“创建圆槐按钮,可进入创建圆弧工作状态。进入创建圆弧工作状态以后,光标...
  • 本源码向你展示了制作悬浮窗口方法和完整实例代码,这个悬浮窗口显示于其它窗口最顶层,不被遮挡,窗口中的按钮可调用出对应操作菜单,和现在搜狐输入法窗口十分相似,本源码是VB6代码,非VB.NET。...
  • 通过在窗体布局窗口中移动窗体所设置位置在分辨率改变后就会发生错位现象,也就是程序启动后窗体所在屏幕位置并不是此时所设置位置。通过右击窗体布局窗口在弹出菜单中选择“分辨率向导”命令,可以更加...
  • 由Timer所引发的VB动画

    千次阅读 2012-01-28 20:49:37
    这就是VB中动画实现方法。滚动字幕、喷泉、飞翔小鸟、交通红绿灯等就可以用VB做出来了。其实道理明白了,写代码很简单,会用到command按钮或选择结构来控制图片显示和隐藏, 其中有一点细节

        将TimerInterval属性设置一定时间间隔,Timer便每隔一定时间产生一次动作。若在屏幕上快速地显示一组相关的图像,就实现了动画。因此,实现动画的基础是图像的显示和使图像快速、定时地移动和变化。这就是VB中动画的实现方法。滚动字幕、喷泉、飞翔的小鸟、交通红绿灯等就可以用VB做出来了。其实道理明白了,写代码很简单,会用到command按钮或选择结构来控制图片的显示和隐藏, 其中有一点细节问题,就是说这样的动画其实可以根据image是否移动分为两种,写代码时需要稍微思索一下。
    例题中“喷泉”的部分代码是这样写的:

    PrivateSub Form_Load()

    Image2.Left= (Frm1.Width - Image2.Left) / 2

    Image2.Top= (Frm1.ScaleHeight - Image2.Height) / 2

    End Sub

    初始化完成后,image2位置不变,每隔一定时间赋值给image2一张图片

    SelectCase i

     Case 0

      Image2.Picture = Image1(1).Picture

      Image1(1).Left = Image2.Left

      Image1(1).Top = Image2.Top

     Case 1

      Image2.Picture = Image1(2).Picture

      Image1(2).Left = Image2.Left

      Image1(2).Top = Image2.Top

      ……

    我自己写的时候每种情况下都没有写下面这两句:

      Image1(1).Left = Image2.Left

      Image1(1).Top = Image2.Top

    是因为觉得没有写的必要,image2的位置既然已经在初始化的时候固定了,就没有必要再写那么多行这个了。后来看到后面才发现,前面这样写是为了和后面对比,突出image位置有变动时的情形下代码如何写。
    比如“飞翔的小鸟”部分代码:

    PrivateSub Form_Load()

    Image2.Left= 0

    Image2.Top= (Form1.ScaleHeight - Image2.Height) / 2

    End Sub

    初始化完成后多次对image位置进行判断

    IfImage2.Left < Form1.Width Then

      Image2.Left = Image2.Left + 50

    Else

      Image2.Left = 0

    End If

    之后再没有写image2位置的代码的必要了

    SelectCase i

      Case 0

       Image2.Picture = Image1(1).Picture

      Case 1

       Image2.Picture = Image1(2).Picture

    动画实现的思想会被广泛应用的。

    展开全文
  • VB试题.doc

    2012-12-15 21:16:57
    9、为使某窗口的命令按钮“取消(C)”具有如下特性:按“Alt+C”键或按 “ESC” 键,均可代替用鼠标单击该按钮的操作,应设置该按钮的Caption属性值为_取消(&C)___,并且设置其_ Cancel__属性值为__ True__。...
  • 另外,我新加了一种Graphic按钮类型,该类型按钮显示4个图片:通常状态图片、按下图片、鼠标移动按钮上时图片、Disable时图片,并且在这种类型下,没有按钮边框,可以让开发人员轻松灵活地制作各种按钮效果。...
  • 4.1.4 移动没有标题栏窗体 4.2 改变窗体形状 4.2.1 圆形或椭圆形窗体 4.2.2 多边形窗体 4.3 浮动窗体与透明窗体 4.3.1 浮动窗体 4.3.2 透明窗体 4.4 动态打开和关闭窗口 第5章Windows消息系统 5.1 基本...
  • VB编程资源大全

    2007-10-17 20:47:23
    useanicursor.zip 在VB中使用Ani光标(6KB) 94,maxmin1.zip 控制窗口尺寸1(6KB) 95,maxmin2.zip 控制窗口尺寸2(8KB) 96,dissysmenu.zip 将任务栏关闭按钮设为无效(6KB) 97,hidemenu....
  • VB侧边栏分类菜单控件

    热门讨论 2009-04-29 04:20:59
    一款不错侧边栏分类菜单控件(LeftMenu),该控件改版后支持菜单按钮上下移动,支持代码动态插入菜单按钮及菜单,支持ImageList配合使用。定义菜单时仅在InitializeLeftMenu过程加载分级菜单。
  • 5、怎样把关于Command命令按钮的Enabled属性的帮助示例代码复制到你的代码窗口?已知帮助中的代码如下: Private Sub Form_Load() Text1.Text = ”” ‘消除文本框的内容 Command1.Caption = “Save” ‘在按钮上...
  • vb捕获键盘按键和鼠标坐标位置,监测鼠标的位置和鼠标按键的名称,如窗体所示,随意移动鼠标,即可适时显示出鼠标坐标,若敲击键盘,则会获取到哪一个键被按下,两个功能的代码写在按钮事件,获取鼠标XY坐标位置:...
  • ASP.NET网页代码模型及生命周期

    热门讨论 2009-07-28 14:22:11
    代码隐藏页模型与单文件页模型不同的是,代码隐藏页模型将事物处理代码都存放在cs文件,当ASP.NET网页运行的时候,ASP.NET类生成时会先处理cs文件中的代码,再处理.aspx页面中的代码。这种过程被成为代码分离。 ...
  • (22KB) 87,flatcom.zip 平面控件组 - 有六个全平面控件(包括平面按钮、进度条、移动条、COMLIST、窗体移动栏)(42KB) 88,toolbox.zip 自编类似VB工具箱控件(217KB) 89,shape1.zip 任意形状...
  • (22KB) 87,flatcom.zip 平面控件组 - 有六个全平面控件(包括平面按钮、进度条、移动条、COMLIST、窗体移动栏)(42KB) 88,toolbox.zip 自编类似VB工具箱控件(217KB) 89,shape1.zip 任意形状...
  • 包括移动、限制隐藏等功能(4KB) 43,cpu.zip 监视 CPU 使用情况例子(4KB) 44,cdfind.zip 找出系统光驱盘符(3KB) 45,up.zip 数字大写转换程序(4KB) 46,ktext.zip VB编程突破64K...
  • 同一般图形菜单不同,通过该程序建立菜单当光标移动到菜单项上时,该项一样可以象Word97菜单项一样突出显示(11KB) 23,traybar.zip 一个可以隐藏任务栏(Traybar)上开始按钮、Switch Bar、快速启动按钮、...
  • 07_VB6基本控件

    千次阅读 2005-10-22 22:37:00
    如很多控件所拥有的Move方法,使用此方法就可以将控件的位置移动,下面我们打开上面的例子,在Form1窗体上新建一个按钮,将键入如下的代码:Text1.Move 0, 0从代码我们可以看到使用控件方法的形式与使用属性相似,...

    一. 基本控件的使用

    1 控件的共性

    使用一个控件的属性时,应采用“控件名.属性”的形式。

    有时我们还可以使用控件中定义的一些子程序或函数,而这些过程我们称为控件的方法。如很多控件所拥有的Move方法,使用此方法就可以将控件的位置移动,下面我们打开上面的例子,在Form1窗体上新建一个按钮,将键入如下的代码:

    Text1.Move 0, 0

    从代码中我们可以看到使用控件方法的形式与使用属性相似,不同的是方法不能设置值,而且在使用中可以有参数。

    在单击此按钮后,看看前面我们用于输入加数一的文本框是不是移动到了窗体的左上角。

    在键入代码的时候,我们可以看到Move方法的参数提示,第一个就是控件离窗体左边界的距离,第二个参数是控件离窗体顶部的距离,第三和第四个参数则可以重新设置控件的宽度和高度。这里可以注意到后三个参数使用中括号括了起来,这说明它们是可选的。

     

    还要说明一下的是,在Visual BASIC 6中使用的默认单位是缇(Twip),而1像素约等于15缇,也就是说,如果要定义控件的长为120像素,宽为24像素,则要分别将值设置为1800和360。在真正的软件开发中,我们应该注意软件界面风格的一致性,那时就要精确设置控件的位置和尺寸了。

    在控件的使用中,我们使用了属性和方法,而对于控件还有一项很重要的就是“事件”。对于控件的某个事件,可以理解为“当什么发生时要做的事情”,看一下上面的按钮响应代码的子程序:

    Private Sub Command1_Click()

        Text1.Move 0, 0

    End Sub

    Sub关键字后面,我们看到了子程序名称为“Command1_Click”,而在下划线前面一部分不就正是这个按钮的名称Command1吗。而下划线后面的Click就指明了这是Click事件,意为“当单击Command1按钮时要做的事情”,我们在这个子程序里要做的就是移动Text1的位置。而一个控件的事件过程定义格式就是“控件名称_事件名(参数列表)”

    在操作中我们还可能用到很多的事件,这些事件在代码窗口右上列表中可以看到,并且在选择后,这时开发环境会自动创建一个子程序,我们只需要键入代码就可以了,如我们还以Command1按钮为例(如果当前代码中不是Command1按钮,则在代码窗口左上列表中选择它),然后在右边列表中选择MouseUp事件,编写如下代码:

    Private Sub Command7_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

        MsgBox "在此按钮上松开了鼠标!"

    End Sub

    运行程序,然后在Command1按钮无论您按下并松开鼠标的哪个键,都会出现一个信息窗口,这里我们设置的就是当鼠标按键松开时发生的事件。

     

    除了控件的三个特征以外,还有一项比较重要,那就是控件的Name属性,即控件名称,在一个窗体中不能有同名的控件。此外,在Visual BASIC 6的一个项目中,一个窗体、一个模块、一个类等其它对象都会有一个在工程中唯一的标识名称。

     

    下面我们介绍的控件和要自己创建的控件都会从属性、方法、事件这三个方面入手。

    2 窗体(Form)

    窗体严格来讲不属于控件,但它也拥有属性、方法、事件,而且使用控件时又少不了它,所以我们还是先来看看窗体的基本特征和使用方法。

    首先,我们可以通过Caption属性来设置窗体的标题内容,如Form1.Caption=这是第一个窗体

    在模块中我们使用了Show方法来显示一个窗体。

    而在窗体的Load事件中,我们还可以对窗体中的一些设置进行初始化,如我们可以在Form1的Load事件中设置窗体标题为打开的时间,代码如下:

    Private Sub Form_Load()

        Form1.Caption = CStr(Now)

    End Sub

    其中使用的Now函数将返回当前完整的日期及时间,我们使用CStr函数将时间转成字符串显示在窗口的标题上。

    在关闭此窗口时,我们可以单击右上角的关闭按钮,如果我们要通过自己的按钮关闭窗口应该怎么操作呢,可以在窗体上某个按钮的执行代码中使用“Unload Form1”语句来关闭Form1窗口,而在其它窗口则将Form1该为相应的名称即可。

    窗体的使用我们就先简单的介绍到这里,下面就开始介绍窗体上其它控件的使用。

    3 标签(Label)

    标签常用的有Caption和AutoSize两个属性,其中Caption确定了标签中显示的内容,而AutoSize属性则说明标签是否自动根据其内容调整尺寸。

    4 文本框(TextBox)

    (1) 属性

    Text:前面我们已经多次用到,就是指定文本框内显示的内容,这和标签的Caption相似。

    Locked:是否锁定。当设置为True时,用户不能在此文本框中输入内容。默认为False。

    MaxLength:设置可以输入字符最大数,如设置为0则不限制输入长度,这也是默认值。

    PasswordChar:此属性可以设置为一个字符,当输入字符时,此文本框只会显示这里设置的字符,从而提高输入内容的安全性,常常在密码框中使用此属性。

    BackColor:设置文本框中的背景颜色。这是一个Long类型的数值。

    ForeColor:设置文本框中文字的颜色。

    下面介绍的几种属性几乎每一个控件都有,在此介绍后,后面的控件将不再介绍这些属性,大家可以在使用中熟悉。

    Top、Left、Width、Height:分别设置文本框距容器顶部距离,距容器左边距离以及自身的宽度和高度。这四个属性确定了控件的位置和尺寸。

    Visible:只在运行时有效,当设置为True时,控件是可见的,而设置为False时,用户将看不到这个控件。

    Enabled:只在运行时有效,当设置为True时,用户可以对此控件进行操作;设置为False时则不能使用这个控件,如单击按钮,在文本框中输入文字等。

    (2) 方法

    Move:上面我们已经使用过,通过它可以改变控件的位置和尺寸。

    SetFocus:将此控件设置为正在操作的控件,即将焦点转移到这个控件。对于文本框,如果Enabled和Visible属性都不是False,则使用此方法后,我们可以看到光标会在此文本框中闪烁。

    (3) 事件

    Change:当文本框内容变化时产生的事件。这里我们可以编写代码让Text2的内容与Text1的内容同步,双击Text1,这里我们会发现这个事件就是文本框的默认事件,然后在此事件中编写代码“Text2.Text=Text1.Text”,然后运行程序,在Text1中输入字符时,Text2的内容也会同时改变。

    GotFocus:当控件得到可操作焦点时产生的事件。

    LostFocus:当焦点从此控件中移出时产生的事件。

    5 按钮(CommandButton)

    在例子中我们也常用到按钮,它的常用属性、方法与事件如下。

    (1) 属性

    Caption:设置按钮上显示的文本,这个属性非常有用,这些文本可以很明显的标出按钮的用途是什么。

    其次按钮中最常用的属性就Enabled了,它用于按钮是否有效,即是否可以使用。

    (2) 方法

    按钮中没有常用的方法。

    (3) 事件

    Click:这是指单出此按钮时的事件,也是最常用的一个按钮事件。

    6 列表(ListBox)和下拉列表(ComboBox)

    列表和下拉列表在选项较固定时非常有用,如需要输入性别时,就只有“男”和“女”,使用下拉列表是能很方便提供给用户来选择这两项。

    列表和下拉列表的使用方法比较接近,下面我们先使用下拉列表来说明一下。

    (1) 属性

    Text:即下拉列表中当前显示的文本。

    (2) 方法

    AddItem:用于添加列表项,如Combo1.AddItem

    Clear:清除列表中的内容,包括显示的文本。

    对于这两个方法,我们可以在示例程序中新建一个窗体来进行演示,在工程中打开窗体并添加一个下拉列表和两下按钮,分别将它们的Caption属性改成“添加项目”和“清除项目”:

     

    然后在“添加项目”按钮的Click事件中添加以下代码:

    Private Sub Command1_Click()

    '添加项目

        With Combo1

            .Clear

            .AddItem "男"

            .AddItem "女"

        End With

    End Sub

    在“清除项目”按钮的Click事件中添加以下代码:

    Private Sub Command2_Click()

        Combo1.Clear

    End Sub

    设置Form3窗体为启动对象,然后运行程序。分别单击这两个按钮,然后看看下拉列表中有什么变化。

     

    在添加项目的代码中,我们用到了一个新的语句With,它的格式如下:

    With 对象名

       

    End With

    在上面的代码里我们可以发现在With和End With之间的代码,我们省略了Cobmo1控件的名称,而直接调用了方法Clear和AddItem;也就是说在With语句块中不用重复键入对象名称,从而简化了代码编写工作。

    (3) 事件

    Change:当输入文本内容时触发的事件。

    Click:用户使用鼠标在列表中选择一项后触发的事件。

    使用下拉列表还有一个小技巧,如果想让用户只能在列表中选择,可以在下拉列表的Change事件中添加以下代码:

    下拉列表控件名.Text=””

    如:Combo1.Text=””

    这样,当用户输入内容时,下拉列表的文本总是空字符串。

     

    上面是以下拉列表为例说明的,而列表中的Clear和AddItem方法与下拉列表的用法是一样的,所不同是,列表中的Text属性表明的为当前选中的项目文本,并且列表中没有Change事件。

    7 图片(Image)

    图片(Image)控件用于显示图片,它有两个较重要的属性Picture和Stretch。

    其中Picture属性用于设置控件中要显示的图片,它的设置需要用到一个系统函数LoadPicture,这个函数的格式如下:

    LoadPicture([filename], [size], [colordepth],[x,y])

    其中:

    部分

    描述

    filename

    字符串表达式指定一个文件名。可以包括文件夹和驱动器。如果未指定文件名,LoadPicture 清除图象。

    size

    可选变体。如果 filename 是光标或图标文件,指定想要的图象大小。

    colordepth

    可选变体。如果 filename 是一个光标或图标文件,指定想要的颜色深度。

    x

    可选变体,如果使用 y ,则必须使用。如果 filename 是一个光标或图标文件,指定想要的宽度。在包含多个独立图象的文件中,如果那样大小的图象不能得到时,则使用可能的最好匹配。只有当 colordepth 设为 vbLPCustom 时,才使用X 和 Y值。For icon files 255 is the maximum possible value

    y

    可选变体,如果使用 x, 则必须使用。如果 filename 是一个光标或图标文件,指定想要的高度。在包含多个独立图象的文件中,如果那样大小的图象不能得到时,则使用可能的最好匹配。For icon files 255 is the maximum possible value

    这个函数我们一般常用的就是第一个参数,用来指定要显示的图片文件,如:

    Private Sub Command3_Click()

        Dim strImageFile As String

        strImageFile = "c:/windows/Coffee Bean.bmp"

        Image1.Picture = LoadPicture(strImageFile)

    End Sub

    上面代码需要在窗口中新建一个图片控件和一个按钮,然后在按钮的Click事件中书写代码,运行代码,如果文件存在则会在Image1中显示,如果图片不存在则会报错,其中strImageFile字符串变量设置了图片的完整路径与文件名,这里大家可以根据实际情况修改它。

    如果要清除图片,则可以使用以下代码:

    Image1.Picture=LoadPicture

    这里函数LoadPicture不使用任何参数。

     

    Stretch属性用于指定图片是否自动改变大小来适应控件的尺寸。设置为True时,图片会拉伸或缩小到和控件尺寸一样大,而设置为False时,控件就会改变尺寸和图片一样大,默认值为False。

    8 图片容器(PictureBox)

    PictureBox控件的属性Picture的使用方法和图片控件一样,都是使用LoadPicture函数来显示和清除图片。而PictureBox控件没有Stretch属性,相似的属性是AutoSize,但它们之间又有区别,AutoSize属性只用于设置控件是否自动改变尺寸,如果为True,则PictureBox的大小会和图片的实际大小一样,默认为False,这时如果图片的尺寸小于控件尺寸,则图片不能完全覆盖控件。

    除了属性设置上的关系以外,PictureBox控件和Image控件在使用时功能也不太一样,Image控件的主要功能就是显示图片,而PictureBox控件显示图片只是做为背景,在控件里还可以放置其它控件,这对于界面设计时的控件分组很有用处。

    说明到控件在窗体上的分组,在开始的示例中我们已经接触过,那就是使用框架(Frame)控件。

    9 框架(Frame)

    框架的功能就是进行控件的分组,在前面我就使用过,而对于框架控件最常用的属性就是Caption,即设置在左上角显示的文本,我们可以在此说明这个框架内控件的主要功能。

    如果将框架的Caption属性设置为空串,则只显示一个矩形框。

     

    对于PictureBox和Frame等可以做为容器的控件,在其内部控件的位置是相对于这些容器控件而不是相对于窗体的,在设计时请注意这一点。

    10 多选项(CheckBox)

    多选项一般用于可以同时选择多个选项的地方,如我们在设置字体时“删除线”和“下划线”就属于多选项。

    在我们的程序中,设置CheckBox控件的Caption属性值可以改变它的文本标签。

     

    如何来判断CheckBox是否被选中了呢,这里我们可以使用Value属性,这个属性有三种可能的值,它们是:

    设置值

    常数

    说明

    Unchecked

    0

    vbUnchecked

    没有选中

    Checked

    1

    vbChecked

    选中

    Unavailable

    2

    vbGrayed

    变灰,不可操作,并且是已选中状态。

    常用的有0和1,调用时可直接使用数值。

    11 单选按钮(OptionButton)

    单选按钮用于在一组选项中只能有一个被选中的地方。同CheckBox一样,可以设置Caption属性来指定控件的文本,而OptionButton控件的Value属性则是Boolean类型的值,当单选按钮选中时为True,否则为False。

     

    除了以上介绍的常用控件以外,Visual BASIC 6还有一些其它控件,我们可以载入系统控件或第三方控件来使用,并且还可以根据实际需要自己动手创建一些控件。在后面的操作中我们用到时会详细介绍。

     

    展开全文
  • VB.NET 入门经典 (第三版)

    热门讨论 2009-07-29 16:56:26
    在介绍完创建应用程序基础知识后(如创建窗口和对话框,如何用代码处理突发事件,什么是面向对象程序设计,以及如何在应用程序使用它等)。 目录: 第1章 初识Visual Basic .NET 1 1.1 Windows和DOS编程 1 1.2...
  • 在介绍完创建应用程序基础知识后(如创建窗口和对话框,如何用代码处理突发事件,什么是面向对象程序设计,以及如何在应用程序使用它等)。 目录: 第1章 初识Visual Basic .NET 1 1.1 Windows和DOS编程 1 1.2...
  • 在介绍完创建应用程序基础知识后(如创建窗口和对话框,如何用代码处理突发事件,什么是面向对象程序设计,以及如何在应用程序使用它等)。 目录: 第1章 初识Visual Basic .NET 1 1.1 Windows和DOS编程 1 1.2...
  • Java局域网通信——飞鸽传书源代码 28个目标文件 内容索引:JAVA源码,媒体网络,飞鸽传书 Java局域网通信——飞鸽传书源代码,大家都知道VB版、VC版还有Delphi版飞鸽传书软件,但是Java版确实不多,因此这个Java...
  • 实例7 透明的按钮  实例8 会动窗体  实例9 调色程序  实例10 窗体分割条  实例11 自动完成文本框文本输入  实例12 控制窗体系统菜单和按钮  实例13 产生Windows任务栏  实例14 自动隐藏菜单  ...
  • 在本程序,本模块和其他模块之间没有什么联系,主要是为了完善论文结构,并将一些预测方法在程序得以体现,能用到一些预测方法有:一元线性回归、二元线性回归、移动平均法、指数平滑法。 对市场分析得到...
  • 本书延续了Ivor Horton讲解编程语言独特方法,从中读者可以学习Visual C++ 2005基础知识,并全面掌握在MFC和Windows Forms访问数据源技术。此外,本书各章后面习题将有助于读者温故而知新,并尽快成为C++...
  •  标题为“Unit1.PAS”的代码编辑窗口。刚启动时这一窗口的大部分被“Form1”窗体所掩盖。将“Form1”窗体移开,或单击Form1窗体下方的状态行,可以使其全部可见。在“Form1”窗体的任意可见位置单击鼠标,可以恢复...

空空如也

空空如也

1 2 3 4
收藏数 69
精华内容 27
关键字:

vb中移动按钮的代码