求用vb目前只有vb沒有其他軟體來實現

2021-07-09 16:22:49 字數 2065 閱讀 1884

1樓:草是無辜的

汗。。。。。直接看**不就得了。。。什麼地方沒看明白我告訴你。。。。。

2樓:匿名使用者

我用的是vb+sql,是用ado連線的,你需要改一下連線資料庫的**才行

你看一下行不行

3樓:

vb+sql,是用ado連線改一下連線資料庫的**

4樓:揭莞然

這個部落格上還有很多

200多本,

大量vb電子書**

任何問題可詢問於:[email protected]

5樓:

很簡單,用ado+access的基本方法如下:

dim cn as adodb.connection

dim rs as adodb.recordset

private sub cmdsel_onclick()

dim i as integer

dim tsql as string

'初始化連線

set cn=new adodb.connection

cn.open "driver=;dbq=路徑+資料庫名稱.mdb;uid=admin;pwd=密碼"

'寫查詢語句

if combo.text="精確" then

tsql=text.text-----------精確查詢語句

elseif combo.text="模糊" then

tsql=text.text-----------模糊查詢語句

end if

'初始化查詢

set rs=new adodb.recordset

rs.open tsql,cn,1,3

if rs.recordcount>0 then

rs.movefirst

'取出內容

for i=1 to rs.recordcount

dim r0,r1

r0=rs.fields(0)---------------取出第一列的值

r1=rs.fields(1)---------------取出第二列的值

...rs.movenext

next i

else

msgbox "沒有找到資料",vbokonly,"提示"

end if

'關閉查詢

set rs=nothing

'執行非查詢語句

cn.execute "insert into table select ..."---插入語句

cn.execute "update table set ..."---------修改語句

cn.execute "delete from table where ..."---刪除語句

'關閉連線

set cn=nothing

end sub

怎樣用vb四捨五入求近似值,vb 四捨五入函式

vb中有專門用來四捨五入的函式 round 函式 返回按指定位數進行四捨五入的數值。語法 round expression numdecimalplaces 引數 expression 必選項 被四捨五入的數值表示式 numdecimalplaces 可選項 數字表明小數點右邊有多少位進行四捨五入,...

用vb編寫簡單的直板手機程式,急求答案,謝謝

程式 該程式的主要目的是要判斷輸入的使用者名稱是否合法,所以我們首先編寫判斷使用者名稱的程式 雙擊 確定 按鈕,新增如下的程式 黑體部分為系統自動生成的 楷體為註釋 private sub command1 click 判斷是否輸入了使用者名稱 if text1.text then 如果text1為...

用vb繪製ya2bc的影象程式求標準步驟

x x0 時算出 y y0 以此作為起點 算出下一個點 x1,y1 劃線 x0,y0 x1,y1 再以 x1,y1 為起點,求下一點,再劃線.初中數學,二次函式y ax 2 bx c 函式圖象平移的步驟與規律 上下移,改變c的值,左右移改變對稱軸的值 這時先把函式化為對稱軸的形式 對於函式的平移,最...