1樓:網友
這個函式的功能為:將數字字串 0 到 9 轉變為數字 0 到 9,將大寫和小寫字母 a 到 f 轉變為數字 10 到 15。如果不屬於以上情況,返回 -1
另外,test = 1 end if 有錯,應為:
test = 1
end if
註釋如下:function converthexchr(str as string) as integer
dim test as integer
test = asc(str) '獲得 str 的首字元的 ascii 碼。
if test >=asc("0") and test <=asc("9") then 是數字字串 0 到 9
test = test - asc("0") 數字字串 0 到 9 轉變為數字 0 到 9
elseif test >=asc("a") and test <=asc("f") then
test = test - asc("a") 10 '將小寫字母 a 到 f 轉變為數字:10 到 15
elseif test >=asc("a") and test <=asc("f") then '是大寫字母 a 到 f
test = test - asc("a") 10 '將大寫字母 a-f 轉變為數字:10 到 15
elsetest = 1 '不屬於以上三種情況。
end if
converthexchr = test
end function
2樓:
如果test是數字,那麼函式返回test
如果test是字母,那麼函式返回字母的序號+9(如a和a,返回10;b和b,返回11)
3樓:秋驪蒼清婉
你這就是。
1個一維陣列還有。
12345678x,x就是12345678的和值沒有2位數的嗎?如果有1位以上的數字。
沒有分隔符的嗎?
vb程式的問題
4樓:示煙愛雪
樓主你說的無法點選取消推出和無法計算完回到計算前的視窗是什麼意思哦。
如果要清空文字的話,直接用clean就行了。
vb程式問題?
5樓:靖央捷穎馨
sum=
sum+cint(
預設情況下不能執行吧~把上面那個改成就可以執行了~
輸入1執行100次。
輸入2執行五十次。
這個程式的作用是:文字框的數字加多少次能達到一百。
6樓:前恆閆香旋
輸入1則提示執行了100次,輸入2則提示執行了20次,
7樓:盤舉宜爾冬
你的迴圈寫的有問題,只要輸入的值小於100的都會進行死迴圈,因為sum一直小於100,你得設定跳出迴圈體的陷阱。
8樓:高希祁韻
輸入1則提示執行了100次,輸入2則提示執行了50次,程式是判斷文字框裡的數字進行多少次相加達到一百!
vb程式問題
vb中的一個程式問題
9樓:網友
1全部'你並沒有寫重複的時退出迴圈啊,你的**只是出現相同的時候,顯示一下有相同的,再問一下是否新增,否,則退出,是,則清空文字框, …然後繼續迴圈。
do while not '…暫時改成do loop 迴圈。
if = typename") then
msgbox ("該使用者已存在!")
dim answer as integer
answer = msgbox("是否繼續新增!",vbyesno, "確認")
if answer = vbyes then
txtname =
exit do '…這裡加一句(注意這句還要改,原因下面)
elseunload me
end if
end if
loop'這樣就可以退出了,但你這個程式退出了迴圈還是要新增資料,邏輯上是錯的。因此應該用 exit sub 替換 exit do
關於vb程式的問題
10樓:慶晴虹
end是vb整個應用程式,所有**停止,視窗解除安裝。
exit是模組,可以是迴圈體,函式,過程 比如:"exit sub"vb中還有窗體退出還有,unload xx, 等 如果只有一個窗體也相當於退出程式。
這樣可以麼?
11樓:愛吃機的戰鬥雞
建議你看看str和cstr的區別。
其中,str在將正數轉換為數字字串時,返回的字串要多包含一位,也就是正號。
vb程式問題
vb程式相關的問題。
12樓:匿名使用者
使用 pset 方法 + rnd 隨機函式 即可處理位置隨機、大小隨機、顏色隨機的點。
---程式中有一命令按鈕用於暫停和繼續繪製 --
這隻要給 賦值 = true 或 false 而已。
13樓:匿名使用者
設定一變數,命令按鈕控制變數數值,時鐘控制元件首先判斷數值變數再執行畫圖。 可達到控制效果。
VB程式生成的檔案怎麼發給我,VB程式生成的txt檔案怎麼發給我
最簡單的辦法是拿u盤去拷貝 另外還可以讓程式給你發郵件 利用mapisession控制元件和mapimessages控制元件 選擇部件 microsoft mapicontrols 6.0 參考 private sub cmdsend click mapimessages1.msgindex 1 m...
FORTRAN程式改寫為VB程式
看你那麼慘,就給你翻一個吧 dim psi 9,9 as double 下面有個地方用陣列時超過了5,所以我索性改為9了 esp 0.00001 for j 1 to 5 for i 1 to 8 psi i,j 0 next i next j for j 2 to 4 psi 1,j j 1 0....
地鐵票價計算程式VB流程圖及VB程式
化凌晴 同意樓上 至少我回答問題不是看重錢什麼的 是幫人幫得心安理得 oo蒼雪 學習樓上的精神。助人為樂! 爛掉 蘿蔔 這種上課考試類的 估計給300分都不一定有人做 自己好好學學把 好好學習才是關鍵,這樣以後才不後悔 如何用vb設計一個地鐵票價查詢系統? 地鐵票價查詢系統 這個沒意義吧!按公里收費...