2015-12-27 84 views
0

我有一個表單將顯示客戶端信息。我所做的是我創建了一個用戶控件,其中包含一系列相鄰的Fname,Lname,Dob,SSN等文本框。在表單本身上,我創建了一個用戶控件的副本,但帶有標籤以顯示我將在用戶控制本身的信息。因此,在FORM_LOAD上,我從服務器提取數據,我需要它添加與數據庫中的客戶端一樣多的USER控件。我看到的問題是,每當我用這句話添加一個控件時在加載時將用戶控件添加到VB6表單上?

Dim myCtl As Control 
Set myCtl = Controls.Add("Project1.UCclient", "MyCtl", frmClientUC) 
     myCtl.Visible = True 

....用戶控件名稱被加1。所以我在窗體上添加的第一個是ucclient1,然後如果我添加另一個它的ucclient2等等。此外,我加載了一個用戶控制數據(只是爲了確保它的工作),我不得不指定我參考的ucclient。所以對於我裝我第一個從SQL-SERVER選擇的數據,然後做這個...

ucclient1.fldFirstName =RS!FirstName 
ucclient1.fldLastName = RS!LastName 

...等所有領域。因爲我必須指定我將數據放入哪個用戶控件表單,所以它有自己增加它的方法嗎?可能循環?我是VB6的新手,我只是遇到了困難,沒有1000行代碼就可以和諧地工作。

+0

請閱讀[我如何問一個好問題?](http://stackoverflow.com/help/how-to-ask)。這不是一個問題,更不用說一個好問題。 –

回答

0

你會這樣做,就像你會控制。在設計模式下將一個控件放在窗體上。將其索引屬性設置爲0以使其成爲控件數組。 (如果你有一個你不想要任何控件的上下文,那麼使它不可見,然後在需要時使它可見。)然後根據需要添加更多控件,設置Top和Left屬性以將它們放置在頁。

Here是在運行時將控件添加到控件數組的文檔。

0

好的。我發現了一條新路。它運作良好。 +在form1上添加一個新的用戶控件(U1)。 +複製代碼U2(另一個項目的用戶控制)到U1中。用相同的名稱保存它。 +關閉U1 +在Form1中,打開ToolBox並單擊U1。有一個錯誤消息apear,你會看到控制名稱丟失(缺少名稱)。 +打開U2的屬性。選擇缺少的名稱以查看控制權。 +打開U1並添加控件並將其命名爲相同名稱(缺少名稱)。 +返回Form1並點擊工具箱中的U1添加控件U1。 +使屬性U1與U2相同。 對不起我的英語。

+1

如果你可以格式化答案,它會更好的可讀性。 – Sid