91超碰碰碰碰久久久久久综合_超碰av人澡人澡人澡人澡人掠_国产黄大片在线观看画质优化_txt小说免费全本

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

如何使用VB語言制作一個簡單的調查表

發布時間:2022-01-14 18:02:49 來源:億速云 閱讀:443 作者:小新 欄目:大數據

小編給大家分享一下如何使用VB語言制作一個簡單的調查表,希望大家閱讀完這篇文章之后都有所收獲,下面讓我們一起去探討吧!

一、案例要求

我們需要制作一個簡單的調查表,要求如下:

1.form1窗體為啟動窗體,通過窗體初始化時間將標題初始化為"調查表"。

2.制作窗體界面。

3.點擊“上傳”按鈕,將把輸入的“姓名”從form2窗體輸出。將其它選中的控件文本輸出到form2窗體。

界面如下:

如何使用VB語言制作一個簡單的調查表

界面1

如何使用VB語言制作一個簡單的調查表

界面2

二、知識要求

這里可能遇到的問題是不同窗體之間數據的傳遞問題。

那么,如何在form1中去改變form2的標題?

form2.caption="這里是要改變的內容"

需要補充的符號運用:

&符號的作用:將字符串類型的數據進行連接

;符號的作用:也是連接字符串,且會把下一行的print輸出內容連接起來

提問:如何使得窗體居中顯示?

1.選中form窗體

2.在屬性中找到StartUpPosition屬性選擇2-屏幕中心

復選框checkbox

  • 設置文本:caption屬性

  • 設置是否選中:value屬性

value屬性的值:0代表沒有選中,1代表選中,2代表強制選中

單選框optionbutton

  • 設置文本:caption屬性

  • 判斷是否選中:value屬性

value屬性的值:true表示選中,false表示沒有選中

本節知識form1窗體源代碼:

Private Sub Command1_Click()Form2.Show


Form2.Caption = Text2.Text & "的調查表"
Form2.Print "姓名:" & Text2.Text
'夢想
If Check1.Value = 1 Then    Form2.Print "夢想:" & Check1.CaptionEnd If

If Check2.Value = 1 Then    Form2.Print "夢想:" & Check2.CaptionEnd If
If Check3.Value = 1 Then    Form2.Print "夢想:" & Text1.TextEnd If
'性別If Option1.Value = True Then    Form2.Print "性別:" & Option1.Caption    End If
If Option2.Value = True Then    Form2.Print "性別:" & Option2.Caption    End If

End Sub
Private Sub Form_Load()'作者:劉金玉'初始化form1窗體標題Form1.Caption = "調查表"

End Sub

看完了這篇文章,相信你對“如何使用VB語言制作一個簡單的調查表”有了一定的了解,如果想了解更多相關知識,歡迎關注億速云行業資訊頻道,感謝各位的閱讀!

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

温宿县| 晋州市| 疏勒县| 依安县| 万源市| 营口市| 平泉县| 景洪市| 罗山县| 佛学| 祁阳县| 双峰县| 金秀| 宁都县| 中江县| 界首市| 奉节县| 成安县| 泰宁县| 林芝县| 朝阳市| 乌审旗| 邵东县| 全州县| 平利县| 溧阳市| 兴和县| 江源县| 麻江县| 内江市| 姚安县| 原阳县| 松江区| 宁都县| 英吉沙县| 泾阳县| 永丰县| 乳山市| 中超| 南澳县| 长岭县|