This summary is not available. Please
click here to view the post.
READ MORE - Membuat Favicon Pada Blogger
A blog of Fadillah Said a.k.a GnouBdilS
Posted by GnouBdilS at 7/31/2009 03:03:00 AM 0 comments
Labels: blog
Posted by GnouBdilS at 7/18/2009 09:24:00 AM 2 comments
Labels: cms
Nama Kontrol
Form1
Properties
StartPosition = CenterScreen
Text = Kalkulator
Nama Kontrol
Label1
Properties
Text = Nilai 1
Nama Kontrol
Label2
Properties
Text = Nilai 2
Nama Kontrol
Label3
Properties
Text = Hasil
Nama Kontrol
TextBox1
Properties
Name = txtnil1
Text = (dikosongkan saja)
Nama Kontrol
TextBox2
Properties
Name = txtnil2
Text = (dikosongkan saja)
Nama Kontrol
TextBox3
Properties
Name = txthasil
Text = (dikosongkan saja)
Nama Kontrol
Button1
Properties
Name = cmdtambah
Text = +
Nama Kontrol
Button2
Properties
Name = cmdkurang
Text = -
Nama Kontrol
Button3
Properties
Name = cmdkali
Text = *
Nama Kontrol
Button4
Properties
Name = cmdbagi
Text = /
Public Class Form1
Private Sub cmdtambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdtambah.Click
txthasil.Text = Val(txtnil1.Text) + Val(txtnil2.Text)
End Sub
Private Sub cmdkurang_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdkurang.Click
txthasil.Text = Val(txtnil1.Text) - Val(txtnil2.Text)
End Sub
Private Sub cmdkali_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdkali.Click
txthasil.Text = Val(txtnil1.Text) * Val(txtnil2.Text)
End Sub
Private Sub cmdbagi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdbagi.Click
txthasil.Text = Val(txtnil1.Text) / Val(txtnil2.Text)
End Sub
End Class
Posted by GnouBdilS at 7/04/2009 10:49:00 AM 0 comments
Labels: visual Basic 2005
Nama Kontrol
Form1
Properties
StartPosition = CenterScreen
Nama Kontrol
PictureBox
Properties
Name = pic
SizeMode = StretchImage
Nama Kontrol
Button1
Properties
Name = cmdgambar
Text = Browse Gambar
Nama Kontrol
openFileDialog1
Properties
Name = OFD
private: System::Void cmdgambar_Click(System::Object^ sender, System::EventArgs^ e) {
OFD->InitialDirectory;
Application::ExecutablePath;
OFD->Filter = "Bitmap Files (*.bmp)|*.bmp|GIF Files (*.gif)|*.gif|JPEG Files (*.jpeg,*.jpg)|*.jpg";
OFD->ShowDialog();
pic->ImageLocation = OFD->FileName;
}
Posted by GnouBdilS at 7/01/2009 09:10:00 PM 0 comments
Labels: visual c++ 2005