亚洲激情专区-91九色丨porny丨老师-久久久久久久女国产乱让韩-国产精品午夜小视频观看

溫馨提示×

溫馨提示×

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

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

如何使用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

广水市| 延吉市| 璧山县| 红安县| 汾阳市| 龙江县| 安国市| 丰台区| 焉耆| 闻喜县| 乌拉特后旗| 六枝特区| 宁远县| 浑源县| 禹城市| 汉中市| 晋城| 云梦县| 师宗县| 连江县| 海丰县| 桓仁| 朝阳县| 淮阳县| 仙桃市| 商城县| 利辛县| 怀远县| 枣强县| 于田县| 合川市| 鱼台县| 安塞县| 高青县| 延寿县| 阆中市| 双城市| 巴中市| 开原市| 青神县| 东丽区|