十年網(wǎng)站開發(fā)經(jīng)驗 + 多家企業(yè)客戶 + 靠譜的建站團隊
量身定制 + 運營維護+專業(yè)推廣+無憂售后,網(wǎng)站問題一站解決
制作一個例子如下圖:

西華網(wǎng)站制作公司哪家好,找創(chuàng)新互聯(lián)!從網(wǎng)頁設計、網(wǎng)站建設、微信開發(fā)、APP開發(fā)、成都響應式網(wǎng)站建設公司等網(wǎng)站項目制作,到程序開發(fā),運營維護。創(chuàng)新互聯(lián)成立于2013年到現(xiàn)在10年的時間,我們擁有了豐富的建站經(jīng)驗和運維經(jīng)驗,來保證我們的工作的順利進行。專注于網(wǎng)站建設就選創(chuàng)新互聯(lián)。
程序在附件中下載:Form22
程序中先判斷輸入的是一位字符還是多位字符
如果是一位字符再進行下一級的判斷,所以主要用的上IF 判斷語句....
If Trim(txtInput) = "" Then
MsgBox "請輸入有效內(nèi)容!", 48, "重要提示"
txtInput.SetFocus
Exit Sub
End If
If Len(Trim(txtInput)) 1 Then?? '如果輸入多個字符,顯示"白色"
labRet.BackColor = vbWhite
labRet.Caption = "白色"
Else???????????????????????????????????????? ?? '進入一位字符判斷
If Trim(txtInput) = "0" Then?????????????????????????????????????????
labRet.BackColor = vbBlack
labRet.Caption = "黑色"
Else
If Val(txtInput) = 1 And Val(txtInput) = 3 Then
labRet.BackColor = vbRed
labRet.Caption = "紅色"
ElseIf Val(txtInput) = 4 And Val(txtInput) = 6 Then
labRet.BackColor = vbGreen
labRet.Caption = "綠色"
ElseIf Val(txtInput) = 7 And Val(txtInput) = 9 Then
labRet.BackColor = vbBlue
labRet.Caption = "藍色"
Else
labRet.BackColor = vbWhite
labRet.Caption = "白色"
End If
End If
End If
有問題歡迎繼續(xù)交流...
一般不能,作圖不是vb強項。
系統(tǒng)軟件不用vb做,因為vb是高級語言,對計算機硬件的操作能力不夠。
vb一般開發(fā)應用軟件。
正如一樓所說,vb只適用于.net
framework框架,而這個東西是為windows設計的。如果你實在感興趣,你可以編一個軟件,來虛擬一個操作系統(tǒng),但我建議你,最好不要用vb6,vb6的界面不太友好,這種東西要編出來,一兩個月是要有的。
1、首先下載好VB6.0并解壓,解壓完成后,點擊“SETUP”安裝程序,在VB6.0中文企業(yè)版安裝界面點擊“下一步”。
2、選擇“接受協(xié)議”,并點擊“下一步”。
3、產(chǎn)品號和ID界面中:輸入ID號:111-1111111,姓名自由填寫,然后點擊“下一步”。
4、選擇好安裝VB6.0后,點擊“下一步”,自定義好安裝位置,最好安裝在除C盤外的其他盤中,點擊“下一步”。
5、正式進入安裝程序,依次點擊“繼續(xù)——確定”。
6、然后根據(jù)需要選擇好安裝類型,自定義好安裝位置。
7、選擇好安裝工具,點擊“繼續(xù)”,在彈出的窗口中點擊“忽略”。
8、注意,此時安裝到一半后,安裝程序會無響應,按住鍵盤“Esc+Shift+Ctrl”鍵,彈出任務管理器,將無響應的VB6.0安裝程序結(jié)束掉。
9、打開win 10開始菜單,點擊“所有應用”,找到VB6.0程序,運行VB6.0。
10、可以看到VB6.0程序能夠成功運行,說明已經(jīng)安裝好了。
操作系統(tǒng)一般是用匯編加C語言寫的。VB不能操作低層硬件,不可能用來寫系統(tǒng)。
當然可以,vb比較簡單好學,找一個例子看一下就會了,不過要有一定的語言基礎,特別有C語言基礎比較好(知道基本的就可以了,不需要指針等一些復雜的)