Skip to main content

Latihan05 (Fungsi Standar Visual Basic)

Latihan05 (Fungsi Standar Visual Basic) : VB6

Fungsi String
  • Left, mengambil karakter dari sebelah kiri
  • Right, mengambil karakter dari sebelah kanan
  • Mid, mengambil karakter dari tengah
  • LTrim, membuang semua spasi yang ada di sebelah kiri
  • RTrim, membuang semua spasi yang ada disebelah kanan
  • Trim. membuang semua spasi yang ada di sebelah kiri dan kanan
  • Len, memberikan nilai balik integer sebagai panjang string
  • LCase, mengubah string menjadi huruf kecil semua
  • UCase, mengubah string menjadi huruf besar semua
  • Str(int), mengubah bilangan menjadi string(konversi)
  • Chr(Asscii), konversi dari nilai ascii menghasilkan karakter

Fungsi Matematika


Fungsi Tanggal dan Waktu




Untuk contoh silakan kalian buka aplikasi Visual Basic 6.0 kalian pada desktop ataupun startprogram.
Pilihlah Standard Exe - Open.

Buat tampilan form seperti dibawah ini :



Settinglah nama objek dan caption objek dengan Fomat di bawah ini:
catatan penting : caption adalah bacaan objek yang muncul di form sedangkan name adalah identitas nama objek yang digunakan untuk pengkodingan.



Ketentuaan Pengerjaan :
  • Pada saat form di jalankan maka tanggal dan jam tampil
  • Textbox input kata berisi kata yang akan dijadikan fungsi
  • Pada saat di input kata yang akan di jadikan fungsi maka textbox dikolom hasil otomatis akan terisi
  • Button bersih berguna untuk membersihkan isi di dalam textbox
  • Button keluar berfungsi untuk keluar dari program aplikasi
masukkan listing program seperti berikut :

Private Sub cmdbersih_Click()
txtleft = ""
txtright = ""
txtmid = ""
txtlen = ""
txtltrim = ""
txtrtrim = ""
txtlcase = ""
txtucase = ""
txtkata.SetFocus
End Sub
Private Sub cmdkeluar_Click()
x = MsgBox("Mau keluar dari form ini?", vbQuestion + vbOKCancel, "Informasi")
If x = vbOK Then
End
End If
End Sub

Private Sub Timer1_Timer()
ljam.Caption = Time
ltanggal.Caption = Format(Date, "dddd,d mmmm yyyy")
End Sub
Private Sub txtkata_Change()
txtleft = Left(txtkata, 5)
txtright = Right(txtkata, 5)
txtmid = Mid(txtkata, 5, 5)
txtlen = Len(txtkata)
txtltrim = LTrim(txtkata)
txtrtrim = RTrim(txtkata)
txtlcase = LCase(txtkata)
txtucase = UCase(txtkata)
End Sub
 Penjelasan koding :
txtleft = Left(txtkata,5) ; mengambil nilai txtkata berjumlah 5 huruf dari kiri dan ditampilkan di textbox txtleft
ljam.caption = time ; label jam diberi nilai waktu sesuai waktu komputer
Jika ada pertanyaan lain silakan melalui komentar :)





Lalu Klik Run - Start  atau tekan f5 :













MATERI VB6

Jika anda baru Belajar VB 6 silakan belajar dari materi pertama :

Labels:

Comments

Post a Comment

Popular posts from this blog

Menambahkan Peraturan Komentar Pada Blog

Menambahkan Peraturan Komentar Pada Blog : Ngblog Menulis sebuah artikel dan dikomentari dengan link aktif/promosi produk dan kata kata spam lainnya memang tidak mengenakan anda mungkin akan sangat merasa kecewa sekali, anda mungkin seperti menulis sebuah artikel namun tidak dihargai karyanya oleh orang lain. Mungkin membuat aturan berkomentar di blog adalah salah 1 cara menetralisirnya, mungkin jika ada aturan tersebut orang berpikir 2 kali untuk meninggalkan komentar Spam, lalu bagaimana cara membuat aturan komentar tersebut? langsung saja kita praktekan Ikuti langkah berikut : Login ke bloger,masuk ke blog yang anda inginkan, Klik Setelan -> POS-KOMENTAR   Scroll kebawah dan cari menu "pesan formulir komentar" klik tambahkan , dan isi kolom sesuai keinginan kalian atau peraturan yang kalian inginkan.  Setelah selesai silakan klik simpan setelan dipojok kanan atas. Lihat hasilnya di blog kalian ,akan seperti ini : Jika ada pertanyaan...
21 comments
Baca Lebih »

Contoh Program C++ : Konversi Bilangan Hexadesimal, Oktal , Biner.

Hai Pembaca FajarYusuf.Com yang pintar dan berwawasan tinggi, kali ini FajarYusuf.Com akan post Contoh Program C++ : Konversi Bilangan Hexadesimal, Oktal , Biner . Mari kita membuat program konversi bilangan yang sangat mudah di buat dengan menggunakan bahasa pemrograman C++. Yaitu dengan menggunakan type data long, untuk Hexadesimal dengan rumus : <<hex<<desimal (merubah dari bilangan Desimal ke Hexadesimal) , untuk Oktal dengan rumus : <<oct<<desimal (merubah dari bilangan Desimal ke Oktal). Dan untuk biner dilakukan pembagian 2. Contoh Coding Program C++ Konversi Bilangan: #include<iostream> using namespace std; int main() { long desimal, pembagi=1073741824, bit; cout<<"Nilai Desimal : "; cin>>desimal; cout<<"Hexadesimal = "<<hex<<desimal<<endl; cout<<"Oktal = "<<oct<<desimal<<endl; ...
Post a Comment
Baca Lebih »

Array Pada Golang

Array Array adalah sebuah urutan bernomor elemen type tunggal dengan panjang yang tetap. Di Go bisa digunakan array seperti koding ini: var x [5] int Arti dari baris diatas yaitu x adalah contoh variabel array yang terdiri dari 5 urutan bertipe integer. Mari kita coba membuat codingan array  kalian bisa mencobanya klik disini  : package main import "fmt" func main() { var x [5]int x[4] = 100 fmt.Println(x) } Kamu akan melihat hasil output ini: [0 0 0 0 100] x [4] = 100 jika dibaca akan seperti ini "mengatur elemen ke-5 dari array x menjadi 100". Kelihatannya agak aneh bahwa x [4] mewakili elemen ke-5 dan bukannya yang ke-4. Untuk urutan array tidak sama seperti string, array diindeks mulai dari 0 .  Kita bisa mengubah fmt.Println (x) menjadi fmt.Println (x [4]) dan kita juga akan mendapatkan hasil yang sama yaitu 100. Berikut ini contoh program lain yang menggunakan array: package main import "fmt" func main() { var x [5]flo...
Post a Comment
Baca Lebih »