代码搜索：VB 有哪些应用？
找到约 10,000 项符合「VB 有哪些应用？」的源代码
代码结果 10,000
www.eeworm.com/read/159970/10583758
vb 修改.vb
Imports System.Data.SqlClient
Public Class 修改
Inherits System.Windows.Forms.Form
Dim mytab As New DataTable
Dim sqlstr As String
#Region " Windows 窗体设计器生成的代码 "
Public Sub N
www.eeworm.com/read/159970/10583776
vb 查询.vb
Imports System.Data.SqlClient
Public Class 查询
Inherits System.Windows.Forms.Form
Dim sqlstr As String
#Region " Windows 窗体设计器生成的代码 "
Public Sub New()
MyBase.New()
www.eeworm.com/read/351118/10679125
vb 信息.vb
Imports Microsoft.VisualBasic
Imports System
Imports System.Data
Imports System.Data.OleDb
Imports System.Reflection
Imports lianjie1
Namespace salory
Public Class salory1
Dim c
www.eeworm.com/read/204662/7072969
vb gis
[TARGET]
A1=52
A2=Zt+AI6DeoQ3ocxySnvNLMx+fYZPLpSacHwAj9DowmsdSbFOsEPjy414NSJSuW6j6UzEzc8Ox4gUAqDd96DZWPpwqJKU39gQm3TkcT/6wRH5dMOEnzY55KRG/5XYjw1XXd1fl93ekPMM=
B1=3
B2=FTOAhv8E
C1=3
C2=FTGAh/8C
www.eeworm.com/read/108103/6186025
vb for.vb
' FastScript v1.0
' 'For' operator demo
dim i
for i = 0 to 9
if i = 1 then
ShowMessage(1)
elseif i = 2 then
ShowMessage(2)
elseif i = 3 then
www.eeworm.com/read/108103/6186036
vb is.vb
' FastScript v1.0
' 'is' operator demo
dim o, p
o = new TObject
p = new TPersistent
if o is TObject then
ShowMessage("o is TObject")
end if
if p is TObject
www.eeworm.com/read/108103/6186037
vb if.vb
' FastScript v1.0
' 'If' operator demo
dim i
i = 10
if i = 10 then i = 1
if i = 1 then
ShowMessage(1)
elseif i = 2 then
ShowMessage(2)
elseif i =
www.eeworm.com/read/108103/6186042
vb with.vb
' FastScript v1.0
' With operator demo
dim f, b
sub ButtonClick(Sender)
ShowMessage(Sender.Name)
f.ModalResult = mrOk
end sub
sub ButtonMouseMove(Sender)
b.Cap
www.eeworm.com/read/37019/899181
vb--
Type=Exe
Form=Mouse-RightButton-Menu.frm
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\windows\SysWow64\stdole2.tlb#OLE Automation
Object={3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0