小弟寫程式遇到兩個蠻棘手的問題,可否請各位大大幫忙!
首先是我要如何呼叫access中資料項目內容?
再者 如何引用資料庫中內容作加減乘除之計算?
煩請站長大人幫忙,麻煩之處 甚感歉意.
Private Sub Form_Activate()
Dim Counters As Integer
Dim strname As String
Dim strword As String
Dim strname1 As String
Dim strword1 As String
strname = InputBox("請輸入使用者姓名:", "使用者姓名")
strword = InputBox("請輸入使用者密碼:", "使用者密碼")
password.Recordset.FindFirst "使用者姓名 = " & "'" & strname1 & "'" '此處為什麼沒有反應
' password.Recordset.FindFirst "使用者密碼 = " & "'" & strword1 & "'" '此處為什麼沒有反應
If (strword = strword1) + (strword = strword1) Then
Call user_Click
Else
MsgBox "登入資料錯誤,請重新啟動本系統 !"
End If
End Sub
煩請各位大大幫忙解決小弟疑惑,感恩!
首先是我要如何呼叫access中資料項目內容?
再者 如何引用資料庫中內容作加減乘除之計算?
煩請站長大人幫忙,麻煩之處 甚感歉意.
Private Sub Form_Activate()
Dim Counters As Integer
Dim strname As String
Dim strword As String
Dim strname1 As String
Dim strword1 As String
strname = InputBox("請輸入使用者姓名:", "使用者姓名")
strword = InputBox("請輸入使用者密碼:", "使用者密碼")
password.Recordset.FindFirst "使用者姓名 = " & "'" & strname1 & "'" '此處為什麼沒有反應
' password.Recordset.FindFirst "使用者密碼 = " & "'" & strword1 & "'" '此處為什麼沒有反應
If (strword = strword1) + (strword = strword1) Then
Call user_Click
Else
MsgBox "登入資料錯誤,請重新啟動本系統 !"
End If
End Sub
煩請各位大大幫忙解決小弟疑惑,感恩!
文章標籤
全站熱搜
