Oke..gue langsung, tanpa basa basi..
ini salah satu program yang gue coba buat dari Visual basic..
Buat 4 buah label dan 1 command, 1 shape dan 1 vsscroll
Option Explicit
Dim TempF As Integer
Dim TempC As Integer
Private Sub cmdExit_Click()
End
End Sub
Private Sub vsbTemp_Change()
'Read F and convert to C
TempF = vsbTemp.Value
lblTempF.Caption = Str(TempF)
TempC = CInt((TempF - 32) * 5 / 9)
lblTempC.Caption = Str(TempC)
End Sub
Related Post
Visual Basic
- GAME CARD WITH VISUAL BASIC 6
- Using ADO and the ListView control Visual basic 6.0
- Program pengacak no undian pada VB 6
- duplikat gambar dengan visual basic
- Efek Tetesan Air Diatas Monitor dengan visual basic
- Explode form visual basic
- SIMULATION DEACTIVE BOOM VER.1
- Simulasi animasi gerbang otomatis dengan visual basic
- MENAMPILKAN PILIHAN GAMBAR DENGAN VISUAL BASIC
- Animasi Frame image dengan visual basic 6
- Game uji kemampuan otak dengan visual basic 6.0
