1. Jag har gjort en meny till mitt program och nu vill jag göra så att om man trycker på en knapp så ska vissa av menyerna vara tillgängliga och om man trycker på en annan knapp ska andra menyer vara tillgängliga

min kod:
m_Text.enable = False
m_Surfa.enable = False
m_Räkna.enable = True

m_**** är namnet på menyn som ska vara tilgänglig/otillgänglig

2. Hur gör jag så att workpad (mitt program) öppnar en webbsida som jag skrivit in i en textbox om jag trycker på en knapp, t.ex. "ta mig dit"

3. Hur infogar jag en RichTextbox? jag har letat och letat bland menyerna men det finns inget :(

Hej igen

>RichTextbox?

Gå in i Vb meny Projekt - Components ,markera RixchTextBox

Välj Ok , Nu har du den i din ToolBox och tar in den på vanligt vis.

mvh
Sven

tack, ingen som kan lösa meny-problemet?

Jag förstår inte riktigt frågan... det verkar som du redan har löst det...

Vad menar du med "knapp"; en CommandButton eller ett tangenttryckning?
Oavsett hur kan du ju eftersom du har ett ganska enkelt upplägg bara lägga in koden i knappfunktionerna ("inverterat" i ena)
t.ex:

<code>
Sub cmdKnapp1_Click()
m_Text.enable = False
m_Surfa.enable = False
m_Räkna.enable = True
'...
End Sub

Sub cmdKnapp2_Click()
m_Text.enable = True
m_Surfa.enable = True
m_Räkna.enable = False
'...
End Sub
</code>

Om du menar tangenttryckningar får du använda KeyPress eller KeyDown och sedan titta på KeyAsciin/KeyCoden för vilken knapp det är och därefter välja vad du vill göra. Tänk på att sätta KeyPreview för Formen till true.

<code>
Private Sub Form_KeyPress(KeyAscii As Integer)
If Chr$(KeyAscii) = "A" Then
m_Text.enable = False
m_Surfa.enable = False
m_Räkna.enable = True
ElseIf Chr$(KeyAscii) = "B" Then
m_Text.enable = True
m_Surfa.enable = True
m_Räkna.enable = False
End If
End Sub
</code>

/Niklas Jansson