精华内容
下载资源
问答
  • vb窗体程序设计实例

    千次阅读 2015-01-03 20:03:00
    窗体1:两个标签,两个文本框,两个按钮。窗体2:一个文本框 窗体1代码 窗口名称Form1,标签1,2分别为Lbl1,Lbl2,确定,取消按钮为,cmd1,cmd2,用户名文本框和密码文本框为txt1,txt2 Private Sub Cmd1_...

    实现功能

    用户密码验证登录,按键识别。

    窗体1:两个标签,两个文本框,两个按钮。窗体2:一个文本框


    窗体1代码
    窗口名称Form1,标签1,2分别为Lbl1,Lbl2,确定,取消按钮为,cmd1,cmd2,用户名文本框和密码文本框为txt1,txt2
    Private Sub Cmd1_Click() '确定按钮鼠标单击事件代码
     If txt1.Text = "user" Then '若用户名文本框输入正确
        Txt2.SetFocus '密码文本框激活
     ElseIf txt1.Text <> "user" Then '若用户名文本框输入不正确
         MsgBox "请输入正确的用户名!", vbOKOnly + vbInformation, "注意" '显示警告窗口
     End If
     If Txt2.Text = "123456" Then '若密码文本框输入正确
       Form1.Hide '窗体1隐藏
       Form2.Show '窗体2显示
    ElseIf Txt2.Text <> "123456" Then '若密码文本框输入不正确
       MsgBox "请输入正确的密码!", vbOKOnly + vbInformation, "注意" '显示警告窗口
     End If
    End Sub
    Private Sub Cmd2_Click() '取消按钮鼠标单击事件代码
      End '退出程序
    End Sub
    Private Sub Form_Load() '窗体1加载事件代码
      Form2.Show '窗体2显示
      Form1.Show 1 '窗体1为模式窗体,即始终位于窗体2前面
    End Sub
    
    
    窗体2代码

    窗体2窗体名称Form2,文本框名称Txt
    Private Sub Form_Click() '窗体2的鼠标单击事件代码
      Form2.BackColor = RGB(0, 255, 0) '将窗体2的背景色设置为绿色
    End Sub
    
    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) '窗体2的KeyDown事件代码
      Dim ShiftDown, AltDown, CtrlDown '定义变量
      Dim Txt As String '定义变量
      ShiftDown = (Shift And vbShiftMask) > 0 '
      AltDown = (Shift And vbAltMask) > 0 '
      CtrlDown = (Shift And vbCtrlMask) > 0 '
      If KeyCode >= 48 And KeyCode <= 105 Then '设置键代码范围以显示字母和数字
         If ShiftDown And AltDown And CtrlDown Then '若Shift、Alt、Ctrl键被同时按下
            Txt = "Shif+Alt+Ctrl" '为Txt赋值
         ElseIf ShiftDown And AltDown Then '若Shift、Alt键被同时按下
            Txt = "Shif+Alt" '为Txt赋值
         ElseIf ShiftDown And CtrlDown Then '若Shift、Ctrl键被同时按下
            Txt = "Shif+Ctrl" '为Txt赋值
         ElseIf CtrltDown And AltDown Then '若Alt、Ctrl键被同时按下
            Txt = "Ctrl+Alt" '为Txt赋值
         ElseIf ShiftDown Then '若Shift键被同时按下
            Txt = "Shif" '为Txt赋值
         ElseIf AltDown Then '若Alt键被同时按下
            Txt = "Alt" '为Txt赋值
         ElseIf CtrlDown Then '若Ctrl键被同时按下
            Txt = "Ctrl" '为Txt赋值
         ElseIf Shift = 0 Then '若三键均未被按下
            Txt = "" '为Txt赋值
         End If
         Txt = Txt + Chr(KeyCode) '为Txt赋值为键代码对应的字符
         txt1.Text = "您按下了" + Txt '显示用户按下的键
      End If
    End Sub
    
    Private Sub Form_Load() '窗体2装载事件代码
    Form2.KeyPreview = True '允许窗体响应键盘事件
    txt1.Text = "" '设置标签的属性
    End Sub
    
    Private Sub Form_Resize() '窗体Resize事件代码
      txt1.Move Form1.Width / 2 - 800, Form1.Height / 2 - 400, 1600, 400 '设置标签的位置
    End Sub






















    展开全文
  • 多重窗体VB实例

    2012-08-09 18:44:00
    摘要:VB源码,界面编程,多重窗体  多重窗体VB实例,点击后打开子窗口,父窗体消失,在子窗体中点击返回后,主窗体恢复显示,多重窗体VB或其它的Windows编程中应用广泛,这是一个很好的参考范例。
  • VB二级\分章节考题\第十三章 多窗体程序设计(考题).
  • 主要介绍了vs2019 下用 vb.net编写窗体程序连接 mongodb4.2,本文通过实例代码给大家介绍的非常详细,对大家的学习或工作具有一定的参考借鉴价值,需要的朋友可以参考下
  • vb练习题,电子版第13章多窗体程序设计.pdf
  • 一个漂亮的VB窗体界面,可把本代码中用到的美化技巧,应用到你的VB项目中,相信会给您的程序增色不少。虽然示例只是一个蓝色的登录界面,但理解了原理,就可以派生出很窗体来。
  • VB程序设计窗体的设计PPT课件.pptx
  • VB编写的应用程序窗体内运行的工具,可以作为简易沙盒,防止程序全屏。但不保证所有程序都能运行或稳定运行。本程序仅作为VB实例参考,用于个人使用、学习研究,不得作商业用途。
  • VB实现窗口打开子窗体并控制其背景颜色,类似于一个控件台与子窗口的对话,在控制台窗体中,可打开一个新的VB窗体,通过控制台可对子窗体的背景色进行控制,适时变换为红、黄、绿三种颜色,并通过控制台关闭这个...
  • vb程序设计实例100

    热门讨论 2012-09-05 10:10:51
    100个vb程序设计实例,vb学习从简单开始,
  • vb程序设计

    2018-05-30 09:55:36
    学习VB的可以好好看看,特别是初学者,收益还是挺大的
  • vb程序设计教程潘蕾第二章窗体设计1.ppt
  • 第一节 测绘程序设计的意义 第二节 程序设计语言的发展 第三节 测绘程序设计语言的选择 第四节 Visual Basic集成开发环境介绍 第五节 可视化编程的基本概念 第六节 可视化编程的一般步骤 程序示例1:MDI窗体...
    展开全文
  • vb课件第二章 界面设计主要内容 掌握窗体的常用属性、事件和方法 掌握文本框、标签、命令按钮、列表框、 组合框、图片框、单选按钮和复选框的常 用属性、事件和方法 掌握菜单的制作 了解
  • 该项目是设计开发一个文档文本编辑器。在文本编辑器、图像处理这样的应用软件中...这种需要在一个窗体中同时包含个子窗体的应用程序通常称为文档(MDI)应用程序,子窗体之间可以进行数据交互,也可以互不相干。
  • vb圆角窗体实现,vb异型窗体的实现,有代码和程序
  • VB 程序设计报告.doc

    2020-12-01 00:07:30
    VB 程序设计报告 设计题目科学型简单计算器 程序简介 窗体出现后为一个科学型简单计算器可实现简单的加减乘除运算具有清零及退出功能 程序用到的主要控件 窗体form文本框textbox,命令按钮command button 程序用到的...
  • VB程序设计菜单对话框及多重窗体PPT教案学习.pptx
  • 你必须掌握的VB窗体知识

    千次阅读 2020-09-16 09:55:57
    程序设计阶段,窗体是程序员的“工作台”,程序员在窗体上建立应用程序界面,在运行程序时,窗体是用户与计算机的交互界面。 窗体VB中一类重要的对象,作为对象,窗体同样具有自己的三要素:属性、事件和方法。...

    窗体的概念

    在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方法的区别。单击退出按钮,整个应用程序被关闭。

    在这里插入图片描述

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

    展开全文
  • VB窗体控件设计登录注册页面

    千次阅读 2020-08-16 13:36:41
    VB窗体控件设计登录注册页面 界面如下 代码如下 Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load End Sub Private Sub Button3_Click(sender As Object, e As ...

    VB窗体控件设计登录注册页面

    界面如下
    在这里插入图片描述

    代码如下

    Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    
    End Sub
    
    
    '登录
    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    
        Dim myconnect As New SqlClient.SqlConnection
        Dim mycommand As New SqlClient.SqlCommand
        Dim myread As SqlClient.SqlDataReader = Nothing
        Dim mytable As New DataTable()
        myconnect.ConnectionString = "server=127.0.0.1;database=master;integrated security=true;uid=chk;pwd=chk123456"
        myconnect.Open()        '打开数据库
        '设置命令属性
        mycommand.Connection = myconnect
        mycommand.CommandType = CommandType.Text
    
        Dim name As String
        Dim password As String
        name = Me.TextBox1.Text
        password = Me.TextBox2.Text
    
        mycommand.CommandText = "select * from test w
    展开全文
  • VB 6.0中灵活设置窗体加载的位置和窗体大小
  • VB简易密码登录窗体设计

    千次阅读 2018-04-19 15:35:57
    先上成品: 制作过程: 1.先创建控件: 我创建了5个控件,其中一个用于...只要理解了你可以根据自己需要进行修改,例如:密码隐藏符号可以改为其他,如:‘#’,也可以添加个密码,甚至输入不同密码来实现不同功能
  • VB程序设计练习题(一)

    千次阅读 2021-05-09 13:48:34
    VB程序设计练习题(一) 文章目录 目录 前言 内容 1、十进制转二进制数 2、程序实现功能:小明过年要给他的40位同学各寄一张贺卡,贺卡的价格有3元、2元和1元三种,他一共有100元,怎样购买正好把钱用完。把...
  • vb.net用户界面设计

    2015-09-03 12:44:48
    vb.net用户界面设计程序代码压缩包,仅供参考
  • VB6.0改变Windows任务栏窗体的透明度,还可设置桌面图标透明,透明度可调,拖动滑块即可改变透明度,可设置启动时自动加载本程序,这是一个属于窗体设计方面的参考代码。  注:不要把任务栏变为全透明哦,否则你就...
  • 两个简单漂亮的VB窗体美化源码,你可以借鉴本代码内的方法轻松地设计属于自己的软件界面,专业的淡蓝色风格,看着舒服自然。注意,本源码并没有全部完善,比如拖动右下角不能改变窗口大孝任务栏右键无法关闭该窗口等...
  • Visual Basic程序设计:第二章 VB编程初步—--窗体和控件.ppt
  • vb用户登录窗体实例

    2013-08-19 15:58:27
    掌握用户登录窗体设计过程 掌握用户登录的事务处理过程 掌握按条件从数据库查询数据的方法 完成用户登录窗体实例的程序编写
  • vb窗体透明动画

    2014-01-05 09:00:48
    vb趣味小程序,汽车模样穿越屏幕,很有意思欢迎大家学习交流

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 12,788
精华内容 5,115
关键字:

vb多窗体程序设计