窗體上有文字框tet命令按鈕分別為

2022-03-09 07:22:53 字數 1557 閱讀 2194

1樓:

dim n(9) as variant, max as integer, min as integer, sum as integer

private sub command1_click()dim i as integer

randomize

for i = 0 to 9

n(i) = int(rnd * 90) + 10if i = 0 then

max = n(i)

min = n(i)

else

if max < n(i) then max = n(i)if min > n(i) then min = n(i)end if

sum = sum + n(i)

next

text1.text = join(n, ",")end sub

private sub command2_click()msgbox "最小值是" & min

end sub

private sub command3_click()msgbox "最大值是" & max

end sub

private sub command4_click()msgbox "平均值是" & sum / 10end sub

2樓:蕭浪浪

加qq13839633

?在窗體上畫一個命令按鈕和一個文字框(名稱分別為command1和text1),並把窗體的keyp 20

當在文字框中輸入「abcd」4個字元時,窗體上顯示的是?

3樓:

c,當你每輸入 一次時,都會把text1的文字全部打出來,因此是c。

文字框是一個計算機系統工具,在word中文字框是指一種可移動、可調大小的文字或圖形容器。在powerpoint中,文字框是已經存在的,可以直接在文字框內編輯文字。在word中文字框是指一種可移動、可調大小的文字或圖形容器。

使用文字框,可以在一頁上放置數個文字塊,或使文字按與文件中其他文字不同的方向排列。

在powerpoint中,文字框是已經存在的,可以直接在文字框內編輯文字。文字框可以拖動,改變大小(文字框內的文字不改變大小)。當然你也可以不使用既得的文字框而新建文字框。

方法是:單擊插入,選擇文字框即可。

設計一個只接受字母鍵的文字框,在文字框text1中輸入一串字元時,文字框text2中就即

4樓:兄弟連教育北京總校

private sub text1_keypress(keyascii as integer)

if not (asc("a ") <= keyascii and keyascii <= asc("z ") or _

asc("a ") <= keyascii and keyascii <= asc("z ")) then

keyascii = 0

end if

text2.text = strreverse(text1.text)

end sub

VB題在窗體上建立文字框和兩個命令按鈕 在前兩個文字框

交換 strw text1.text text1.text text2.texttext2.text strw 合併 text3.text text1.text text2.text vb語言 在窗體上建立三個文字框和兩個命令按鈕。在前兩個文字框輸入文字,單擊 交換 按鈕,將 text3.text ...

ACCESS窗體裡,輸入文字框的值,另文字框的值也隨著改變,怎麼弄

你只是差了一個單引號,dlookup 名稱 橋樑彙總表 編號 me.編號 這次你再試試 dlookup 名稱 橋樑彙總表 編號 編號 文字型表示法 變數 數值型表示法 變數 日期型表示法 變數 在access資料庫窗體中怎麼實現一個文字框中輸入內容,在另一個文字框中顯示根本剛才輸入的內容?fx dl...

在VB中,有按鈕和文字框,單機按鈕把文字框裡的內容儲存到Excel,已經實現了,但是每次都

問題是該描述詳細些,具體要做什麼。是不是要加入到某一列,還是放入到某一個單元格?如果是加入到某個單元格 cell i,j cel i,j text 如果要加入到某一列,你要先判斷從那一行可開始存放資料,從該列第一個空單元格放起,存放前先檢測第一個空單元格位置 i 1do while cell i,j...