1、19實驗報告年月日第節(jié)樓號室課程名稱計算機(jī)程序設(shè)計學(xué)生姓名學(xué)號專業(yè)與年級進(jìn)入實驗室時間進(jìn)入時儀器設(shè)備狀況離開實驗室時間離開時儀器設(shè)備狀況機(jī)器號實驗項目名稱VisualBasic程序設(shè)計實驗預(yù)習(xí)報告三39PrivateSubComm1_Click()IfNotIsNumeric(Text1.Text)ThenExitSubIfVal(Text1.Text)Mod3=0Val(Text1.Text)Mod7=0ThenLabel2.Capt

2、ion=“Yse“ElseLabel2.Caption=“No“EndIfEndSub2.打開工程文件Dsg0302.vbp，在標(biāo)題為“坐標(biāo)象限”的窗體Fm1上，添加兩個標(biāo)題分別為“坐標(biāo)x”和“坐標(biāo)y”的標(biāo)簽Label1和Label2；然后再添加3個文本內(nèi)容為空的文本框Text1、Text2和Text3；最后添加一個標(biāo)題為“判斷”的命令按鈕Comm1。程序運行時，在Text1和Text2中分別輸入某點的坐標(biāo)值x和y（不等于0），單擊“判