2、工程中有Form1和Form2兩個(gè)窗體。Form1窗體外觀如圖1所示。程序運(yùn)行時(shí),在Form1中名稱為Text1的文本框中輸入一個(gè)數(shù)值(圓的半徑),然后單擊命令按鈕“計(jì)算并顯示”(其名稱為Command1),則顯示Form2窗體,且根據(jù)輸入的圓的半徑計(jì)算圓的面積,并在Form2的窗體上顯示出來,如圖2所示。如果單擊命令按鈕時(shí),文本框中輸入的不是數(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秒到達(dá)戰(zhàn)場
TA貢獻(xiàn)1828條經(jīng)驗(yàn) 獲得超6個(gè)贊
【4】: Text1.text
【5】: Text1.text
【6】: Form2.Print 3.141592653 * r * r
- 2 回答
- 0 關(guān)注
- 265 瀏覽
添加回答
舉報(bào)
0/150
提交
取消