請教vbs問題,關於vb的小問題

2023-07-13 18:40:13 字數 4595 閱讀 1668

1樓:匿名使用者

比如說乙個引數,變數或常量。

關於vb的小問題

2樓:

setmynum是乙個變數。val表示把括號後面的數轉化為10進製的數值形式。

h是16進製制數字的開頭。寫在" "裡面表示加上&h這兩個字元竄。如加號後面的數值=5的話,setmynum就等於val(&h5)這個意思。

號後面的mid(sur,11+4*1,4)是取值的函式,sur表示從sur這個變數裡面取值,中間的表示從第幾項開值取值,(從第一項開始數,第乙個數為第1項,不是從0開始數)最後面的4為取幾個數,上面如果sur=12345678901234567890的話,而且i 等於1的話setmynum就等於取第15個數開始的後4個數字。就是5678,最後前面加上引號裡的字元,完整的就是,setmynum=val(&h5678)最後結果為 setmynum=22136.因為16進製制的&h5678轉化為10進製的val就是22136

3樓:匿名使用者

val函式將數字字元轉成對應的數值,字元前面加"&h"是將其作為十六進位制處理。mid(sur, 11 + 4 * i, 4)裡面是從sur第11 + 4 * i個字元處開始取四個字元出來。

關於vb的問題

4樓:杜琳禕

str()的作用是將數字型變數或常量改變成字元型變數或常量,舉例如下:

對於常量:str(35)="35 ",str(" 以此類推。(注意字串" 35"的前面有乙個空格。

對於變數:則把變數的值變成字串,如:假定a =287,則str(a)="287 ",以此類推。(注意前面也有空格)

對於你說的str(abc),因為abc不是數字,所以vb系統就把它當成變數abc,就去調abc的值,因從未對abc賦值,系統預設為0,所以就把那個0轉化成字串了,?str(abc) 就列印出字串" 0"(前面有乙個空格)。

綜上所述 str(" 注意 前面有個空格。

5樓:匿名使用者

不懂嗎? 我解釋一下。

len()是取位元組長度 "3212" 長度是4 所以 開頭是4然後str()是強制轉換 原本是浮點形的 轉換成了字元型之後是 4+字元型的 就是4 然後用str強制轉換成了字元型 所以 b 4 出來是字元型的。

我的部落格。

6樓:網友

我認為應該是a 因為是字串連線呀 不是數值相加 怎麼回事b呢 不可能有空格的。

7樓:匿名使用者

str是將數字轉換為字串。

用在兩個字串之間,它的作用相當於字串連線符 &樓上的你看看 msdn 對str的介紹就知道為什麼會有空格了當用str將一數字轉成字串時,總會在前頭保留一空位來表示正負。如果 數字 為正,返回的字串包含一前導空格暗示有一正號。

所以是b,不是a

如果沒有使用str進行轉換,那結果就是你說的。

8樓:匿名使用者

private sub command1_click()

dim warning as string

dim sql as string

warning =

輸入有效性判斷。

if textuser = then warning = warning & 使用者名稱 "

if textpassword = then warning = warning & 密碼 "

if warning <>then

msgbox warning & 不能為空值!",0 + 48 + 0, "警告"

textuser =

textpassword =

elsesql = select * from 使用者管理 where 使用者名稱 ='textuser & and 使用者密碼 ='textpassword &

sql = select * from 使用者管理 where 使用者名稱 ="textuser & and 使用者密碼 = textpassword &

openrs (sql)

if not ( and then

grade = rst("使用者等級") 記錄使用者等級。

userid = rst("使用者名稱") 記錄使用者名稱。

call userlogin '填寫登陸記錄。

trueunload me

elsemsgbox "該使用者不存在!",0 + 32 + 0, "登陸失敗"

textuser =

textpassword =

grade = 0

end if

closers

end if

end sub

vb的問題

9樓:

int函式是取整的。

因此表示式的值是:32+23=55

vb難題,求教高手

10樓:瑞安阿芳

第1題: 選 c

因為 a)ia是整型,在記憶體佔2位元組, =2b)b是單精度,在記憶體佔4位元組, =4

c)s是固定長度的字串,長度為5,儘管賦值時只乙個字元,後面仍會以空格補上, =5

d)變長字串,賦值時為4, =4

第2題: 選 a

因為 16384在這裡是integer(短整型) *2後,數值就超過 短整型(最大32767)的範圍,導致溢位。而d選項中32768是vb自動認為是長整型,另外b中的是單精度,所以結果是單精度再轉成long.

若想a也正確,可寫做: 16384& *2

11樓:張王明

第一題 len 函式就是 字串長度。

ia 是 5 ,b是 4 s 是1 ch是4 所以選ia

第二題,選a

12樓:匿名使用者

第一題:選c,s宣告時長度定義為5,其它都小於5

第二題:選a,因為預設相乘會溢位,32767是整型邊界值。

關於vb 的一些問題

13樓:匿名使用者

1,符號 & 是字串運算號,其作用簡單的說就是連線字串:

例如:s1 = abc"

s2 = e12y"

s = s1 & s2

結果:s裡邊的內容為:「abce12y」

2,vbtab是vb系統提供的常數,它等於chr(9),表示乙個「tab」字元。

3,在表示式 s & a * b & vbtab 裡,有數字運算符號*與字串運算符號&同時存在,vb規定先執行數字運算,後執行字串運算,然後在執行字串運算,假設a & b = 12,s & 12 時,後面12是數值,vb具有自動轉換功能,將12轉換成「12」,然後進行&運算。

注意:控制符是不可顯示的字元,所以顯示s將看不到其結果,但是你可以用print len(s)

來顯示s的長度,來檢驗後面確實有乙個字元存在。

請教vb問題

14樓:匿名使用者

涉及的知識:

1,產生隨機數。

2,陣列。3,排序演算法。

解決思路:1,產生隨機數:

x = int(rnd*10)

2,本題用二維陣列,第1維存放0-9,第2維存放對應出現的次數。

定義陣列,並初始化,使得陣列的第一維,存放0-9的數字,即:

d(1,0)=0;d(1,1)=1;d(1,2)=2;..d(1,9)=9;

dim d(1 to 2,0 to 9) as integerdim i as integer

for i=0 to 9

d(1,i)=i

d(2,i)=0 '第2維設定0

next i

3,排序演算法,網上很多搜一下就有。

完整**:1,初始化。

dim d(1 to 2, 0 to 9) as integerdim i as integer

for i = 0 to 9

d(1, i) =i

d(2, i) =0

next i

2,產生隨機數,並計數。

dim x as integer

randomize

for i = 1 to 200

x = int(rnd * 10)

d(2, x) =d(2, x) +1 '說明:假設x=5,那麼d(1,5)裡存放的是5,這樣使得d(2,5)增加1

next i

3,排序。dim j as integer

for i = 0 to 9 - 1

for j = i + 1 to 9

if d(2, i) d(1, i) =d(1, j)

d(1, j) =x

x = d(2, i)

d(2, i) =d(2, j)

d(2, j) =x

end if

next j

next i

4,輸出排序結果。

print "數字", 結果"

for i = 0 to 9

print d(1, i), d(2, i)next i

VB的小問題

是賦值的意思,作用是把a i 和a j 的值交換。zj a i zj為a i 的值a i a j a i 的值變為a j 的值a j zj a j 的值變為zj的值 也就是a i 的值 如果a i a j 交換他們倆的值。應該是找陣列裡面最小值的迴圈裡的句子。如果a i 大於a j 就把a i 的數...

請教vb問題,請教乙個vb問題

註釋寫在 裡了,望採納 private sub command1 click text1.text visual basic 當單擊command1按鈕時,text1文字框會顯示 visual basic end sub private sub text1 lostfocus 當文字框text1失去...

關於VB的問題,關於VB模組的問題

not isempty 試下,最好說下報的什麼錯誤。按我理解應該改成如下的 private sub 計算1 click if isnumeric tbis1 and isnumeric tbu1 and isnumeric tbut1 then tbid1 tbis1 exp tbu1 tbut1 ...