vb第三章程序流程控制(編輯修改稿)
2025-05-04 06:47 本頁面
【文章內(nèi)容簡介】 【】 將輸入文本框中的所有小寫字母轉(zhuǎn)換成大寫字母，并將一些特殊符號變成等價的字符串，如DLR表示$、AT表示@、0/0表示％、BPT表示、AND表示amp。等。可以在KeyPress事件中修改文本框控件的缺省操作，使它能在用戶輸入這些字符時進行相應修改。Private Sub Text1_KeyPress (KeyAscii As Integer)Dim spesymbols As StringDim ch As String *1 Spesymbols=178。$%amp。@178。ch= Chr(KeyAscii) If InStr(Spesymbols,ch) Then KeyAscii=0 ElseKeyAscii = Asc(Ucase(ch))Exit SubEnd IfSelect Case chCase 178。$178。: =178。DLR178。Case 178。178。: =178。BPT178。Case 178。%178。: =178。0/0178。Case 178。amp。178。: =178。AND178。Case 178。@178。: =178。AT178。 End SelectEnd Sub六、小結(jié) 在這一講里，我們經(jīng)常需要對給定的條件進行判斷或比較，然后根據(jù)判斷的結(jié)果來決定下一步將采取的操作，這時便可以使用條件測試語句來實現(xiàn)。它有三種結(jié)構(gòu)。單分支，雙分支和多重分支,我們都要學會，并運用。七、作業(yè) 第二講 （
公司管理相關(guān)推薦
鄂ICP備17016276號-1