Hvordan laver jeg en variabel i Visual basic 6.0..

Private Sub Form_Load()
Dim strName As String

  strName = InputBox("Skriv dit navn..", "")
  If Len(Trim$(strName)) > 1 Then
    MsgBox "Du hedder " & strName
      Else
    MsgBox "Hmmm har du ikke noget navn :P"
  End If

End Sub

hmm er lidt nybegynder til det.. kan du forklarer det lidt mere..??

Tak for dit svar... men hvordan laver man så det ikk kommer i en inputbox. så det bare kommer i samme vindue (Form)

Du kan jo starte et nyt VB project, og oprette 2 textboxe og en commandbutton. De kommer automatisk til at hedde "Text1", "Text2" og "Command1"

Copy-paste koden herunder:

'---------------------------------------------------------------

Dim strName As String

Private Sub Command1_Click()
  strName = Text1.Text
  If Len(strName) > 0 Then 'Len() returnerer længden af tekststrengen
    Text2.Text = strName
  Else
    MsgBox "Skriv først et navn i første textbox"
  End If
End Sub


Private Sub Form_Load()
  Text1.Text = "" 'nulstiller textboxen
  Text2.Text = "" 'nulstiller textboxen
  Command1.Caption = "Tryk her" 'Giver knappen en titel
End Sub

'---------------------------------------------------------------


Du kan også gøre det MEGET simplere:


Private Sub Command1_Click()
  Text2.Text = text1.text
End Sub

Men den øverste er sjovere, og så får du en If-Then-Else med i købet, så du kan lære lidt om det