Apr 19

Let’s make this VB more useful, kita akan coba menggunakan SELECTION pada Visual Basic. Case: Kita membuat 3 Form. form 1 di gunakan utk login user form 2 adalah interface login user from 3 adalah hasil dari validasi user yang sudah login. => pertama kita membuat form utk user menentukan utk “Login atau End” => [...]

[ More ]
Apr 19

Menyambung Posting sebelumnya mengenai Dasar dalam menggunakan Visual Basic, yang kita coba di bawah ini adalah mengenai manipulasi TEXT yang akan muncul setelah di klik . Private Sub Label2_Click() End Sub Private Sub Option1_Click() End Sub Private Sub address_Change() hasil.Caption = address.Text() End Sub Private Sub biru_Click() hasil.ForeColor = vbBlue End Sub Private Sub merah_Click() [...]

[ More ]
Apr 19

Dasar dalam menggunakan Visual Basic, yang kita coba di bawah ini adalah mengenai OPERATOR yang sering di gunakan dalam VB. Dim var1 As Single, var2 As Single Dim hasil As Single Private Sub Label1_Click() End Sub Private Sub Option1_Click() var1 = Text1.Text var2 = Text2.Text hasil = var1 + var2 Label3.Caption = hasil End Sub [...]

[ More ]
Apr 19

Di Post sebelumnya kita sudah coba menggunakan Selection pada Delphi utk menentukan Hari , Let’s try utk Menentukan BULAN. unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm2 = class(TForm) Label1: TLabel; nilai: TEdit; Label2: TLabel; Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { [...]

[ More ]
Apr 19

Bagaimana mencari atau selection pada Delphi, berikut contoh di bawah ini menggunakan ekspresi “IF ELSE” Case-nya : Bagaimana menentukan Hari Berdasarkan Bilangan yang di input ? unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Label1: TLabel; Label2: TLabel; nilai: TEdit; Button1: TButton; procedure Button1Click(Sender: TObject); [...]

[ More ]