is it notepad?

[rpool]

I have problem

My Step:

Start> Programs > VB
Select VB app.Wiz.
next
select MDI
rpt.7 next
done

When Start Run )Ctrl+F5_

I can see that Windows "Document 1"

what is that, is simple notepad ?

Please!

[vb5prgrmr]

Yes, but it still needs a whole lot of code to work properly...



Good Luck

[westconn1]

i guess it is a richtextbox on a child form, it could be used to make your own notepad or other editor type program

[rpool]

My Step:

Start> Programs > VB
Select VB app.Wiz.
next
select MDI
rpt.7 next
done

In "frmDocument.frm"
that "rtfText" deleted
insert "Text1" object
    Text1.MultiLine "True"
    Text1.ScrollBars "Both"

Problem Is where can found some information To: selText

Ctrl+A
Ctrl+C
Ctrl+V

any example
Please!

[akhileshbc]

Search this forum... You will find lots of examples....

[rpool]

:ALL EDIT:
yes, I found solution Ctrl +A,C,V.

Now, I have problem, how to say: goodbye (child_form.caption) ?



my step:
File>New
show windows; "mydoc1"
File>New
show windows; "mydoc2"
File>New
show windows; "mydoc3"

'frmMain.frm
Private Sub MDIForm_Unload(Cancel As Integer)

'//how to goodbye Each.caption ?

Dim objForm As frmDocument

  For Each objForm In Forms
     msgbox "goodbye" & objForm.Caption

'msgbox "goodbye mydoc1"
'msgbox "goodbye mydoc2"
'msgbox "goodbye mydoc3"
     
  Next objForm



End Sub


Private Sub LoadNewDoc()
    Static lDocumentCount As Long
    Dim frmD As frmDocument
    lDocumentCount = lDocumentCount + 1
    Set frmD = New frmDocument
    frmD.Caption = "mydoc" & lDocumentCount
    frmD.Show
    
        
    
End Sub