1樓：livingroom寶貝
private sub command1_click()randomize
dim a(10) as integer, b(10) as integer
dim c as integer
for i = 0 to 9
a(i) = int(rnd * 10)
b(i) = int(rnd * 10)
c = int(rnd * 2)
if c = 0 then
print a(i) & " + " & b(i) & " = " & a(i) + b(i)
else
print a(i) & " - " & b(i) & " = " & a(i) - b(i)
end if
next
end sub
2樓：匿名使用者
給小孩用的？
用隨機函式
dim rr as new random
dim i1, i2 as integeri1 = rr.nextdouble * 10i2 = rr.nextdouble * 10messagebox.
show(i1 & "+" & i2)
vb 在label中隨機產生10以內的加減乘除怎麼做
3樓：匿名使用者
在窗體上加1個標籤label1，乙個按鈕command1，參考**如下：
private sub command1_click()
dim a(1 to 2) as integer
dim x as integer
dim n as integer
dim i as integer
dim tf as boolean
dim myop as string
'產生2個不相等的數，用於運算
randomize
n = 0
do while n < 2
x = int((10 * rnd) + 1) ' 生成 1 到 10 之間的隨機數值。
tf = false
for i = 1 to n
if x = a(i) then
tf = true
exit for
end if
next i
if not tf then
n = n + 1
a(n) = x
end if
loop
'產生1個1--4中的任意乙個數，表示運算符號
'1----表示加法
'2----表示減法
'3----表示乘法
'4----表示除法
randomize
x = int((4 * rnd) + 1) '生成 1 到 4 之間的隨機數值。
select case x
case 1
myop = "＋"
case 2
myop = "－"
case 3
myop = "×"
case 4
myop = "÷"
end select
'將算式顯示在標籤label1裡
label1.caption = a(1) & myop & a(2) & "= ？"
end sub
怎麼用VB設計登陸介面，怎麼用VB設計乙個登陸介面？
1.首先新增2個label控制項，乙個caption為使用者名稱，乙個為密碼然後分別在2個label控制項後面新增乙個text控制項，2.將text的text屬性設定為空再新增2個button按鈕，乙個名為登陸，乙個名為取消簡要 如下 private sub text2 change sswordc...
用VB如何設計打字程式啊，各位大哥大姐幫幫忙啊
新增控制項.command1 frame1 label1 label6 timer1 timer2 窗體 測試好的,大概就是這樣 稍微改下就可以實現你所說的功能 option explicit dim score as integer dim speed as integer sub init la...
用VB程式設計序，要求輸入年份，判斷出是否為閏年
1 開啟visual basic軟體 vb軟體 新建工程，在form1窗體黑點區域雙擊進入form1的編輯區域 2 清空後，就可以編寫 了。這裡在輸入欄中輸入年份，輸入之後點選確定，就會在form1中會顯示出是否閏年。關於閏年的判斷只要滿足能被4整除不能被100整除或者被4和400整除就是達成條件，...
vb程式設計 電話撥號盤設計，VB程式設計 電話撥號盤設計
窗體上隨意放置乙個timer1 command2 command1 text1 控制項。並設定command1.index 0。dim s as string dim n as integer dim p as integer private sub command1 click index as ...
vb某例項解答，求用VB解答
製作這個程式的時候先在窗體中加入乙個標籤，並且把窗體標籤的內容設定為空，然後再製作乙個命令按鈕，也把命令按鈕的顯示改為開始，再加入乙個定時器控制項。核心在於計時器控制項中。需要設定乙個全域性變數t，並且在窗體的裝載事件中設定t的值為60，並且把標籤的顯示就是等於t。然後設定定時器控制項的屬性，時間屬...