小吳 VBQA 程式設計討論

請各位 高手 教一下這題目吧 期末考的考試 題目 我打出題目卷的題目給各位看! １： 用亂速產生檢數及被減數 當學生輸入正確答案時 程式顯示"正確" 當學生輸入錯誤答案時 程式顯示"錯誤" ２： 程式會反覆出題　直到按下離開 ３： 可選擇　個位數　二位數　三位數　四位數的加法 ４： 家下列程序 PRIVATE SUB FORM_LOAD() FORM1.CAPTION="學號,姓名" END SUB ５： 設計一個 "離開" 按鈕可以結束程式 請會的人幫忙一下吧~ 真的很感謝 老師有給畫面 如下: ___________________________________________________ FROM1 l 請選擇幾位數運算 個位 二位 三位 四位 l 168　　　　　　　　　　　　　　　　　　　　　 　　- 32　　　　　　　　　　　　　　　　　　　　　 ____________ 132　　　　　　　　離開　 ＜==== 這是離開按鈕　 　正確　　　　　　　　　　　　　　　　　　　　　　 ___________________________________________________ 那些l 是本來想用右邊的直線的 沒用好 各位高手 請幫忙一下了 真的很感激

這很容易吧 自己看一下書就能寫了 亂數用Rnd 函數 半斷用if 加減用+- 程式結束用End 其它告自己看書 實在看不出有什麼是可以當問題的

如果你願意花錢...自然會有人幫你

用Rnd函數前要先加上Randomize陳敘式

Option Explicit Private Sub Command1_Click(Index As Integer) Dim X As Single Dim Y As Single Dim i As Integer Dim n As Integer Randomize X = Rnd Y = Rnd Select Case Index Case 0 　　　 n = 10 　　　 Case 1 　　　 n = 100 　　　 Case 2 　　　 n = 1000 　　　 Case 3 　　　 n = 10000 　　　 Case 4 　　　 End End Select Text1.Text = Int(X * n) Text2.Text = Int(Y * n) Text3.Text = Text1.Text - Text2.Text End Sub Private Sub Form_Load() Form1.Caption = "學號,姓名" Text1.Text = "" Text2.Text = "" Text3.Text = "" End Sub command 元件設5個群組 text 設3個不同的