Genom att göra en ansökan kalender kontroll för Visual Basic , kan du ha mer flexibilitet i hur kalendern fungerar . Kalendern kommer att ha utseendet och funktionaliteten i en typisk Outlook- kalender , men anpassas efter dina egna specifikationer . Förutom att skapa påminnelser och schemalägga möten Du kan också importera och exportera olästa meddelanden från Inkorgen i Outlook . Ju mer erfaren du är på att använda och skriva kod , desto mer kan du ändra programmet med ytterligare flikar och uppgifter som uppfyller dina behov . Saker du behöver
Computer
Microsoft Visual Basic 2003
Microsoft Outlook
Visa fler instruktioner
1
Slå på datorn och starta Microsoft Visual Studio . NET . Klicka på " Arkiv " -menyn , klicka på " Ny " och klicka sedan på " Projekt ".
2
Välj och klicka på " Visual Basic-projekt " under " Project Types ", och klicka sedan på " Console ansökan " under" Mallar . " Detta kommer att skapa en standardmall som får namnet " Module1.vb . " Addera 3
Lägg till en hänvisning till " Microsoft Outlook 11.0 Object Library " så du kommer ihåg ditt projekt om du inte kan slutföra det i ett sammanträde . Välj " Project " -menyn och klicka på " Add Reference ".
4
Bläddra till " COM " fliken , klicka på " Microsoft Outlook 11.0 Object Library " och klicka sedan på " Välj ". Klicka " OK " i " Add Referenser " i dialogrutan för att acceptera dina val . Om programvaran uppmanar dig att skapa omslag för det bibliotek du valt , klicka på "Ja . "
5
Flytta musen till " Code "-fönstret . Radera befintliga koder . Kopiera och klistra in koden i steg 6 och klistra in den i " Code "-fönstret .
6
Import System.ReflectionImports Outlook = Microsoft.Office.Interop.Outlook
Modul Module1
Sub Main ( ) ' Skapa en Outlook-programmet . Dim oApp Som Outlook.Application = Ny Outlook.Application ( ) katalog
" Skapa en ny AppointmentItem . Dim oAppt Som Outlook.AppointmentItem = oApp.CreateItem ( Outlook.OlItemType.olAppointmentItem ) katalog
" Ställ vissa gemensamma egenskaper . oAppt.Subject = " Skapad med OOM i VB . NET " oAppt.Body = " Hello World " oAppt.Location = " Room 1201 "
oAppt.Start = Convert.ToDateTime ( " 05 /31/2004 09:00:00 " ) oAppt.End = Convert.ToDateTime ( " 2004/05/31 01:00:00 " ) oAppt.ReminderSet = Sant oAppt.ReminderMinutesBeforeStart = 5 oAppt.BusyStatus = Outlook . OlBusyStatus.olBusy oAppt.IsOnlineMeeting = False
'Spara i Kalender . oAppt.Save ( ) katalog
" Städa upp . oApp = Nothing oAppt = Nothing
End SubEnd Module
7
Gör eventuella ändringar i koden för att få det att fungera för din situation , om du är skicklig på VB.net kod skrift .
8
tryck på F5 på tangentbordet för att bygga , installera och köra Vb.Net kalenderprogram .
