東北大學(xué),可視化程序設(shè)計vb01第1章-資料下載頁
2025-01-13 17:13本頁面
【正文】 ?程序運行與保存 一個簡單的應(yīng)用程序的開發(fā)示例 【 例 】 設(shè)計一個應(yīng)用程序，在窗體上分別放置 2個標簽框 、 2個文本框 和 2個按鈕控件 ： ?Label1的 Text屬性值為“今天距北京 2022年奧運會開幕還有” ?Label2的 Text屬性值為“天” ?Button1的 Text屬性值為“確定” ?Button2的 Text屬性值為“結(jié)束” ?TextBox1和 TextBox2的 Text屬性值為空 一個簡單的應(yīng)用程序的開發(fā)示例 程序的功能：用戶在 TextBox1中輸入當日距離 2022奧運會開幕的天數(shù)，單擊“確定”按鈕。 ?若輸入正確，則在 TextBox2中顯示“恭喜你，答對了！” ?若輸入錯誤，顯示“很遺憾，答錯了！” ?用戶單擊“結(jié)束”按鈕則結(jié)束程序運行 一個簡單的應(yīng)用程序的開發(fā)示例 （ 1） 啟動 ，創(chuàng)建一個名為 Form1的空白窗體。 一個簡單的應(yīng)用程序的開發(fā)示例 創(chuàng)建應(yīng)用程序界面 （ 2）依次在窗體中創(chuàng)建 6個對象。 一個簡單的應(yīng)用程序的開發(fā)示例 設(shè)置對象屬性 （ 1）設(shè)置窗體屬性 選中窗體，在屬性窗口中將其 Text屬性值設(shè)置為“程序開發(fā)示例”。 一個簡單的應(yīng)用程序的開發(fā)示例 設(shè)置對象屬性 （ 2）設(shè)置 Label1的屬性 ?Text屬性 值設(shè)置為“今天距倫敦 2022年還有”； ?Font屬性 ，單擊右側(cè)有一個帶“ …” 標志的圖表按鈕，打開字體設(shè)置對話框： ?字體 設(shè)置為“宋體”； ?字形 設(shè)置為“常規(guī)”； ?大小 設(shè)置為“四號” 。 一個簡單的應(yīng)用程序的開發(fā)示例 設(shè)置對象屬性 一個簡單的應(yīng)用程序的開發(fā)示例 設(shè)置對象屬性 一個簡單的應(yīng)用程序的開發(fā)示例 設(shè)置對象屬性 （ 3） 設(shè)置 其它控件屬性 ?Label2： Text屬性值設(shè)置為“天”，字體為“宋體”，字形為“常規(guī)”，大小為“四號”； ?TextBox1： Text屬性值設(shè)置為空，字體為“宋體”，字形為“常規(guī)”，大小為“ 18”； ?TextBox2： Text屬性值設(shè)置為空，字體為“宋體”，字形為“常規(guī)”，大小為“ 18”； ?Button1： Text屬性值設(shè)置為“確定”； ?Button2： Text屬性值設(shè)置為“結(jié)束”。 一個簡單的應(yīng)用程序的開發(fā)示例 設(shè)置對象屬性 一個簡單的應(yīng)用程序的開發(fā)示例 編寫事件過程代碼 （ 1）編寫按鈕 Button1的代碼： 對象 事件 一個簡單的應(yīng)用程序的開發(fā)示例 編寫事件過程代碼 Button1_Click事件過程程序代碼： Private Sub Button1_Click(ByVal sender As , ByVal e As ) Handles If Val() = DateDiff(, Today, 8/8/2022) Then = 恭喜你，答對了！ Else = 很遺憾，答錯了！ End If End Sub 一個簡單的應(yīng)用程序的開發(fā)示例 編寫事件過程代碼 （ 2）編寫按鈕 Button2的代碼： Private Sub Button2_Click(ByVal sender As , ByVal e As ) Handles End End Sub 1052 恭喜你，答對了！ 一個簡單的應(yīng)用程序的開發(fā)示例 運行結(jié)果 1051 很遺憾，答錯了！ 一個簡單的應(yīng)用程序的開發(fā)示例 運行結(jié)果 一個簡單的應(yīng)用程序的開發(fā)示例 程序的運行與保存 在“調(diào)試”菜單中選擇“啟動”選項 (或按 F5鍵 )，運行程序。 ?運行 ?保存 在“文件”菜單中選擇“全部保存”選項以默認文件名存盤。 BACK
范文總結(jié)相關(guān)推薦
鄂ICP備17016276號-1