vb中的問題,vb中的乙個問題

2022-03-08 17:49:38 字數 2783 閱讀 7469

1樓:

這個格式化數字的函式, 可以把數字按使用者要求的格式顯示, 2.34 對應後面的引號內的"0.00",表示格式為小數點前一位數及後面兩位數,其餘位數字四捨五入, 後面"e+00"表示指數形式, e+02 表示10的兩次方.

2樓:

這是將 234.45 轉變為科學計數法,不進行四捨五入print format$(234.45, "0.

00e+00")e 前面是 0.00,小數點前面是1個0,小數點後面有2個0,表示傳變為1位整數,2位小數的形式。

e 後面是 00,是2個0,表示指數,即10的幾次方,用2位數表示。

2.34e+02 等同於:2.34 * 10^2又如:

print format$(234.45, "00.00e+000")

表示傳變為2位整數,2位小數的形式

10的幾次方,用3位數表示

結果是: 23.44e+001

等同於:23.44 * 10^1

3樓:悠悠周郎

這是格式化函式,將任意數字表示為 #.##########……+00 的形式,即科學計數法的形式。0.00e+00 即表示科學計數法並保留小數點二位。

4樓:匿名使用者

格式化陣列,好像是。我也是菜鳥!

關於vb中的乙個問題

5樓:寒信

'注意陣列的上下界,b(3,3)=b(0 to 3,0 to 3)。

'**修改如下:

dim a(1 to 9)

dim b(1 to 3,1 to 3)

.....

for i=1 to 9

j=(i-1)\3 +1

k=((i-1) mod 3)+1

b(j,k)=a(i)

next i

6樓:首桂蘭慕溪

樓上幾個哥們輸入0的方式用迴圈太複雜了

用string函式就可以實現了

private

subcommand1_click()

text2.text

=string(val(text1.text),"0")

endsub

而你另乙個提問的問題用replace函式

private

subcommand1_click()

text2.text

=replace(text1.text,"","0")

endsub

replace(expression,

find,

replacewith[,

start[,

count[,

compare]]])

replace函式語法有如下幾部分:

部分描述

expression

必需的。字串表示式,包含要替換的子字串。

find

必需的。要搜尋到的子字串。

replacewith

必需的。用來替換的子字串。

start

可選的。在表示式中子字串搜尋的開始位置。如果忽略,假定從1開始。

count

可選的。子字串進行替換的次數。如果忽略,預設值是-1,它表明進行所有可能的替換。

compare

可選的。數字值,表示判別子字串時所用的比較方式。關於其值,請參閱「設定值」部分。

vb程式中mousedown函式的乙個問題?

7樓:匿名使用者

這是個事件,不是函式。事件意味著當滑鼠按下時,系統會自動呼叫這個過程。

你在處理這個事件時可能需要知道是按下了哪個鍵(button引數,比如滑鼠左鍵,右鍵或者中鍵),是否同時按下了控制鍵(shift引數,比如shift鍵,ctrl鍵,alt鍵)

引數的用法,用and比較:

if button and vbleftbutton then '按下的是滑鼠左鍵

if shift and vbkeyctrl then '按下了ctrl鍵

這個兩個引數可以組合判斷,比如:

if (button and vbrightbutton) and (shift and vbkeyshift) then '按下 shift 的同時點選右鍵

if (button and vbleftbutton) and (button and vbrightbutton) then '同時按下左右鍵,通常等同於中鍵

這兩個都是以二進位制表示的引數,每一位表示乙個按鍵,可以完美的表示按鍵組合,比如:

vblefttbutton = 1 '00000001

vbrightbutton = 2 '00000010

那麼要表示左右鍵同時按下就是

vbrightbutton + vblefttbutton = 3 '00000011

在判斷時可以獨立的判斷某個鍵是否按下

if button and vbleftbutton then '按下了滑鼠左鍵

if button = vbleftbutton then '按下的僅僅是滑鼠左鍵

也可以用多種方法判斷按鍵組合

if (button and vbleftbutton) and (button and vbrightbutton) then

if button = (vbleftbutton+ vbrightbutton) then

if button =3 then

c與vb的問題

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

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

VB的另問題,VB的另乙個問題

第一種方法 private sub command1 click for i 1 to 3 print tab 4 i for j 1 to 2 i 1print next print next for k 2 to 1 step 1print tab 4 k for l 1 to 2 k 1pri...

問關於VB的問題,問乙個關於VB 的問題?

1全部定義陣列m,產生3個陣列元素m 0 m 1 m 2 dim m 2 通過迴圈,為陣列元素賦初值,m 1 0,m 2 0 for i 1 to 2 m i 0 next i 以下是二重迴圈,外迴圈i 可取值1,2 內迴圈j可取值1,2。執行時 當外迴圈i 1時,內迴圈變數j的取值走一圈,如下 i...