您好,登錄后才能下訂單哦!
小編給大家分享一下如何使用VB語言制作一個簡單的調查表,希望大家閱讀完這篇文章之后都有所收獲,下面讓我們一起去探討吧!
一、案例要求
我們需要制作一個簡單的調查表,要求如下:
1.form1窗體為啟動窗體,通過窗體初始化時間將標題初始化為"調查表"。
2.制作窗體界面。
3.點擊“上傳”按鈕,將把輸入的“姓名”從form2窗體輸出。將其它選中的控件文本輸出到form2窗體。
界面如下:
界面1
界面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.Caption
End If
If Check2.Value = 1 Then
Form2.Print "夢想:" & Check2.Caption
End If
If Check3.Value = 1 Then
Form2.Print "夢想:" & Text1.Text
End 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語言制作一個簡單的調查表”有了一定的了解,如果想了解更多相關知識,歡迎關注億速云行業資訊頻道,感謝各位的閱讀!
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。