學(xué)生信息管理系統(tǒng)vb課程設(shè)計(jì)-閱讀頁
2024-09-16 14:00本頁面
【正文】 End If End If wherestr = wherestr + Class like 39。 txtClassKey amp。 End If 39。% amp。 %39。% amp。 %39。入學(xué)時(shí)間 If And = 1 Then If Or Then If = Or = Then MsgBox 請(qǐng)完整填寫查詢時(shí)間！ , vbOKOnly + vbInformation, 查詢 Exit Sub End If If wherestr Then If Then wherestr = wherestr + and Else wherestr = wherestr + or End If End If If optnKeyFore Then wherestr = wherestr + publishtime 39。 + + amp。 Else wherestr = wherestr + publishtime 39。 + + amp。 End If ElseIf Then VB 課程設(shè)計(jì)論文 14 If = Or = Or = Or = Then MsgBox 請(qǐng)完整填寫查詢時(shí)間！ , vbOKOnly + vbInformation, 查詢 Exit Sub End If If wherestr Then If Then wherestr = wherestr + and Else wherestr = wherestr + or End If End If wherestr = wherestr + acceptancetime between 39。 + + amp。and 39。 + + amp。 End If End If If wherestr Then wherestr = where + wherestr End If sqlstr = sqlstr + wherestr (cmdFindStudent).CommandText = sqlstr 39?？深A(yù)約 Dim bStudenting As Boolean bStudenting = False strColumn = (0).Text sqlstr = select * from StudentTable where StudentID=39。 (cmdFindStudent).CommandText = sqlstr 39。 + strColumn + 39。刷新 Grid,這兩句不可省 = !chinese = !maths = !english = !politics = !physics = !chemistry = False = True End Sub 用戶注冊(cè)界面設(shè)計(jì) 如圖 44。Dim cmd As Command Usertype = General State = 1 Set cmd = New Command (conLibrary).Open = (conLibrary) = insert into UserTable(UserName,RealName,Unit,pwd,RegisterTime,age,state,usertype) values(39。 amp。,39。 amp。,39。 amp。,39。 amp。,39。 Now amp。,39。 amp。,39。 State amp。,39。 Usertype amp。) = select * from usertable where username=39。 txtUserName amp。 39。驗(yàn)證重要信息已經(jīng)填寫 If = Then MsgBox 請(qǐng)?zhí)顚懹脩裘?, vbOKOnly + vbInformation, 注意 Exit Sub ElseIf = Then MsgBox 請(qǐng)?zhí)顚懨艽a！ , vbOKOnly + vbInformation, 注意 VB 課程設(shè)計(jì)論文 17 Exit Sub ElseIf = Then MsgBox 請(qǐng)?zhí)顚懘_認(rèn)密碼！ , vbOKOnly + vbInformation, 注意 Exit Sub End If If Then MsgBox 兩次密碼不相同，請(qǐng)重新填寫！ , vbOKOnly + vbInformation, 注意 = = Exit Sub End If On Error GoTo exit1 If Not IsExistUser(txtUserName, ) Then 39。從最初的茫然，到慢慢的進(jìn)入狀態(tài)，再到對(duì)思路逐漸的清晰，整個(gè)設(shè)計(jì)過程難以用語言來表達(dá)。現(xiàn)在回頭想想這幾天的經(jīng)歷和感受，我感慨萬千，在這次課程設(shè)計(jì)的過程中，我擁有了無數(shù)的回憶和收獲。在報(bào)告中我充分運(yùn)用了大學(xué)期間所學(xué)到的知識(shí)，也學(xué)會(huì)了如何使用所學(xué)的知識(shí)去解決一些實(shí)際問題。雖然在不斷的修改 ，但由于能力和時(shí)間的關(guān)系，還是有很多不盡人意的地方，在以后的修改過程中， 我將會(huì)查更多的資料對(duì)系統(tǒng)進(jìn)行更改，使系統(tǒng)的設(shè)計(jì)更加完善。同時(shí)我也深刻的認(rèn)識(shí)到，在對(duì)待一個(gè)新事物時(shí)，一定要從整體考慮，完成一步之后再作下一步，這樣才能更加
畢業(yè)設(shè)計(jì)相關(guān)推薦
鄂ICP備17016276號(hào)-1