大體說下思路吧,需要用到“自定義控件”,把自定義控件設(shè)計(jì)為“Tablen”的樣式(里面用到多個(gè)label),然后根據(jù)數(shù)據(jù)查詢結(jié)果,動(dòng)態(tài)的把“自定義控件”的實(shí)例加到panel控件(Autoscroll設(shè)為true)上(或者flowlayoutpanel)即可。
目前創(chuàng)新互聯(lián)已為成百上千的企業(yè)提供了網(wǎng)站建設(shè)、域名、虛擬主機(jī)、網(wǎng)站托管維護(hù)、企業(yè)網(wǎng)站設(shè)計(jì)、高坪網(wǎng)站維護(hù)等服務(wù),公司將堅(jiān)持客戶導(dǎo)向、應(yīng)用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶和合作伙伴齊心協(xié)力一起成長(zhǎng),共同發(fā)展。
自定義控件的使用你可以查詢一下相關(guān)資料,和vb的基本是一樣的
打開VisualBasic6.0軟件,新建一個(gè)標(biāo)準(zhǔn)exe工程,或者打開一個(gè)已經(jīng)存在的工程,按下Shift+F7或者打開視圖菜單-對(duì)象窗口,打開窗體界面;
2、通過資源管理窗體,雙擊其中的.frm窗體設(shè)計(jì),進(jìn)入窗體設(shè)計(jì)界面;
3、窗體界面見下圖;
4、打開視圖菜單-工具箱,打開工具箱的界面;
5、然后就可以將工具箱中的控件拖放到設(shè)計(jì)界面上,這就是所謂的窗體設(shè)計(jì)器。
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
Dim?aa?As?Integer?=?Val(TextBox1.Text)
Dim?i?As?Integer
For?i?=?2?To?aa
If?aa?Mod?i?=?0?Then
TextBox2.Text?+=?i.ToString?+?"??"
aa?=?aa?/?i
i?=?2
End?If
Next
End?Sub
Form1_Load(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?MyBase.Load
TextBox1.Text?=?ss()
TextBox2.Text?=?ss()
End?Sub
Function?ss()
Randomize()
Dim?a?As?Integer?=?Int(Rnd()?*?100)
Return?a
End?Function
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
If?Val(TextBox1.Text)?+?Val(TextBox2.Text)?=?Val(TextBox3.Text)?Then
i?+=?1
Label3.Text?=?"正確"
Else
j?+=?1
Label3.Text?=?"錯(cuò)誤"
End?If
aa?+=?1
End?Sub
Private?Sub?Button2_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button2.Click
TextBox1.Text?=?ss()
TextBox2.Text?=?ss()
TextBox3.Text?=?""
Label3.Text?=?""
End?Sub
Private?Sub?Button3_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button3.Click
TextBox4.Text?=?"你已經(jīng)答了"?+?aa.ToString?+?"題,答對(duì)"?+?i.ToString?+?"題,"?+?"答錯(cuò)"?+?j.ToString?+?"題。"
End?Sub
Windows 窗體設(shè)計(jì)器的作用是( B) 。
A. 編寫程序代碼 B. 設(shè)計(jì)用戶界面
C. 提供 Windows 窗體控件 D. 顯示指定對(duì)象的屬性