1樓:
'窗體**請到我的空間提取
msgbox "除數為零,請檢查輸入的資料是否正確!", vbcritical + vbokonly, "輸入錯誤"
end if
end if
end sub
private sub mnuclear_click()
text1.text = ""
text2.text = ""
text3.text = ""
label1.caption = ""
end sub
private sub mnuhelp_click()
msgbox "使用方法:" & vbcrlf & _
"1、……" & vbcrlf & _
"2、……" & vbcrlf & _
"3、……"
end sub
private function checktext() as boolean
if not (isnumeric(text1.text) and isnumeric(text2.text)) then
msgbox "請檢查輸入的資料是否正確!", vbcritical + vbokonly, "輸入錯誤"
else
checktext = true
end if
end function
2樓:飄絮風中
3樓:令狐腫
簡單的用高分,浪費。
高分求助!!C程式設計高手進
我有個建議 把table中的td設定為 runat server 並且從第乙個td開始迴圈為 這個td 賦值 id 比如第乙個td id 為td1,第二個為td2,td3,以此類推。這樣在後台程式 怎麼賦值都沒問題了。當然都是for迴圈 賦值的。我以前做過這樣的。或者通過js 賦值 不難的。相信你 ...
VB程式設計高手進, 急 VB程式設計高手進
很簡單的 只告訴你方法思路,現在沒有vb環境所以沒法寫你在text1的keypress時間裡,寫上校驗方法,利用acciss碼來判斷,數字的acciss碼是連續的,你可以查到,除此之外的acciss碼你都不予接受,這樣使用者就無法輸入除了0 9之外的任何內容,如何輸入了,你還可以彈出提示框。思路就這...
高分求答案(VB程式設計高手進)有追加
private sub command1 click 第1題,需要在窗體中加按鈕command1 dim i as integer,j as integer,ka as integer,kc as integer dim b as boolean dim a as integer,c as inte...