下载 >  开发技术 >  VB > VB.NET VB

VB.NET VB

2009-06-13 上传大小:67KB
分享
可以用此做VB的实训
Public Class Form8
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim f5 As New Form5
        Module1.db()
        conn.Open()
        ds.Clear()
        cmd.CommandText = "select sno,password from stu"
        da.SelectCommand = cmd
        da.Fill(ds)
        Dim i As Integer
        For i = 0 To ds.Tables(0).Rows.Count - 1
            If TextBox1.Text = ds.Tables(0).Rows(i).Item(0) Then
                If TextBox2.Text = ds.Tables(0)
                            .Rows(i).Item(1)
Then
                    If TextBox1.Text <> "jolan" Then
                        Form5.维护ToolStripMenuItem.Dispose()
                    End If
                    If (TextBox1.Text = "jolan" And RadioButton1.Checked = True) Or (TextBox1.Text <> "jolan" And RadioButton2.Checked = True) Then
                        Form5.Show()
                        Me.Hide()
                        Exit For
                    End If
                End If
            End If
        Next
      
        If i = ds.Tables(0).Rows.Count Then
            MsgBox("登录失败!")
        End If
        conn.Close()
    End Sub
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        End
    End Sub
End Class                        
...展开收缩
综合评分:3
开通VIP 立即下载

评论共有2条

hanwujier 2013-12-17 13:36:16
还不错,比较好用。
笑天0917 2013-07-24 17:20:28
代码有点乱,不过还是有点帮助!
 
Vb.net开发的WebKit浏览器 立即下载
积分/C币:3
简单的登录界面vb.net+sql数据库 立即下载
积分/C币:5
C#和VB.NET相互转换工具 立即下载
积分/C币:5
.net中进度条示例演示,ProgressBar1.PerformStep(),VB.net源代码程序 立即下载
积分/C币:3
VB.NET二维码生成源代码 立即下载
积分/C币:5
在vb.net (asp.net)中后台引用ajax函数的方法 立即下载
积分/C币:3
vb.net SSH SFTP客户端源代码 立即下载
积分/C币:3
vb.net 使用大华SDK 看视频 立即下载
积分/C币:3
vb.net DataGridView控件用法合集 立即下载
积分/C币:3
vb.net代码 如何实现简单的图片浏览器 立即下载
积分/C币:3

热点文章

VIP会员动态

推荐下载

vb 代码转vb.net
5C币 25下载
vb.net AT
3C币 14下载
vb.net at
3C币 14下载
opc vb.net
5C币 45下载
关闭
img

spring mvc+mybatis+mysql+maven+bootstrap 整合实现增删查改简单实例.zip

资源所需积分/C币 当前拥有积分 当前拥有C币
5 0 0
点击完成任务获取下载码
输入下载码
为了良好体验,不建议使用迅雷下载
img

VB.NET VB

会员到期时间: 剩余下载个数: 剩余C币: 剩余积分:0
为了良好体验,不建议使用迅雷下载
VIP下载
您今日下载次数已达上限(为了良好下载体验及使用,每位用户24小时之内最多可下载20个资源)

积分不足!

资源所需积分/C币 当前拥有积分
您可以选择
开通VIP
4000万
程序员的必选
600万
绿色安全资源
现在开通
立省522元
或者
购买C币兑换积分 C币抽奖
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 4 45
为了良好体验,不建议使用迅雷下载
确认下载
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 0 0
为了良好体验,不建议使用迅雷下载
开通VIP
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 4 45
您的积分不足,将扣除 10 C币
为了良好体验,不建议使用迅雷下载
确认下载
下载
无法举报自己的资源

兑换成功

你当前的下载分为234开始下载资源
你还不是VIP会员
开通VIP会员权限,免积分下载
立即开通

你下载资源过于频繁,请输入验证码

您因违反CSDN下载频道规则而被锁定帐户,如有疑问,请联络:webmaster@csdn.net!

举报

若举报审核通过,可返还被扣除的积分

  • 举报人:
  • 被举报人:
  • *类型:
    • *投诉人姓名:
    • *投诉人联系方式:
    • *版权证明:
  • *详细原因: