iseng aja !

IDE kepedekan dari Intregated Development Environment atau dalam bahasa local sendiri maksudnya adalah lingkungan pengembangan yang terintregrasi. Sehingga IDE Visual Basic adalah suatu lingkungan untuk pengembangan aplikasi dari Visual Basic .    Gambar Tampilan Area Kerja Visual Basic 1.    Toolbox       Toolbox adalah bagian atau panel yang berisi sekumpulan alat atau komponen Visual Basic untuk pengembangan desain dari aplikasi. Dengan demikian komponen-komponen dari toolbox yang kita pakai untuk mempercantik tampilan dari aplikasi yang kita buat. 2.    Form Desaigner       Form Desaigner adalah jendela untuk mendesain suatu form yang terpilih. Disinilah kita mengambarkan komponen dari toolbox. 3.    Solution Explorer       Solution Explorer adalah sekumpulan komponen yang terkait pada suatu proyek ( solution ) yang sedang kita buat. Kita ...

Dibawah ini koding untuk membuat login sederhana menggunakan vb.net.    Public Class LoginForm1     Private Sub OK_Click( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click         If UsernameTextBox.Text = "admin" And PasswordTextBox.Text = "12345" Then             Menu_Utama.Show()         Else : MsgBox( "Sorry,username or password not found" , MsgBoxStyle.OkOnly, "invalid" )         End If     End Sub     Private Sub Cancel_Click( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click         Me .Close()     End Sub End Class Semoga bermanfaat.

Imports MySql.Data.MySqlClient Public Class Form1     Public db As New MySql.Data.MySqlClient.MySqlConnection     Public sql As String     Public cmd As MySqlCommand     Public rs As MySqlDataReader     Sub opendb()         sql = "server =localhost;uid=root;pwd;database=akademik"         Try             db.ConnectionString = sql             db.Open()         Catch ex As Exception             MessageBox.Show(ex.Message)         End Try     End Sub     Sub bersih()         NPM.Text = ""         Nama.Text = ""         Jenjang.Text = ""       ...

Public Class Form1     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load         Timer2.Enabled = True         lblstatus.Text = "Status:Alarm is set!"     End Sub     Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)         If TimeOfDay = DateTimePicker1.Text Then             'This will instantinize a new "voice" for this app to speak through             Dim voice = CreateObject("SAPI.spvoice")             'what the content of txtmsg will be passed to  voice.speak             voice.speak(TextBox1.Text)             lblstatus.Text = "Status:Alarm is not set!"    ...

listing program Public Class Form1     Dim operand1 As Double     Dim [operator] As String     Dim baru As Boolean = True     Dim temp As Double     Dim operand2 As Double     Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn2.Click     End Sub     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load             End Sub         Private Sub btntmbh_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntmbh.Click         If baru = True Then             operand1 = Val(TextBox1.Text)             TextBox1.Text = ""        ...