Jak zrobić program kalendarza dla Vb.Net

Krok 1

Włącz komputer i uruchom program Microsoft Visual Studio.Net. Kliknij menu "Plik", następnie "Nowy", a następnie kliknij "Projekt".

Krok 2

Wybierz i kliknij "Visual Basic Projects" w "Project Types", a następnie "Application Console" w "Szablony". Dzięki temu utworzysz domyślny szablon, który będzie się nazywał "Module1.vb".

Krok 3

Dodaj odwołanie do "Biblioteki obiektów Microsoft Outlook 11.0", aby móc zapamiętać swój projekt na wypadek, gdyby nie można go było wykonać za jednym razem. Wybierz menu "Projekt" i kliknij "Dodaj referencję".

Krok 4

Przejdź do zakładki "COM", kliknij "Biblioteka obiektów Microsoft Outlook 11.02, a następnie" Wybierz ". Kliknij" OK "w oknie dialogowym" Dodaj odniesienia ", aby zaakceptować swój wybór. poproś o wygenerowanie kopert dla wybranej biblioteki, kliknij "Zaakceptuj".

Krok 5

Przesuń mysz nad okno "Kod". Usuń istniejący kod. Skopiuj i wklej kod znaleziony w kroku 6 i wklej go w oknie "Kod".

Krok 6

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

Moduł Module1

Sub Main () "Utwórz aplikację Outlook. Dim oApp jako Outlook.Application = New Outlook.Application ()

"Stwórz nowy punkt powołania. Dim oAppt As Outlook.AppointmentItem = oApp.CreateItem (Outlook.OlItemType.olAppointmentItem)

'Ustaw niektóre wspólne właściwości. oAppt.Subject = "Utworzono przy użyciu OOM w VB .NET" orAppt.Body = "Hello World" orAppt.Location = "Room 1201"

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

"Zapisz w kalendarzu. oAppt.Save ()

"Sprzątnij. oApp = Nic oAppt = Nic

Koniec modułu końcowego