當前位置:首頁 » 編程語言 » vbsql管理系統

vbsql管理系統

發布時間: 2022-04-12 23:01:59

① 學生選修管理系統(vb+sql源代碼)

Imports System.Data.SqlClient
Mole database
Public values As Integer
Public sql_conn As SqlConnection
Dim sql_comm As SqlCommand
Dim sql_dataadapter As SqlDataAdapter
Public mytable As DataTable
Dim conn_str As String
Dim sql_str As String Public Sub sql_exectute(ByVal sql_str As String)
conn_str = "Data Source=127.0.0.1;Initial Catalog=select_datebase;User ID=sa"
Try
sql_conn = New SqlConnection
sql_conn.ConnectionString = conn_str
sql_conn.Open() sql_comm = New SqlCommand
sql_comm.Connection = sql_conn
sql_comm.CommandType = CommandType.Text
sql_comm.CommandText = sql_str sql_dataadapter = New SqlDataAdapter
mytable = New DataTable
sql_dataadapter.SelectCommand = sql_comm
sql_dataadapter.Fill(mytable)
Catch ex As Exception
MessageBox.Show(ex.Message, "警告", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try sql_conn.Close()
End Sub
End Mole 這是連接sql資料庫

② vb加SQL的管理信息系統

你在這誰說的清楚啊

③ vb+sql的學生信息管理系統

(1)學生信息管理系統

源代碼?
(2)首先你要安裝SQL資料庫,如果之前已經安裝則不用安裝。

④ 用VB做資料庫管理系統

Private Sub Add_Data() '增加記錄 Data1.Recordset.AddNew End Sub Private Sub Delete_Data() '刪除當前記錄 If MsgBox("是否刪除當前記錄?", vbYesNo, "確認") = vbYes Then Data1.Recordset.Delete Data1.Recordset.MovePrevious End If End Sub Private Sub Find_Data() '查找指定學號的記錄 Dim str_Find_Stuno As String str_Find_Stuno = InputBox("請輸入學號:", "查找") Data1.Recordset.FindFirst "Stu_no = ' " & str_Find_Stuno & " ' " If Data1.Recordset.NoMatch = True Then MsgBox "對不起,沒有您要查找的記錄!" End If End Sub Private Sub Save_Data() '保存數據 Data1.UpdateRecord End Sub Private Sub Cancel_Data() '取消編輯數據 Data1.UpdateControls End Sub Private Sub Data1_Reposition() '顯示當前記錄所在位置 Data1.Caption = 1 + Data1.Recordset.AbsolutePosition & _ " of " & Data1.Recordset.RecordCount End Sub Private Sub Add_Click() '"增加"菜單命令 Add_Data End Sub Private Sub Delete_Click() '"刪除"菜單命令 Delete_Data End Sub Private Sub Find_Click() '"查找"菜單命令 Find_Data End Sub Private Sub Save_Click() '"保存"菜單命令 Save_Data End Sub Private Sub Cancel_Click() '"取消"菜單命令 Cancel_Data End Sub Private Sub Exit_Click() '"退出"菜單命令 End End Sub

⑤ VB+SQL管理系統的問題~!

著個可以問我Q:119622068

⑥ VB+SQL超市管理系統

建議你學一下VB.NET2005,聽說現在都用這個了。

⑦ vb+sql資料庫管理系統問題

1.確定你換的另外那台電腦有沒有安裝SQL,並且是否建立(或還原)了相應資料庫。
2.SQL資料庫不論備份成什麼文件,都是不能單獨被VB調用的。
希望我的回答能提供給你相應信息。

⑧ 用VB和SQL做宿舍管理系統

我幫你

⑨ vb+sql的學生成績管理系統

這個相對比較簡單,詳談可以QQ 312221420

熱點內容
117小游戲伺服器ip 發布:2024-04-17 06:11:37 瀏覽:446
奧迪什麼配置好看 發布:2024-04-17 06:02:28 瀏覽:764
算命網源碼 發布:2024-04-17 05:53:16 瀏覽:295
C語言數組的遍歷 發布:2024-04-17 05:45:18 瀏覽:660
劃分清演算法 發布:2024-04-17 05:44:41 瀏覽:667
bitlocker暫停加密 發布:2024-04-17 05:25:21 瀏覽:542
腳本怎麼刷 發布:2024-04-17 05:09:50 瀏覽:134
如何調取手機存儲 發布:2024-04-17 05:06:50 瀏覽:920
linux的home 發布:2024-04-17 05:02:47 瀏覽:378
安卓王者榮耀怎麼快速退款 發布:2024-04-17 05:01:46 瀏覽:850