Sabtu, 08 Oktober 2011

VISUAL BASIC





   DEVENISI VISUAL BASIC,,,,
  1. 20 Mei 1991: Microsoft merilis Visual Basic versi 1.0 untuk Windows di Windows World 1991, Atlanta, Amerika Serikat. Programmer dapat membuat antar muka pengguna dengan mudah. Pembuatan aplikasi bisa lebih cepat dibandingkan sebelumnya. Kode ditulis oleh programmer untuk memberikan aksi terhadap Event dari pengguna (bagaimana pengguna merespon kepada object yang terdapat di antar muka pengguna).
  2. 1 September 1992: Microsoft mengumumkan Microsoft Visual Basic for MS-DOS® dalam edisi Standard dan Professional. Seperti Visual Basic untuk Windows, versi ini mengkombinasikan kemudahan pendisainan secara grafis dengan kekuatan dan keunggulan dalam banyak hal di pemrograman tradisional.
  3. 2 November 1992: Microsoft mengumumkan kemampuan dari Visual Basic versi 2.0 untuk Windows pada edisi Professional dan Standard. Versi ini menyertakan lebih dari 300 fitur baru dan peningkatan untuk pengembangan aplikasi yang lebih cepat, pengaksesan ke fitur-fitur tingkat lanjut di Windows, dan produktivitas pengembang yang lebih besar lagi. Di antaranya: MDI Forms, ODBC, dan variabel object.
  4. 14 Mei 1993: Microsoft mengumumkan Visual Basic versi 3.0 untuk edisi Standard dan Professional. Versi 3.0 menyediakan kemudahan akses ke berbagai sumber data yang banyak dengan mengintegrasikan mesin database Microsoft Access Database for Windows 1.1 dan kemampuan di bidang aplikasi melalui Object Linking and Embedding (OLE) 2.0. Juga ditambahkan tools baru berupa controls baru, penggunaan yang lebih mudah, dan sebuah peningkatan standarisasi control bagi pengguna.
  5. 29 Juni 1993: Microsoft mengumumkan bahwa Microsoft Visual Basic for Applications (VBA) akan diintegrasikan ke dalam Microsoft Excel 5.0 dan Microsoft Project 4.0. Visual Basic akan melayani bahasa Macro yang umum di versi yang akan datang dari aplikasi-aplikasi untuk Windows dan Macintosh. Fitur Macro yang umum untuk aplikasi dan OLE 2.0, keduanya merupakan elemen penting di visi dan strategi Microsoft untuk aplikasi yang dapat diprogram —yang akan memberikan kemampuan bagi pengguna untuk mengintegrasikan aplikasi-aplikasi, tugas-tugas otomatis, dan pembuatan solusi yang bersifat kostumais. VBA memiliki mesin pengembangan tangguh dan fleksibel yang sama yang membuat Visual Basic menjadi terkenal, teknologi pemrograman yang memperoleh penghargaan.
  6. 14 November 1994: Visual Basic versi 4.0 untuk Windows didemonstrasikan di Fall/COMDEX ’94 di Las Vegas. Demonstrasi ini berfokus pada perannya sebagai aplikasi berbasis Windows 32-bit pertama yang menggunakan kontrol kostumais OLE (OCXs) — komponent perangkat lunak yang dapat digunakan kembali yang ditetapkan dengan spesifikasi OLE. Pada versi ini diperkenalkan: Class, OXC’s, dan programmer dapat membuat add-ins sendiri dengan mudah.
  7. 12 September 1995: Visual Basic versi 4.0 untuk MS-DOS, Microsoft Windows NT®, dan Windows 95 diumumkan. Untuk meningkatkan edisi Standard dan Professional, maka Edisi Enterprise yang baru diperkenalkan untuk memenuhi kebutuhan perusahaan dan team pengembang. Semua versi menyertakan dukungan teknologi OLE yang lebih dikembangkan, perbaikan akses data, sebuah lingkungan pengembangan yang bersifat visual, dan migrasi ke Windows 95 dan Windows NT untuk aplikasi-aplikasi yang sudah ada.
  8. 7 Desember 1995: Microsoft mengumumkan Microsoft Visual Basic Scripting Edition (VBScript), sebuah bahasa skrip Internet berbasiskan pada Visual Basic. VBScript merupakan sebuah skrip dengan performansi yang tinggi yang didisain untuk membuat isi yang bersifat aktif pada suatu situs. VBScript membolehkan pengembang untuk mengaitkan dan mengotomatiskan berbagai jenis object di halaman situs, termasuk object OLE. VBScript menjadi sebuah spesifikasi yang diusulkan berlisensi gratis yang tersedia bagi komunitas Internet.
  9. 3 Februari 1997: Microsoft membuka sistem pemrograman Visual Basic versi 5.0, Edisi Professional — tool versi terakhir yang paling terkenal di dunia untuk membangun aplikasi yang tangguh (Rapid Application Development RAD) tool. Fitur-fitur Visual Basic versi 5.0 terdiri dari sejumlah performansi yang signifikan dan peningkatan produktivitas yang akan membuat para pengembang lebih efisien dan fleksibel serta cepat dalam memberikan solusi bagi pengguna akhir. Fitur-fitur tingkat lanjut — seperti kompilasi berjenis native code, akses database berkecepatan tinggi, dan sebuah lingkungan pengembangan yang ditingkatkan — membuat Visual Basic versi 5.0 menjadi versi yang paling hebat. Sebagai tambahan, kemampuan teknologi pembuatan komponen Microsoft ActiveX® di Visual Basic versi 5.0 akan membolehkan lebih dari 3 juta pengembang menggunakan Visual Basic dalam membuat aplikasi yang berbasis pada komponen yang bertujuan untuk digunakan di Internet, intranets, dan lingkungan tradisional client/server.
  10. 10 Maret 1997: Versi terakhir yang dirilis dari Visual Basic 5.0, Edisi Pembuatan Kontrol tersedia. Edisi Pembuatan Kontrol adalah cara mudah untuk membuat ActiveX Controls bagi Internet, intranets, dan aplikasi client/server.
  11. 15 Juni 1998: Microsoft mengumumkan Visual Basic versi 6.0, dan dimasukkan ke dalam Microsoft Visual Studio® versi 6.0. Fitur-fitur Visual Basic versi 6.0 menyediakan pengaksesan data secara terintegrasi dan bersifat grafis ke sumber data (data source) ODBC atau OLE DB manapun, dan perangkat tambahan database yang didisain untuk database Oracle dan Microsoft SQL Server™. Fitur unggulan di versi ini adalah: ActiveX Data Objects (ADO) untuk memanipulasi dan membuat database. Fitur Pengembangan Situs membawa kemudahan dalam penggunaan, model pemrograman berbasis komponen dari Visual Basic untuk membuat HTML – dan Dynamic HTML (DHTML) – berbasis aplikasi. Fitur-fitur baru ini — dikombinasikan dengan optimisasi performansi, pengembangan aplikasi yang disederhanakan dan debugging, dan dukungan untuk Microsoft teknologi server — membuat Visual Basic versi 6.0 sebuah pilihan yang ideal untuk membangun aplikasi berskala perusahaan.
  12. 2 September 1998: Visual Studio 6.0, solusi tool pengembangan lengkap berskala perusahaan tersedia. Visual Studio 6.0 menyertakan Visual Basic versi 6.0, Microsoft Visual C++®, Microsoft Visual FoxPro®, Microsoft Visual InterDev® Web, dan Microsoft Visual J++®. Bersamaan dengan diluncurkannya Developer Days ’98, lebih dari 115 perusahaan papan atas mengumumkan dukungan terhadap Visual Studio 6.0.
  13. 28 April 1999: Lingkungan pengembangan VBA versi 6.0 dan Software Development Kit (SDK) VBA (SDK) versi 6.0 tersedia bagi vendor perangkat lunak pihak ketiga melalui program lisensi VBA. VBA 6.0 merupakan sebuah teknologi pengembangan yang tangguh untuk aplikasi yang dikemas secara kostumais dan merupakan sebuah komponen utama di Microsoft Office 2000.
  14. 15 Februari 2000: Steve Ballmer, presiden yang baru saja ditunjuk dan CEO dari Microsoft Corporation, berbicara kepada lebih dari 2.000 pengembang dalam pidatonya pada Visual Basic Insiders Technical Summit (VBITS), menyatakan visi Microsoft terhadap situs yang dapat diprogram dan memaksa kembali komitmen perusahaan yang dalam terhadap para pengembang Visual Basic.
  15. 11 Juli 2000: Microsoft menyampaikan Tool Platform .NET untuk XML Web Services. Dalam pidatonya yang ditujukan pada acara Microsoft Professional Developers Conference (PDC) 2000 yang kedelapan, Paul Maritz, wakil presiden kelompok dari Platforms Group di Microsoft, memperlihatkan Microsoft .NET Framework dan Microsoft Visual Studio .NET. Ini merupakan versi terakhir dari perangkat pengembangan yang digunakan di seluruh dunia, Visual Studio .NET menyediakan dukungan untuk pengembangan drag-and-drop terhadap XML Web Services. Secara bersama, kedua produk tersebut menyediakan produktivitas yang tinggi kepada para pengembang, suatu lingkungan yang terdiri dari banyak bahasa untuk pembangunan, pengantaran, dan pengintegrasian XML Web Services pada platform Microsoft .NET.
  16. 13 November 2000: Microsoft mengumumkan kemampuan Visual Studio .NET versi Beta 1. Dalam pidato acara COMDEX/Fall 2000, Bill Gates mengumumkan kemampuan versi beta pertama Visual Studio.NET dan .NET Framework, dua teknologi kunci untuk memungkinkan para pengembang membangun XML Web services pada platform .NET. XML Web services merupakan aplikasi dan komponen yang dibuat tersedia melewati situs dengan menggunakan XML dan Simple Object Access Protocol (SOAP), dan kunci yang dapat diprogram untuk membangun generasi masa depan Internet. Microsoft membuat Visual Studio .NET Beta 1 dan .NET Framework tersedia bagi jutaan pelanggan dan rekanan industri.
  17. 13 Februari 2002: Microsoft mengumumkan kemampuan dari Visual Studio .NET versi akhir.
Ringkasan Versi:
  1. Visual Basic 1.0: 1991
  2. Visual Basic 2.0: 1992
  3. Visual Basic 3.0: 1993
  4. Visual Basic 4.0: 1996
  5. Visual Basic 5.0: 1997
  6. Visual Basic 6.0: 1998
  7. Visual Basic 7.0: 2003
  8. Visual Basic 8.0: 2005
  9. Visual Basic 9.0: 2008
  10. Visual Basic 10.0: 2010
              

             Using Excel In VISUAL STUDIO.NET 2008
                                Hamsa Gayatri Palepu
                                 CIS 764, Fall 2008
Purpose:
This tutorial shows use of Microsoft Visual Studio 2008 using VB.net and using Excel sheets as a data source to build a web application.
Topics:

Overview
Prerequisites
Creating Excel sheets
Create a new project
Overview:
ASP.NET is a rich programming framework for building web-based applications. It offers outstanding support for both developers and administrators, providing improved ease-of-use, tool support, reliability, scalability, administration and security.
In this tutorial if a person receives any packet he/she is informed with a mail in which the tracking number of the packet is present. All the packet information is stored in the excel sheets.

The excel sheet which contains the email, its path is hardcoded in .net code. Whereas we have to select the other file which contains the packet information using the browse button.
Prerequisites:
Before starting the tutorial, you should:
1.  Have Microsoft Visual Studio 2008 installed.
2.  Have Microsoft Office Excel 2007 installed.
3.  Create an Excel containing columns Name and Email.
4.  Create another Excel containing columns Slno, Type, Code and Count.
Create Excel Sheets:
We compare two excel sheets, so creation of two excel sheets is must. One excel sheet must contain columns Name and Email. The other excel sheets must contain Slno, Type, Code and Count. (NOTE: Type and Name are same fields).Code is the tracking number of the packet. These excel sheets must be saved as Microsoft Office Excel 97-2003 Worksheet (.xls).





TUTORIAL:
Create a new project
Step 1:  Open Microsoft Visual Studio 2008.
> Programs > Microsoft Visual Studio 2008 >
Step 2:
Create a New Web Site
Click on the visual studio 2008 it opens startup page as below. Here select New Website.
File > New Web Site…

 Step 3:  
Select ASP.NET Web Site and click OK


Step 4:
This opens a Default aspx page.
 
Step 5:
Click on the Property Window and Rename the file (Here it is renamed as MailExcel)
Step 6:
After renaming the solution explorer appears as follows:
 
Step 7:  switch to design view
Click on the Source button at the bottom of the page. It appears as follows..


Step 8:
The Design view appears as follows
 
Step 9:
From the toolbox click, drag and drop FileUpload.



In the source view we see
<asp:FileUpload ID="FileUpload1" runat="server" />

Replace this with

<td style="width: 40%">
  <input type="file" runat="server" class="textcls" id="browseFile"      style="width: 300px;height: 19px" size="43"
onclick="return browseFile_onclick()" />
  <asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server" ErrorMessage="Select a File to Upload" Font-Size="XX-Small" ControlToValidate="browseFile">*
  </asp:RequiredFieldValidator>
</td>
   
By using this browse button we can select any excel sheet saved on the computer.
RequiredFieldValidator: - Makes the associated input control a required field.
Step 10:
Drag and drop a button adjacent to the browse.


In the source view we see
<asp:Button ID="Button1" runat="server" Text="Button" />
Replace this with

<asp:Button ID="Display_Btn" runat="server" Text="Display" CausesValidation="False" />

Step 11:
Change properties to the button and rename it.

Step 12:
Similarly add another button send mail
<asp:Button ID="SendMail_Btn" runat="server" Text="SendMail" Enabled = "false" CausesValidation="False"/>  
and change its properties.
Also add a hiddenfield from the toolbox and rename it as MailFilePath.
<asp:HiddenField ID="MailFilePath" runat="server"  EnableViewState = "true"/>


Add
 <div id="divSIP" style=" overflow-y:scroll; width : 80%; height: 450px" runat="server">

This helps to view the data and if the data oveflows we get a scroll on the right side.   

In the Source view
Add the function
<head id="Head1" runat="server">
    <title>Untitled Page</title>
<script language="javascript" type="text/javascript">
// <!CDATA[
function browseFile_onclick() {
SendMail_Btn = document.getElementById("SendMail_Btn");
SendMail_Btn.disabled=true;
}
// ]]>
</script>
</head>
                           
Step 13:
Now the design view appears as follows after editing the code.


Step 14:
Double click on MailExcel.aspx.vb in the Solution Explorer.
Step 15:
It appears as follows:-
Step 16:
The above code in MailExcel.aspx.vb must be removed.
Now
Add the import statements
Imports System.Data.OleDb
Imports System.Text
Imports System.IO

Declare all the variables (Dim: Declares variables and allocates storage space.)

Partial Class MailExcel
    Inherits System.Web.UI.Page
    Dim objda As OleDbDataAdapter
    Dim objds As Data.DataSet
    Dim Datafilepath As String
    Dim dsretData, dsretMail As Data.DataSet


The function performed when we click the display button is given below

Protected Sub Display_Btn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Display_Btn.Click
   DataView()
End Sub


This in turn calls the function DataView().
Sub DataView()
        Dim strbChk As New StringBuilder
        Dim rs As Data.DataView = Nothing
        Dim myView As Data.DataView
If Path.GetExtension(browseFile.PostedFile.FileName).ToLower = ".xls"         Then
 Dim strquery As String = "select distinct type from [Sheet1$] where   type <> ''"
      MailFilePath.Value() = browseFile.PostedFile.FileName
      '----------Ecel file path from where u will retrive the data
        If Not MailFilePath.Value().ToString().Substring(1, 1) = ":"
      Then
      MailFilePath.Value() = "C:\test\" + MailFilePath.Value().ToString()
        End If
      dsretData = New Data.DataSet
      dsretData = ExeExlqry(strquery, MailFilePath.Value())
      ' Function to retive data

       Datafilepath = "C:\test\Mail Notifier Map File123.xls"
       Dim strqry As String = "select * from [Sheet1$]"
       dsretMail = New Data.DataSet
       sretMail = ExeExlqry(strqry, Datafilepath)
       SendMail_Btn.Enabled = True

       Else
           Response.Write("<script>alert('Upload Only Excel file')</script>")
           divSIP.InnerHtml = ""
           Exit Sub
       End If
        strbChk = New StringBuilder
        strbChk.Append("<TABLE class='TableCls' width=70% border='1' align='center'>")
'appending the data from data set to string builder
 
For j As Integer = 0 To dsretData.Tables(0).Rows.Count - 1
  myView = dsretMail.Tables(0).DefaultView
  rs = FetchData(myView,dsretData.Tables(0).Rows(j).Item(0).ToString,"Name")

            If rs.Count > 0 Then
                strbChk.Append("<tr><td>" & dsretData.Tables(0).Rows(j).Item(0).ToString & "</td><td>" & rs.Item(0).Row(1).ToString & "</td></tr>")
            Else
                strbChk.Append("<tr><td>" & dsretData.Tables(0).Rows(j).Item(0).ToString & "</td><td style='color:Red'>Mail Id Not Available</td></tr>")
            End If

        Next
        strbChk.Append("<tr><td colspan='3'>&nbsp;</td></tr></table>")
        divSIP.InnerHtml = strbChk.ToString
       'Displaying the data to div
    End Sub


In the DataView we call two more functions namely FetchData and ExeExlqry.
Private Function FetchData(ByVal rs As Data.DataView, _ByVal FilterOn As   String, ByVal TypeorName As String) As Data.DataView
rs.RowFilter = TypeorName & "='" & FilterOn & "'"
Return rs
End Function
Function ExeExlqry(ByVal strQry As String, ByVal Path As String) As Data.DataSet
     Try
      objds = New Data.DataSet
      '--conection string to retrive the data from excel
Dim con As New OleDbConnection("provider=microsoft.jet.oledb.4.0;data   source=" & Path & ";Extended properties=Excel 8.0")

       objda = New OleDbDataAdapter(strQry, con)
       objds = New Data.DataSet
       objda.Fill(objds)
       '---To store the excel data into the data set
       objda.Dispose()
       Return objds
       Catch ex As Exception
       If Not objds Is Nothing Then objds = Nothing
      End Try
    End Function
The function performed when we click the SendMail button is given below

Protected Sub SendMail_Btn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles SendMail_Btn.Click
        Dim strbChk As New StringBuilder
        Dim rs As Data.DataView = Nothing
        Dim myView As Data.DataView
        Dim strquery As String = "select * from [Sheet1$]"

        dsretData = New Data.DataSet
        dsretData = ExeExlqry(strquery, MailFilePath.Value())
        ' Function to retive data
        Datafilepath = "C:\test\Mail Notifier Map File123.xls"
        'Path of the excel which contains the column email
        dsretMail = New Data.DataSet
        dsretMail = ExeExlqry(strquery, Datafilepath)

       For j As Integer = 0 To dsretMail.Tables(0).Rows.Count - 1
         myView = dsretData.Tables(0).DefaultView
         rs = FetchData(myView,dsretMail.Tables(0).Rows(j).Item(0).ToString, "Type")
         strbChk = New StringBuilder
         strbChk.Append("<TABLE class='TableCls' width=70% border='1' align='center'>")
'appending the data from data set to string builder

          For P As Integer = 0 To rs.Count - 1
                strbChk.Append("<tr><td>" & rs.Item(P).Row(1).ToString & " </td><td> " & rs.Item(P).Row(2).ToString & " </td><td> " & rs.Item(P).Row(3).ToString & " </td></tr>")
          Next
            strbChk.Append("<tr><td colspan='3'>&nbsp;</td></tr></table>")
           
         If rs.Count Then
          sendConfMail(dsretMail.Tables(0).Rows(j).Item(1).ToString,strbChk)
         End If

      Next
        divSIP.InnerHtml = strbChk.ToString
        'Displaying the data to div
        SendMail_Btn.Enabled = False
    End Sub
This in turn calls the function sendConfMail().
Private Sub sendConfMail(ByVal ToId As String, ByVal sbMailBody As StringBuilder)
        Dim strMailServer As String = "smtp.ksu.edu"
        '--write smtpserver ip
        Dim strMailUser As String = ""
        '--User Name
        Dim strMailPassword As String = ""
        '----Password
        Dim strMailSmtpSvrPort As String = "25"
        Dim strMailSendUsing As String = "2"
        Dim strMailSmtpAuthne As String = "1"
        Dim strFromMailId As String = "hamsa@ksu.edu"
        '------------------FromId

        Dim strBody = "<!DOCTYPE HTML PUBLIC ""-//W3C//DTD HTML 4.0 Transitional//EN"">" & vbCrLf _
  & "<html>" & vbCrLf _
  & "<head>" & vbCrLf _
  & "<title> Package In Receiving </title>" & vbCrLf _
  & "</head>" & vbCrLf _
  & "<body bgcolor=""#FFFFCC"">" & vbCrLf _
  & "  You have recieved the following package(s).  Please pickup the package(s) as soon as possible" & vbCrLf _
  & "<p>" & vbCrLf _
  & "  Thank-You" & vbCrLf _
  & " </p>" & vbCrLf _
   & "<p>" & vbCrLf _
   & "  Receiving Department" & vbCrLf _
  & " </p>" & vbCrLf _
  & "</body>" & vbCrLf _
  & "</html>" & vbCrLf

        Dim objCDO As Object
        objCDO = CreateObject("CDO.Message")
        With objCDO.Configuration.Fields
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = strMailServer
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = strMailSmtpSvrPort
            .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = strMailSendUsing
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = strMailSmtpAuthne
            .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = strMailUser
            .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = strMailPassword
            .Update()
        End With

        objCDO.From = strFromMailId
        objCDO.To = ToId

        objCDO.Subject = "Package In Receiving"

        objCDO.htmlBody = strBody + sbMailBody.ToString
        objCDO.Send()
        objCDO = Nothing

    End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)   Handles Me.Load

    End Sub
End Class
Step 17:
Save the website.
Then File > Save All

Step 18:
Then set MailExcel.aspx as a startup page.
Step 19:
Make sure the excel sheet which has the email is placed in the correct path and write the path in the code where it is commented as 'Path of the excel which contains the column email.


Step 20:
Now click on Run button ( ) which is present on the top.
Step 21:
Now the page appears as follows:

NOTE:
If the page opens in  copy paste the link 
 From the  and paste it in Mozilla Firefox.
This is done because the Mozilla does not work properly with the java scripts.
Step 22:
Click on the browse button and search for the excel sheet which has to be compared with the other excel sheet.
When we click on browse a window appears
 Select excel sheet and Click open.
Step 23:
The path appears as follows
Step 24:
Click on the Display button.
It appears as follows:

The sendmail button is visible now.
Step 25:
Click on the send mail button.
It appears as follows:

Step 26:
The mails are sent to the respective mail ids with the tracking number.


Fngsi Microsoft NET
Setelah mengetahui apa itu Microsoft.NET Framework, Microsoft
Visual Basic.NET, ADO.NET, Database dan Microsoft Access,
dan fungsi-fungsi serta dasar penggunaannya, ternyata menjadi
programmer VB.NET itu mudah! Sebab, dari dasar pengetahuan
tesebut, kita sudah bisa membuat suatu program yang kita inginkan. Misalnya, membuat
aplikasi toko, seperti form penjualan dan pembelian. Visual Basic.NET (VB.NET)
merupakan program generasi selanjutnya dari Visual Basic.


VB NET Yang banyak di gunakan


umumnya para programmer banyak menggunakan VB.NET untuk membuat aplikasi
atau program yang mereka butuhkan. Pasalnya, program ini memiliki kelebihan dan
kemudahan tertentu dibandingkan dengan program-program lainnya yang sejenis.
Selanjutnya, langkah apa saja yang mesti diketahui dan dilakukan agar kita bisa menjadi
programmer VB.NET.

 Kontrol VB NET



 Kontrol Visual Basic (Source Code) 3.0 Visual Basic Source Code yang menunjukkan bagaimana membuat Kontrol VB dengan menggunakan PictureBox dan murni Kode VB. Source gratis Visual Basic kontrol kode contoh untuk membuat tombol Command. Semua Source Code kompatibel dengan VB3 - VB6. Kode sumber menarik kontrol langsung pada PictureBox dan dapat dikompilasi ke dalam setiap program VB. Visual Basic Source Code sumber bebas kode, kode sumber visual basic, vb source code 

 Kegunaan Lain VB NET


Email SMTP/POP3 Engine untuk Visual Basic 5.0 MarshallSoft SMTP/POP3/IMAP Visual Basic email perpustakaan komponen (SEE4VB) untuk mengirim, menerima dan mengurai email termasuk HTML dan MIME Base64 dan quoted-printable lampiran dikodekan. Mendukung SMTP dan POP3 otentikasi. Mendukung ISO-8859 dan UTF-8 pesan. Mendukung semua versi Visual Basic, Visual Studio, dan VB.NET. Dilengkapi dengan banyak contoh Visual Basic. Juga dapat digunakan dengan bahasa apapun yang dapat memanggil Windows API. Bebas royalti. winsock, visual studio, smtp, perpustakaan, otentikasi, imap, email, html, utf 8, pop3, mail, kontrol, base6.

 Pesan Untuk Adikku,,,

Adikku Tersayang “Ardila Yuni Ermawati”
Kebersamaan, dukungan, doa, kasih sayang, dan perhatianmu padaku, maafkan jika kakakmu belum bisa menjadi contoh yang baik, semoga engkau selalu jadi yang terbaik
 

 Pesan Untuk teman semuah,,,

Boleh jadi kamu membenci sesuatu, padahal ia amat baik bagimu, dan boleh jadi (pula) kamu menyukai sesuatu, padahal ia amat buruk bagimu; Allah mengetahui, sedang kamu tidak mengetahui. (QS. Al-Baqarah, 2: 216)
Hal terbaek dalam hidup ini adalah ketika kita mempunyai nilai bagi orang laen
Takdir memberi kita atribut, tapi adakah yang tahu kemana lagi tangan nasib akan membawa kita. Saat Proyek Akhir ini dimulai, siapa yang mengira bahwa semua harus dijalani selama dua tahun dan penuh dengan hambatan? Adalah ketentuan yang kemudian kami ketahui bagaimana berakhirnya.
Kalau kita tidak pernah mencoba maka tidak akan tahu batas kemampuan kita “jangan mudah kalah oleh rasa malas karena ia adalah musuh utama kesuksesan dunia-akhiratmu.
Motipasi 

keinginan saya untuk menjadi seorang yang mandiri,tidak bergantung kepada siapa saja yang menjadikan beban untuk hidup saya karna saya bergantung kepada orang lain.

Latar belakang

Nama : wirnanda
seseorang yang ingin menjadi seseorang yang mandiri,pantang menyerah dan mau bekerja keras demi sebuah cita-cita dan cinta yang telah menanti.


Slalu pnjatkan syur,,,


 Janganlah Hendaknya Kamu Kuatir Tentang Apa pun Juga, Tetapi Nyatakanlah Dalam Segala Hal Keinginanmu Kepada Allah Dalam Doa dan Permohonan Dengan Ucapan Syukur.