Cum se face un program Calendar pentru Vb.Net

Pasul 1

Porniți computerul și porniți Microsoft Visual Studio.Net. Faceți clic pe meniul "Fișier", apoi pe "Nou", apoi pe "Proiect".

Pasul 2

Selectați și faceți clic pe "Proiecte baze de date" din "Tipuri de proiecte" și apoi pe "Consola de aplicații" din "Șabloane". Cu aceasta veți crea un șablon implicit care va fi numit "Module1.vb".

Pasul 3

Adăugați o referință la "Microsoft Outlook Object Library 11.0", astfel încât să vă puteți aminti proiectul dvs. în cazul în care nu îl puteți finaliza dintr-o dată. Selectați meniul "Proiect" și faceți clic pe "Adăugați referință".

Pasul 4

Accesați fila "COM", faceți clic pe "Microsoft Outlook Object Library 11.02 și apoi pe" Select ". Faceți clic pe" OK "din caseta de dialog" Add references "pentru a accepta selecția. cereți să generați plicuri pentru biblioteca selectată, dați clic pe "Acceptați".

Pasul 5

Deplasați mouse-ul peste fereastra "Code". Ștergeți codul existent. Copiați și inserați codul găsit în pasul 6 și lipiți-l în fereastra "Cod".

Pasul 6

mports System.Reflection Imports Outlook = Microsoft.Office.Interop.Outlook

Modulul modulului1

Sub Main () 'Creați o aplicație Outlook. Dim oApp Ca Outlook.Application = Nouă Outlook.Application ()

'Creați un nou AppointmentItem. Dim oAppt ca Outlook.AppointmentItem = oApp.CreateItem (Outlook.OlItemType.olAppointmentItem)

"Setați câteva proprietăți comune. oAppt.Subject = "Creat folosind OOM în VB .NET" sauAppt.Body = "Hello World" sauAppt.Location = "Cameră 1201"

oAppt.Start = Convert.ToDateTime ("05/31/2004 9:00:00 AM") sauAppt.End = Convert.ToDateTime ("05/31/2004 1:00:00 PM") sauAppt.ReminderSet = True oAppt .ReminderMinutesBeforeStart = 5 oAppt.BusyStatus = Outlook.OlBusyStatus.olBusy oAppt.IsOnlineMeeting = False

"Salvează în Calendar. oAppt.Save ()

Curățați-vă. oApp = Nimic oAppt = Nimic

Modulul End Sub End