2、工程中有Form1和Form2兩個窗體。Form1窗體外觀如圖1所示。程序運行時,在Form1中名稱為Text1的文本框中輸入一個數(shù)值(圓的半徑),然后單擊命令按鈕“計算并顯示”(其名稱為Command1),則顯示Form2窗體,且根據(jù)輸入的圓的半徑計算圓的面積,并在Form2的窗體上顯示出來,如圖2所示。如果單擊命令按鈕時,文本框中輸入的不是數(shù)值,則用信息框顯示“請輸入數(shù)值數(shù)據(jù)!”。請?zhí)羁?。Private Sub Command1_Click()If Text1.Text = "" Thenmsgbox "請輸入半徑!"ElseIf Not IsNumeric(【4】) ThenMsgBox "請輸入數(shù)值數(shù)據(jù)!"Elser = Val(【5】)Form2.Show【6】End IfEnd Sub
2 回答
30秒到達戰(zhàn)場
TA貢獻1828條經(jīng)驗 獲得超6個贊
【4】: Text1.text
【5】: Text1.text
【6】: Form2.Print 3.141592653 * r * r
- 2 回答
- 0 關(guān)注
- 279 瀏覽
添加回答
舉報
0/150
提交
取消
