1樓:匿名使用者
1、首先,在窗體上面新增一個文
本框。2、單擊文字框,在屬性視窗設定文字框的屬性,清空文字內容,將文字框的enabled屬性設定為false。
3、雙擊「提取資訊」命令按鈕,編寫程式的**,如下圖所示。提取資訊時,需要使用擷取字串相關的函式,如left,right,mid等。本題還需要使用instr函式查詢字元。
4、雙擊「清空」命令按鈕,編寫程式的**。
5、雙擊「退出」命令按鈕,編寫程式的**。
6、最後輸入字串時,就可以出輸入了。
2樓:黎洪璋
需要新建一個使用者窗體userform1,在窗體上建立text1、text2、text3和text4文字框,然後再建立一個命令按鈕,在命令按鈕裡輸入**: userform1.textbox2.
value = userform1.textbox1.value
具體怎麼判斷字母個數和字元個數可以從網上查查,我現在沒時間查了,就隨便寫一句吧。呼叫窗體的命令是userform1.show
3樓:
可以依次取出每個字元,將其轉化為ascii值,這樣判斷語句會簡單些
4樓:匿名使用者
俺是會的人,沒寫**,能說一下思路麼?
5樓:匿名使用者
private sub ***mand1_click()text2.text = 0
text3.text = 0
text4.text = 0
for i = 1 to len(text1.text)if mid(text1.text, i, 1) like "[a-z]" or mid(text1.
text, i, 1) like "[a-z]" then
text3.text = val(text3.text) + 1elseif mid(text1.text, i, 1) like "[0-9]" then
text2.text = val(text2.text) + 1else
text4.text = val(text4.text) + 1end if
next
end sub
請教VB高手程式執行時間的問題,請教VB高手一個程式執行時間的問題
你可以這樣計算 開始程式前先執行一段 private declare function gettickcount lib kernel32 as long dim pertime as long private sub form load dim timer1 as long timer1 gett...
在VB中,有按鈕和文字框,單機按鈕把文字框裡的內容儲存到Excel,已經實現了,但是每次都
問題是該描述詳細些,具體要做什麼。是不是要加入到某一列,還是放入到某一個單元格?如果是加入到某個單元格 cell i,j cel i,j text 如果要加入到某一列,你要先判斷從那一行可開始存放資料,從該列第一個空單元格放起,存放前先檢測第一個空單元格位置 i 1do while cell i,j...
怎樣用VB做個編寫程式,在文字框中顯示當前系統時間,並隨時間進行變化
你新增一個timer控制元件 interval屬性 100 新增事件 private sub timer1 timer text1.text format now,hh mm ss end sub private sub form load timer1.enabled trueend sub pr...