网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

vb.net帐票的简单介绍

vb.net的数据库连接

1·绑定数据源来进行连接

创新互联公司是一家以网站设计建设,微信小程序开发、网站开发设计,网络软件产品开发,企业互联网推广服务为主的民营科技公司。主要业务涵盖:为客户提供网站策划、网站设计、网站开发、域名申请、网站优化排名、外链等服务领域。凭借建站老客户口碑做市场,建设网站时,根据市场搜索规律和搜索引擎的排名收录规律编程,全力为建站客户设计制作排名好的网站,深受老客户认可和赞誉。

2.用代码连接

先到数据库建立一个数据库和相应的表

连接数据库的代码:

Dim str As String = "Data Source=服务器名;Initial Catalog=数据库名;Persist Security Info=True;User ID=;Password="

dim conn As SqlClient.SqlConnection

try

conn = New SqlClient.SqlConnection

conn.ConnectionString = str

conn.Open()

Return True

Catch ex As Exception

MsgBox(ex.ToString)

Return False

End Try

登录代码:Dim str As String = "Data Source=服务器名;Initial Catalog=数据库名;Persist Security Info=True;User ID=;Password="

dim conn As SqlClient.SqlConnection

conn = New SqlClient.SqlConnection

conn.ConnectionString = str

conn.Open()

sqlstr = "Select * From Amd Where AmdName='" TextBox1.Text "' And AmdPwd = '" TextBox2.Text "'"

Dim sqlcmd As SqlClient.SqlCommand = New SqlClient.SqlCommand(sqlstr, conn)

Dim dr As SqlClient.SqlDataReader

dr = sqlcmd.ExecuteReader

If dr.Read = True Then '判断一条记录为真

kf.Show() '显示下个窗体

Me.Hide() ’隐藏当前窗体

Else

MessageBox.Show("输入信息有误!", "提示")

TextBox1.Text = ""

TextBox2.Text = ""

End If

vb.net如何在单击回车键时将数据写入数据库?

用SQL数据库。VB.NET是微软公司在2002年推出的一种开发基于.Net平台应用程序的开发语言,vb.net在单击回车键时将数据写入数据库需要用SQL数据库。

vb.net 登录问题

你每次取出的是表中的首条记录,当然只能用首条记录登陆了!

Dim name, password As String

name = TextBox1.Text

Dim com As New OleDb.OleDbCommand("select * from denglu where name='" name "'", conn)

Dim dr As OleDb.OleDbDataReader

conn.Open()

dr = com.ExecuteReader

dr.Read()

password = dr.GetString(1)

If TextBox3.Text = password Then

mesbox("成功!")

Else

msgbox("失败")

End If

dr.Close()

conn.Close()

这种情况下,效率极不好!你能理解什么意思就行了!否则将你的程序改完了!

VB.NET 遍历 DataGridView

遍历的例子:

Dim i, j As Integer

For i = 0 To DataGridView1.RowCount - 1

  For j = 0 To DataGridView1.ColumnCount - 1

MsgBox(DataGridView1.Item(j, i).Value)

  Next

Next

注意:与Excel的单元格命名规则不一样,这里的 Item(j, i) 中,列号 j 在前,行号 i 在后。

C# 或者 vb.net 打印listview里的内容(小票打印机)

foreach (ListViewItem item in listView1.Items) {

Debug.Print(item.Text);

}


本文标题:vb.net帐票的简单介绍
地址分享:http://bjjierui.cn/article/hsdjpi.html

其他资讯