1樓：匿名使用者
首先在部件-控制項裡找到microsoft ado datacontrol ，打勾，然後在窗體上新增adodc1。
2. 新增兩個文字輸入框text1,text2，分別用來接收使用者輸入使用者名稱和密碼。
3、在adodc1控制項的屬性視窗中單擊connectionstring右側的…按鈕，開啟ado的寬拿巨集屬性頁，選擇「使用連線字串」，慎冊單擊「生成」按鈕，開啟資料鏈結屬性對話方塊，在「提供程式」頁中選擇microsoft jet ole db provider，單擊「下一步」，在「連線」頁中，輸入資料庫名稱前提是將資料庫檔案和工程檔案儲存在同一目錄下），單擊「測試連線」，如果連線成功，單擊「確定」即可。
4、將以下**新增到登入按鈕：
private sub command1_click()
select * from 資料表名稱 where username='" &
if then
msgbox "沒有這個使用者，請重新輸入正確敏桐的使用者名稱", 錯誤提示"
elseif = "password") then
msgbox "登入成功！",錯誤提示"
elsemsgbox "你的密碼錯誤，請輸入正確的使用者密碼！",錯誤提示"
end if
end if
end sub
2樓：匿名使用者
text1是使用者名稱文字框，text2是密碼框，command1是登陸按鈕，command2是註冊按鈕 dim db as connection
dim withevents rs as recordsetprivate sub command1_click()
set db = new collection
set rs = new recordset
provider=msdatashape;data provider=;data source=" & "
select * from 表1 where 使用者名稱='" &
if = 0 then
msgbox "無此使用者！"
exit sub
elseif rs!密碼 <>then
msgbox "密碼錯誤！段枝手"
exit sub
elsemsgbox "登陸成功！"
end if
end if
end subprivate sub command2_click()
insert into 表1 (使用者名稱，密碼) values (' & 搭銀'握嫌，'" &
msgbox "使用者建立成功！"
end sub
3樓：匿名使用者
連線資料庫，一步一步做就是了，登明彎陸的時候先檢查是否有此使用者，沒有就提示註冊，有就判斷登陸提供的資訊是否正確，激腔悶正確就進入，錯誤就提示圓尺相應的錯誤資訊啊，呵呵。
如何使vb登入介面與sql相連 30
如何使vb登入介面與sql相連 dim cn as set cn new dim str as string str driver server sql資料庫位址 database 資料庫名 uid 使用者名稱 pwd 密碼 strdim rs as set rs new dim sqllogin as...
我愛姓張的男孩,我想用他的名字做個性簽名全名張智鵬
每當愛情來了。都變白痴啦 張揚不是我的性格，智慧不是我的強項，鵬飛萬里去尋找天地！我姓張，起個比較個性的名字，兩個字的 女 紫涵 琳薰 藍欣 黎珊 紫依 靈惜 羽琳 晴菲 晴黛 晴薰 紫晗 若依 筠涵 筠晗 羽欣 欣怡 羽菲 羽橙 若熙 男 雨瀟 俊霖 俊軒 霖軒 宇晨 俊宇 霖軒 俊瀟 晨傑 俊熙...
100分誰幫我做個VB計算器急用
剛剛給你發過去了，最簡單的那種賣菜用的計算器了。請你查收！dim a as double dim b as integer private sub command1 click 清除按鈕 text1.text end sub private sub command10 click 1按鈕 text1...