vb中的sql語句,完整的使用格式應該怎麼書寫

時間 2022-03-25 07:31:46

1樓:匿名使用者

private sub command1_click()data1.recordsource = "select sum(mark) from ck'"

data1.refresh

text1 = data1.recordset.fields(0)end sub

data1.recordsource="sql語句「data1.refresh 『開啟資料表

2樓:匿名使用者

dim cnn as new adodb.connectiondim rst as new adodb.recordsetprivate sub command1_click()cnn.

connectionstring = ""

cnn.open

rst.open " select count(*) from where **=**", cnn, 1, 1

text1.text = rst.fields(1).valuerst.close

cnn.close

end sub

建議使用純**完成,這樣對你程式開發進步較大。

3樓:匿名使用者

使用adodc控制項。假設你已經連線好資料庫adodc1.recordsource ="select count(*) as 計數 from ck where mark<>0"

adodc1.refresh

text1.text=adodc1.recordset.fields(0).value

如果是sum,則adodc1.recordsource ="select sum(*) as 計數 from ck where mark<>0"

4樓:匿名使用者

可以看一看:

vb中sql語句如何編寫

5樓:

可以不用,可以直接使用cnn連線物件來執行sql語句.格式如下:

cnn.execute(sql語句)

比如:刪除記錄:

cnn.execut("dele from stu where name='張三'")

vb中的sql語句怎麼寫啊

6樓:匿名使用者

你的表名稱就叫table嗎

7樓:匿名使用者

vb6.0還是vb.net?

vb如何寫sql語句

8樓:匿名使用者

sql="select * from (**名字) where id='" & text1.text & "' and name='" & text2.text & "' and age="' & text3.

text & "' order by id asc"

order by id asc 這句意思是按id公升序排列,可寫可不寫。

vb6.0中如何使用sql語句(急,只要告訴我把**放在哪就行)

9樓:匿名使用者

這是乙個呼叫資料庫的表裡面資料的語句,不是放在什麼控制項中輸出的,你無論在乙個怎麼樣的過程中都可以輸出你想要的結果,比如你有text控制項,tdgrid控制項等等,一般的資料的輸出用到mshflexgrid控制項。首先的邏輯思維就不正確。比如我用mshflexgrid1顯示你的資料 就可以這樣寫 set mshflexgrid.

datasource=adodc1.recordsource 現在已經很少人用adodc控制項了 一般用 adodb元件 我現在告訴你一種方法 你在vb的工程中 工程-引用 新增micfosoft activex data objects 2.5 library然後在你想要顯示資料的某個過程種加入以下** dim rs as new adodb.

connection

dim str as string

dim re as new adodb.recordset

dim strsql as string

str = "provider=sqloledb.1;password=sa;persist security info=true;user id=sa;initial catalog=gfdy2007;data source=20091103-1521"

'sqloledb 為資料來源 sql server ;access等 這裡是sql server, password 為資料庫登入密碼 persist security info=true不管,user id為資料庫登入名稱

'initial catalog 為資料庫名 ,data source 為機器名

rs.open str

strsql = "select * from t_dy_dataclass" 'sql查詢語句"

re.open strsql, str, 1, 3 '使用 open 方法開啟資料庫中的乙個表

set mshflexgrid1.datasource = re

re.close

vb中查詢語句如何使用

10樓:匿名使用者

一)操縱資料庫,vb必須正確使用sql結構化查詢語句,將其賦值給ado資料控制項的recordsource屬性。

二)拼接sql結構化查詢語句的條件部分的判斷語句結構應該是簡潔有效。

已將原按鈕的click事件**修改為能有效給ado資料控制項recordsource屬性,去完成資料查詢。

sql結構化查詢語句

結構化查詢語言(structured query language)簡稱sql(發音:/ˈes kjuː ˈel/ "s-q-l"),是一種特殊目的的程式語言,是一種資料庫查詢和程式語言,用於訪問資料以及查詢、更新和管理關係資料庫系統;同時也是資料庫指令碼檔案的副檔名。

結構化查詢語言是高階的非過程化程式語言,允許使用者在高層資料結構上工作。它不要求使用者指定對資料的存放方法,也不需要使用者了解具體的資料存放方式,所以具有完全不同底層結構的不同資料庫系統, 可以使用相同的結構化查詢語言作為資料輸入與管理的介面。結構化查詢語言語句可以巢狀,這使它具有極大的靈活性和強大的功能。

option explicit

dim strsql as string

private sub find_click()

if trim(name_find.text) <> "" and trim(phone_find.text) <> "" then

strsql = "select * from phone where " + "**號碼='" & trim(phone_find.text) & "'" + " and 姓名='" & trim(name_find.text) & "'"

end if

adodc1.recordsource = strsql

debug.print adodc1.recordsource

end sub

立即視窗顯示正確的sql語句。

11樓:dl_會飛的青蛙

private sub find_click()

strsql = ""

if trim(name_find.text) <> "" then

strsql = strsql + " and 姓名='" & trim(name_find.text) & "'"

end if

if trim(phone_find.text) <> "" then

strsql = strsql = " and **號碼='" & trim(phone_find.text) & "'"

end if

if strsql = "" then

adodc1.recordsource = "select * from phone"

adodc1.refresh

else

adodc1.recordsource = "select * from phone where 1=1 " + strsql

adodc1.refresh

end if

end sub

12樓:

strsql = strsql = " and **號碼='" & trim(phone_find.text) & "'"

這句有問題

vb中的for語句,VB中的For語句

一 vb中的for語句格式 for 迴圈變數 初值 to 終值 step步長 迴圈體 exit for next 迴圈變數 二 vb中的for語句功能 當迴圈變數的值在初值到終值範圍內時,執行一次迴圈體中的語句塊,並使初值增加乙個步長。當迴圈變數的值不在初值到終值範圍內時,就退出迴圈,執行next後...

vb中if 語句的運用,VB中if 語句的運用

你的理解不對。第乙個if語句執行後,m取的是a,b中的最大值 第二個if語句執行後,m取的是c,m中的最大值 當c m為假,m還是原來的m,不需些else子句。所以最後text4.text m,顯示的是a,b,c三者中的最大數。if 語句有幾種型式,如果直接寫成 if 判斷 theh 表示式 這時是...

VB迴圈語句,vb中的迴圈語句

for 迴圈變數 初賦值 to 終值 step 步長 next 迴圈變數 在預設情況下,step被設為 1 可以省略,step也可以設為負值,例如 dim a 0 for i 1 to 10 a a i next i 這是乙個最簡單的累加器的例子,把1到10累加在一起,然後賦值給 a 這樣的效果和上...

vb的if語句中的問題,關於VB中IF語句中的理解問題

這個就是正確的 if text1.text thenmsgbox 請輸入內容 end if if len text1.text 0 and text1.text 正確內容 then msgbox 請輸入乙個正確內容 end if if text1.text 正確內容 thenmsgbox 通過 en...

VB中的迴圈語句有哪些,VB中的迴圈語句有哪些

使用迴圈語句 使用迴圈重複執行 迴圈用於重複執行一組語句。迴圈可分為三類 一類在條件變為 false 之前重複執行語句,一類在條件變為 true 之前重複執行語句,另一類按照指定的次數重複執行語句。在 vbscript 中可使用下列迴圈語句 do.loop 當 或直到 條件為 true 時迴圈。wh...