代码搜索：CNN
找到约 803 项符合「CNN」的源代码
代码结果 803
www.eeworm.com/read/165216/10072013
bas module1.bas
Attribute VB_Name = "Module1"
'Public fMainForm As frmMain
Public flag As Integer '登录成功标志
Public bflagadd As Integer '书籍操作标志
Public flagadd As Integer '读者操作标志
Public brflagadd As Integer '借还书标志
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/276479/10734522
bas module1.bas
Attribute VB_Name = "Module1"
Option Explicit
Public CurrentStatus As Integer '当前登录状态,1为已登录，0为未登录
Public cnn As ADODB.Connection
Public Str As String '用于生成连接字符串
Public CurrentUser As Str
www.eeworm.com/read/421003/10760709
bas module1.bas
Attribute VB_Name = "Module1"
Public adocon As New ADODB.Connection
Public adoRs As New ADODB.Recordset
Public Sub Main()
adocon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path
www.eeworm.com/read/275903/10786064
bas module1.bas
Attribute VB_Name = "Module1"
'Public fMainForm As frmMain
Public flag As Integer '登录成功标志
Public bflagadd As Integer '查询操作标志
Public flagadd As Integer '操作标志
Public brflagadd As Integer '操作标志
S
www.eeworm.com/read/272064/10971893
frm database.frm
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Begin VB.Form frmDatabase
Caption = "数据库"
ClientHeight = 5025
ClientLeft = 363
www.eeworm.com/read/417195/11000823
cs show.aspx.cs
using System;
using System.Collections;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Web;
using System.Web.SessionState;
using System.Web.UI;
using System
www.eeworm.com/read/466448/7035155
bas module1.bas
Attribute VB_Name = "Module1"
Public temp, Str, BS As String
Public adoCon As New ADODB.Connection
Public adoRs As New ADODB.Recordset
Public Sub main()
adoCon.Open "Provider=MSDASQL.1;Persist Se
www.eeworm.com/read/281810/7117018
bas module1.bas
Attribute VB_Name = "Module1"
Global username_OK As String '记录登录用户名
Public Function ConnectString() As String
'ConnectString = "Provider=SQLOLEDB.1;Password=sa;User ID=sa;Initial Catalog=pubs;Da
www.eeworm.com/read/463829/7174713
bas module1.bas
Attribute VB_Name = "Module1"
Public blnAdd0 As Boolean, blnAdd1 As Boolean, blnAdd2 As Boolean
Public Function Cnn() As String '返回一个数据库连接
Cnn = "Provider=MSDASQL.1;Persist Security Info=False;