登录
首页 » VB源码 » VB 利用Tag属性存储用户名

VB 利用Tag属性存储用户名

于 2022-02-04 发布 文件大小:3.22 kB
0 105
下载积分: 2 下载次数: 1

代码说明:

VB 利用Tag属性存储用户名   If Text1.Text = "" Or Text2.Text = "" Then    MsgBox "用户名或密码不能为空", vbCritical, "信息提示"    Exit Sub   Else    If Text1.Text = "TSoft" And Text2.Text = "111" Then    Me.Tag = Text1.Text    Frm_Main.Show 1    Unload Me    Else    MsgBox "输入的名户名或密码不正确", vbCritical, "信息提示"    End If   End If

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

发表评论

0 个回复

  • VB 通过菜单控制操作权限并保存至数据库
    VB 通过菜单控制操作权限,是一个简单的基于数据库的权限控制小程序。首先使用Checkbox控件提供True/false或者YES/NO选项的特性,将操作权限写到Access数据库中,然后读取数据库的数据,通过数据库字段的值决定该菜单是否可以访问,从而达到通过菜单控制每个操作员操作权限的目的。运行程序,选择“销售业务管理”-“销售数据导入”,弹出没有操作权限的提示框。
    2022-07-15 02:53:53下载
    积分:1
  • VB6.0 使用递归过程实现阶乘运算
    VB6.0 使用递归过程实现阶乘运算   Function F(n As Integer) As Single    If n > 1 And n
    2022-04-27 22:53:13下载
    积分:1
  • VB 6 在DataGrid表格中实现下拉列表框
    VB 6.0 在DataGrid表格中实现下拉列表框,大家可以看截图,在如演示效果所示的DataGrid表格中,单击“单位”一列任意行数据,会显示出一个下拉框,供输入者选择单位,扩展了DataGrid的功能,增加了易用性,提升了用户体验。添加这一功能的核心代码为:   Adodc1.CommandType = adCmdTable   Adodc1.RecordSource = "tb_stock"   Set DataGrid1.DataSource = Adodc1   List1.AddItem ("支")   List1.AddItem ("瓶")   List1.AddItem ("盒")   List1.AddItem ("袋")   DataGrid1.Columns(6).Button = True   仅供参考,本示例是配合数据库实现的,请确保测试时数据库是连接的。
    2022-07-26 04:39:52下载
    积分:1
  • VB Val与汉字的相互转化
    VB 数字与字符串的相互转换(汉字区位码与汉字的相互转化)的例子,主要是使用Val函数来实现转换功能,Val的用法很简单,如Text4.Text = Val(Text3),将此行代码添加到自定义的按钮事件中即可,当用户单击按钮后,可触发此代码执行区位码转换。实现的功能为:   把数字转换成字符串,把字符串转换成数字。
    2022-02-10 12:28:52下载
    积分:1
  • VB6 利用Combo、DTPicker组合框辅助录入数据
    VB6.0 利用组合框辅助录入数据,输入框什么的就不多说了,主要学习VB6 中的Combo、DTPicker组合框在录入数据时的用法,方便用户选择数据、选择时间,特别是时间,可固定为指定格式,防止程序出错等。
    2023-03-15 11:25:03下载
    积分:1
  • VB NET写的DVD播放器
    播放器窗口界面中的操作菜单,实现了弹出菜单的功能,把控制菜下的各菜单项添加到弹出式菜单ContextMenuStrip1中。   播放器功能支持DVD格式的视频播放,包括了暂停、播放、停止、弹出等功能。   本播放器程序依赖于AxInterop.MSWEBDVDLib.dll、Interop.MSWEBDVDLib.dll。
    2023-05-18 15:05:03下载
    积分:1
  • VB6.0演示的AutoSize实例
    VB6.0演示的AutoSize实例,自动改变图片框的大小以显示图形全部内容,当图片框比图形小时,图形超出部分不被显示,减少图片框高度,使图片框小于图形。
    2022-08-07 04:59:17下载
    积分:1
  • vb.net 串口通讯测试项目
    vb.net 串口通讯测试项目源码,本源码用于练习SerialPort控件、DataReceived事件、16进制操作,同时用于工程需要。作者:李潇海。   运行后先检测测试需用的COM端口是否打开,弹出提示。   测试时请确保发送周期为正整数!串口测试窗口中,可配置参数:端口、波特率、检验位、数据位、停止位等,支持以十六进制发送和接收数据,还可以毫秒定时发送数据。操作方式上,可设置自动清空测试数据,发送文件或发送数据等。右侧为串口测试时的结果显示区。
    2023-02-14 09:00:03下载
    积分:1
  • VB演示 FileToSplit分割文件与合并文件
    VB演示分割文件与合并文件,这里使用到比较多的文件操作函数,比如FileToSplit、FileLen、UBound、FileCount、FileInfo等。本范例文件分割的思路:程序通过调用FreeFile函数来取得可以的文件号,以二进制的方式打开文件,根据文件的长度FilesLen和每个分割单位的比较,得出被分割之后的子文件个数,重新定义最后一个子文件的大小,将所取得的内容,分别存储到各个子文件中,将文件分割情况,存储到自定义的结构类型FileInfoFile中,最后将文件分割的情况,存入到模版文件中。   关于文件合并,则可看作是上述的逆过程,不再详述,请参见源码中的文件注释。
    2022-11-15 13:30:03下载
    积分:1
  • VB6.0 顺序文件写操作的操作演示
    VB6.0 顺序文件写操作的操作演示,三种方法写数据,包括了完整的源码项目下载,是学习VB文件读写操作的好范例。   这三种方法是:   把文件的内容一次性的写入   把字符一个一个写入   依次写入顺序文件
    2022-01-26 17:24:14下载
    积分:1
  • 696516资源总数
  • 106679会员总数
  • 14今日下载