代码搜索：VB 有哪些应用？
找到约 10,000 项符合「VB 有哪些应用？」的源代码
代码结果 10,000
www.eeworm.com/read/383272/8958255
vb frmbackupandrecover.vb
Imports System.Data.OleDb
Imports System.DateTime
Imports System.Math
Imports System.IO
Imports System.Threading
Public Class frmbackupandrecover
Inherits System.Windows.Forms.Form
Dim
www.eeworm.com/read/383272/8958280
vb dbxs.vb
Public Class DBxs
Inherits DBOperation
Private _shangpinno As String
Private _shangpinname As String
Private _sl As Single
Private _xiaoshouprice As Single
Private _xiao
www.eeworm.com/read/383272/8958282
vb dbsp.vb
Public Class DBsp
Inherits DBOperation
Private _shangpinno As String
Private _shangpinname As String
Private _sl As Single
Private _xiaoshouprice As Single
Private _xiao
www.eeworm.com/read/383272/8958291
vb shangpinxinxi.vb
Public Class shangpinxinxi
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
DGVResult.DataSource = spxx.loadsp()
End Sub
www.eeworm.com/read/383272/8958383
vb spxx.vb
Public Class spxx
Inherits DBOperation
Shared Function Loadsp(ByVal Field As String, ByVal Value As String, ByVal DBOperator As String) As DataTable
Dim SQLString As String
www.eeworm.com/read/383272/8958391
vb frmeditspxx.vb
Public Class Frmeditspxx
Private _shangpinno As String
Sub New(ByVal shangpinno As String)
_shangpinno = shangpinno
InitializeComponent()
End Sub
Private Sub b
www.eeworm.com/read/383272/8958406
vb dbkc.vb
Public Class DBkc
Inherits DBOperation
Private _shangpinno As String
Private _sl As Single
Sub New(ByVal shangpinno As String, ByVal sl As Single)
_shangpinno = shangpinn
www.eeworm.com/read/383272/8958417
vb frmedituser.vb
Public Class FrmEditUser
Private _userno As String
Sub New(ByVal userno As String)
_userno = userno
InitializeComponent()
End Sub
Private Sub btok_Clik(ByVal s
www.eeworm.com/read/383272/8958425
vb dboperation.vb
Public Class DBOperation
Shared Function DBOperate(ByVal SQLString As String) As DataTable
' Try
Dim oleconn As New OleDb.OleDbConnection(CONN)
Dim cmd As OleDb.OleDbC
www.eeworm.com/read/383272/8958433
vb frmaddspxx.vb
Public Class Frmaddspxx
Private Sub btnexit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnexit.Click
Me.Close()
End Sub
Private Sub btnok_Cl