Няма описание
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

系統執行檔版本管理NEW.vb 860B

123456789101112131415161718
  1. Public Class 系統執行檔版本管理NEW
  2. Private Sub 系統執行檔版本管理_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  3. SQL_查詢系統認證版本號()
  4. If dr.Read() Then
  5. 資料庫版本號_lb.Text = "資料庫版本號 : " & dr("系統認證版本號")
  6. 版本號_tb.Text = dr("系統認證版本號")
  7. End If : conn.Close()
  8. End Sub
  9. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles 修改_bt.Click
  10. SQL_修改版本號管理1() : conn.Close()
  11. SQL_修改系統認證版本號()
  12. If dr.Read() Then
  13. 資料庫版本號_lb.Text = "資料庫版本號 : " & dr("系統認證版本號")
  14. 版本號_tb.Text = dr("系統認證版本號")
  15. End If : conn.Close()
  16. MsgBox("修改完成")
  17. End Sub
  18. End Class