Avatar billede stinesondre Nybegynder
15. oktober 2003 - 15:43 Der er 21 kommentarer og
1 løsning

Lage en ny combobox på en form ved bruk av VBA

Jeg ønsker å lage en ny combobox på en form ved bruk av VBA. Og deretter sette høyde, bredde og koordinater. Er dette mulig ?
Avatar billede thesurfer Nybegynder
15. oktober 2003 - 15:57 #1
jeg ved ikke hvor meget forskel der er på VB og VBA.. men det her virker i VB6:

Private Function NewObj(obj As Object, L, T, W, H As Integer, cap As String) As Integer
    obj.Move L, T, W, H
    obj.Caption = hula
End Function

Private Sub Command1_Click()
x = NewObj(Command1, 20, 100, 1000, 500, "hello")
End Sub
Avatar billede juks Novice
15. oktober 2003 - 15:58 #2
dim strUnderSQL as string
strUnderSQL = "SELECT [Underkategori] FROM _Underkategori WHERE Hovedkategori = " & me.comboHovedkategori
me.comboUndercategori.RowSource = strUnderSQL
me.comboUndercategori.requery
Avatar billede thesurfer Nybegynder
15. oktober 2003 - 16:00 #3
juks> hvad gør det der?
det ligner at du henter noget fra en database..?
Avatar billede juks Novice
15. oktober 2003 - 16:12 #4
strUnderSQL = 
er den sql streng man skal bruge  fx
strundersql = select * from tabelnavn
så vælger den alle poster i tabellen

her fortæller vi så at man skal bruge den sql som rowsource
me.comboUndercategori.RowSource = strUnderSQL
Avatar billede stinesondre Nybegynder
15. oktober 2003 - 16:13 #5
Men hvordan lager jeg selve comboboxen ?
Avatar billede stinesondre Nybegynder
15. oktober 2003 - 22:02 #6
juks > Jeg skjønner ikke helt...Hvis jeg skal fylle en combobox som heter kombo med data fra en tabell som heter xtra. Hva blir koden da ?
Avatar billede juks Novice
15. oktober 2003 - 22:14 #7
har du en combo boks eller skal du lave den via vba
Avatar billede stinesondre Nybegynder
15. oktober 2003 - 22:15 #8
Jeg har valgt å ikke lage comboboxen via VBA, men jeg trenger å fylle den med alle data i en tabell via VBA..Er dette mulig ?
Avatar billede stinesondre Nybegynder
15. oktober 2003 - 22:17 #9
Jeg har altså en combobox..
Avatar billede juks Novice
15. oktober 2003 - 22:30 #10
strUnderSQL = "SELECT * FROM xtra"
Avatar billede juks Novice
15. oktober 2003 - 22:31 #11
jeg er heller ikke sikker på man kan oprette en ny combo boks i såfald skal du ha fat i terry :-)
Avatar billede stinesondre Nybegynder
15. oktober 2003 - 22:44 #12
Jeg får en feilmelding når jeg kjører dette:

dim sSQL as string

sSQL = "SELECT * FROM xtra"

DoCmd.RunSQL(sSQL)


Hvorfor får jeg feilmelding på dette ?
Avatar billede juks Novice
15. oktober 2003 - 22:51 #13
fordi du selecter  hvis det fx var en update el delete  sql

prøv at bruge den som rowsource så virker det
Avatar billede stinesondre Nybegynder
15. oktober 2003 - 22:58 #14
Skal dette da fungere(?):

Me.combobox.rowsource = "Select from XTRA"
Avatar billede stinesondre Nybegynder
15. oktober 2003 - 23:01 #15
Det skal være :

Me.combobox.rowsource = "Select * from XTRA"
Avatar billede juks Novice
15. oktober 2003 - 23:04 #16
ja plus
me.comboUndercategori.requery
Avatar billede juks Novice
15. oktober 2003 - 23:05 #17
jeg mente

Me.combobox.requery
Avatar billede stinesondre Nybegynder
15. oktober 2003 - 23:10 #18
Jeg får inn stringen "SELECT * FROM XTRA" i comboboxen, og ikke innholdet i tabellen..Hva er det jeg gjør feil ?
Avatar billede juks Novice
15. oktober 2003 - 23:14 #19
kan du evt sende databasen til mig
Avatar billede juks Novice
15. oktober 2003 - 23:18 #20
hvilken version af access bruger du ..
min mail er jhc-it@mail.dk
Avatar billede stinesondre Nybegynder
15. oktober 2003 - 23:42 #21
Mailen er sendt
Avatar billede stinesondre Nybegynder
16. oktober 2003 - 11:15 #22
TUSEN TAKK juks !!! Du er KONGE !!! Jeg skal anbefale deg til alle mine venner !!  :D :D :D
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester