22. januar 2008 - 10:51Der er
9 kommentarer og 1 løsning
Opret et objekt (f.eks. et nyt billede) på et billede
'Placerer objekter Form1.Controls.Add "VB.TextBox", "Tekst1" With Form1!Tekst1 .Visible = True .Width = 1000 .Text = "Hejsa" .Left = 1000 End With
Overstående kode opretter, i dette tilfælde, en textbox på formen (form1). Dens attributes (f.eks. left) tildeles i forhold til formen. Dvs. giver vi den left = 1000, så dukker den op 1000 fra formens "0"-punkt.
Jeg ønsker at oprette et objekt (lige meget om det er et billede, en textbox, eller whatever ;)) på et billede (picture1) - som allerede findes på formen (form1). Dvs. når vi tildeler det nye objekt attributes, f.eks. left = 1000, så tildeles det i forhold til hvor billedet er i forvejen.
Dvs. vi kan rykke rundt på billedet, og objektet følger med.
Har et ekstra spørgsmål, du gerne må svare, hvis du har tid? :) Ikk et krav til point.. men hvad nu hvis jeg ønsker at lave en løkke som laver 100 forskellige objekter. Og placerer alle 100 på billedet?
Dim CtrlName As String Dim i As Integer For i = 1 To 100 CtrlName = "PictureNinja" & CStr(i) frmMain.Controls.Add "VB.PictureBox", CtrlName With frmMain.Controls(CtrlName) .Visible = True .Width = 1000 .Top = 300 .Left = 1000 End With Set frmMain.Controls(CtrlName).Container = frmMain!picMap Next i
Can you please send your Visual Basic problem to me in English, i can solve it
Email Me: binuyogi@hotmail.com
Thanks, Binu
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
