VBasic

[guilbor]

Estou a criar uma aplicação em VBasic 2005 Express Edition, e tenho uma dúvida.
Como se faz que quando um utilizador clica num certo menu, neste caso Ajuda, e depois clique em Sobre, como se faz com que quando ele click veja a janela do sobre que tambem já criei, ou seja, como se faz a ligação?

Obrigado

[guilbor]

então??

[Triple]

No Evento do clik do butão fazes algo do género:

nomedaform.Show()

[guilbor]

No Evento do clik do butão fazes algo do género:

nomedaform.Show()

e como se faz com que a primeira janela feche quando se abre a segunda?

[Asgorath]

Boas
Para fechar um form é me.close.

Faz download do 101 vb.net 2005 samples projects gratuitamente do site da ms.
O codigo esta bem comentado e optimo para aprender.

[guilbor]

obrigado

[guilbor]

obrigado

[SkylineGTR]

Se estás atrapalhado com coisas básicas como abrir ou fechar uma form, o que te aconselho é estudares um pouco o desenvolvimento de aplicações em .NET antes de prosseguires o teu projecto.

[guilbor]

obrigado pela dica

[guilbor]

já agora como se abre um programa ou ficheiro independente deste?
por exemplo quero abrir o ficheiro1.doc, que está no directório de instalaçao e que nao está dentro da aplicação

[guilbor]

alguém?

[forbid]

Isso aí é mais complicado, quanto a abrir a form e fechar a actual fazes:

nomedoform.show()
close()

PS: Aconselho-te a utilizares o Google

[Asgorath]

Para abrir ficheiros excel or word tens que ter o office instalado. Um exemplo como abrir um ficheiro excel ...
Adicionar uma referencia no projecto ao Microsoft Excel 11.0 Object Library (excel 2003).

Código: Seleccionar todos

Option Strict On
Option Explicit On

Imports Microsoft.Office.Interop.Excel

Dim objExcel As New Microsoft.Office.Interop.Excel.Application
Dim Books As Microsoft.Office.Interop.Excel.Workbooks
Dim Book As Microsoft.Office.Interop.Excel.Workbook
Dim Sheet As Microsoft.Office.Interop.Excel.Worksheet
Dim num_trab As Integer
Dim ficheiro As String

'' selecciona o ficheiro excel a abrir
ficheiro = String.Empty
Me.OpenFileDialog1.Filter = "Ficheiros Excel|*.xls"
Me.OpenFileDialog1.ShowDialog()
ficheiro = Me.OpenFileDialog1.FileName
'' se precionou 'cancel' entao sai fora
If ficheiro.Trim = String.Empty Then Return

Try
    objExcel.Visible = True
    Books = objExcel.Workbooks
    '' abre o livro
    Book = Books.Open(ficheiro)
    Sheet = DirectCast(Book.Worksheets(1), Microsoft.Office.Interop.Excel.Worksheet)
    DirectCast(Book.Sheets("Folha1"), Microsoft.Office.Interop.Excel.Worksheet).Activate()
    Sheet = DirectCast(Book.ActiveSheet, Microsoft.Office.Interop.Excel.Worksheet)
    '' le celula L9
    num_trab = CInt(Sheet.Range("L9").Text)
    '' liberta recursos e fecha o excel
    Book.Close()
    Sheet = Nothing
    objExcel.Quit()
    '' marca o processo excel para terminacao
    System.Runtime.InteropServices.Marshal.ReleaseComObject(objExcel)
    objExcel = Nothing
    GC.Collect()
    GC.WaitForPendingFinalizers()

Catch ex As Exception
    MessageBox.Show(ex.Message)
End Try


Operacoes basicas com ficheiros
http://portugalcode.com/index.php/topic,284.0.html

Código: Seleccionar todos