Søg
Avatar billede speedy2000 Nybegynder
17. september 2003 - 09:08 Der er 2 kommentarer og
1 løsning

Pladsering af Textbox i Tabbed Dialog

Hvordan pladserer jeg en oprettet textbox i et bestemt faneblad i Tabbed Dialog.

TextBoksen oprettes i koden, og der skal oprettes en ny textboks samt et nyt faneblad hver gang der trykkes på åbn..
Jeg har lavet følgende kode men mangler hvordan jeg pladserer boksen i et bestemt faneblad.
----------------------------------------------
Private Sub M_open_Click()
  cdlg1.ShowOpen
  CurrentFileName = cdlg1.FileName
  CurrentFileTitle = cdlg1.FileTitle
  Open CurrentFileName For Input As #1
 
  SSTab2.Tabs = SSTab2.Tabs + 1
  SSTab2.Caption = CurrentFileTitle
 
  Load Text1(SSTab2.Tabs - 1)
  Text1(SSTab2.Tabs - 1).Container
 
' ??????????????????


  Text1(SSTab2.Tabs - 1).Text = Input(LOF(1), 1)
  Close #1
End Sub
Avatar billede speedy2000 Nybegynder
17. september 2003 - 09:09 #1
Linien :  Text1(SSTab2.Tabs - 1).Container 
Skal slettes
Avatar billede speedy2000 Nybegynder
17. september 2003 - 11:08 #2
Har sat point op, håber der er én der kan hjælpe :o)
Avatar billede speedy2000 Nybegynder
17. september 2003 - 12:32 #3
Har selv løst problemet... resultatet blev som følger (Hvis andre skulle få samme problem)

Private Sub M_open_Click()
  cdlg1.ShowOpen
  CurrentFileName = cdlg1.FileName
  CurrentFileTitle = cdlg1.FileTitle
  Open CurrentFileName For Input As #1
 
  If Text1(0).Text = "" Then
    SSTab2.Tabs = 1
  Else
    SSTab2.Tabs = SSTab2.Tabs + 1
  End If
 
  SSTab2.Tab = SSTab2.Tabs - 1
  SSTab2.Caption = CurrentFileTitle
 
  ArCount = SSTab2.Tabs - 1
 
  If SSTab2.Tabs > 1 Then
    Load Text1(ArCount)
    Text1(ArCount).Visible = True
    Text1(ArCount).Height = 9855
    Text1(ArCount).Width = 12135
    Text1(ArCount).Left = 120
    Text1(ArCount).Top = 360
  End If
 
  Text1(SSTab2.Tabs - 1).Text = Input(LOF(1), 1)
  Close #1
End Sub
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel Indlæg Oprettet Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic 5 29/08/202512:28 04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic 0 05/08/202510:10 -
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic 0 16/05/202512:31 -
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic 1 22/04/202514:55 25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic 12 10/07/202417:34 12/07/202414:34
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
16/1016:25 En "Gammel" & "Retro" PC Service ? Husker ikke navnet .... Af Ikke-ekspert i Diverse
16/1016:17 Jeg har lige købt en Samsung mobil telefon Af Strawberry i Mobiltelefoner
16/1013:20 Lotus Approach Af Carsten i Andet software
15/1015:34 Epson scanner forbinder ikke til computer Af bbkdk i Printere
11/1013:35 Bruger på Win11 Af lurup i Browsere
White papers
Flere white papers »