cara membuat combobox di vb.net tidak ditulis

 pada properties : 

dropdownstyle 

pilih DropDownList 

cara copy lagu / music MP3 ke Amazfiz GTS 2

cara copy lagu / music MP3 ke Amazfiz GTS 2

1.  Jalankan aplikasi ZEPP di android 

2. Klik Profil

3. Amazfit GTS 2

4. Music

5. Unggah Music

6. pilih folder tempat mp3

7. pilih mp3 yang akan di kirim

8. klik unggah

9. tunggu proses sampai unggah selesai

10. selesai

isNull in vb.net 2019

isNull di vb.net silahkan menggunakan

 IsDBNull()

list data pada sqLite

     Public Sub NilMahasiswa()

        Dim sqlite_conn As SQLiteConnection

        sqlite_conn = New SQLiteConnection("Data Source=D:\sqlite\jajal.db;Version=3;New=True;Compress=True;")

        ' open the connection:

        sqlite_conn.Open()

        Using cmd As New SQLiteCommand(sqlite_conn)

            cmd.CommandText = "SELECT npm,nama,uts,uas,total,nilai,prosen,tanggalEntryNilai FROM krs011 where npm='" & npm.Text & "' and kode_kul='" & downloadMATAKULIAH.kode_kul.Text & "' and kelas='" & downloadMATAKULIAH.kelas.Text & "';"

            Dim rdrMataKuliah As SQLiteDataReader = cmd.ExecuteReader()

            Using rdrMataKuliah

                While (rdrMataKuliah.Read())

                    npm.Text = rdrMataKuliah.GetString(0)

                    nama.Text = rdrMataKuliah.GetString(1)

                    presensi.Text = rdrMataKuliah.GetValue(6)

                    uts.Text = Replace(rdrMataKuliah.GetValue(2), ",", ".")

                    uas.Text = Replace(rdrMataKuliah.GetValue(3), ",", ".")

                    nilai.Text = rdrMataKuliah.GetString(5)

                    total.Text = Replace(rdrMataKuliah.GetValue(4), ",", ".")

                    If Trim(rdrMataKuliah.GetValue(7).ToString) = "" Then

                        terakhirDiUpdate.Text = "NULL"

                    Else

                        terakhirDiUpdate.Text = "Tanggal Update Terakhir : " & Replace(rdrMataKuliah.GetDateTime(7), ",", ".")

                    End If

                End While

            End Using

        End Using

    End Sub

memeriksa suatu record pada field yang bernilai KOSONG di VB.NET 2019

vNilaiField=Trim(rdrMataKuliah.GetValue(7).ToString) 

maka nilai dari variabel vNilaiField adalah kosong

auto shutdown Wifi routher HG8245H5

 berikut langkah auto shutdown Wifi routher HG8245H5, indihome :

1. Masuk ke url : http://192.168.100.1/

2. masukan user dan password : Support dan theworldinyourhand

3. klik advance

4. WLAN

5. Automatic WiFi Shutdown

6. centang Enable automatic WiFi shutdown

7. Masukan Start dan End, kemudian hari apa saja

8. Klik Apply

9. Selesai

user dan Password utk akses admik routher HG8245H5 indihome

buka browser

masukan url 192.168.100.1

masukan user : Support

masukan password : theworldinyourhand

klik log in

select tanggal jam sekarang pada SQLite

 kadang kita membutuhkan script untuk melihat tanggal jam sekarang pada SQLite, berikut script nya

SELECT DATETIME('now','localtime');

berikut hasil script jika dijalankan 2020-11-15 16:20:18

akan menampilkan tanggal jam sekarang, namun yg ditampilkan tanggal jam sesuai komputer local

cara selected otomatis di listbox pada vb.net

 listbox1.SetSelected(0, True)

artinya listbox1 scr default di arahkan ke paling atas atau index ke 0 (pertama)

Menjadikan cell excel, di convert ke float/decimal

Pada suatu kasus, kita mendapat suatu kasus pada excel, pada cell A1 berisi 1.34 namun format cell tersebut adalah string bukan decimal

berikut cara menjadikan decimal :

silahkan arahkan pada cell A2, masukan rumus NUMBERVALUE

=NUMBERVALUE(a1)/100

NUMBERVALUE hanya menjadikan menjadi angka, sedangkan dibagi 100 menjadikan decimal. 

Menjadikan dari string ke integer di Excel

jika kolom A1berisi 164 namun dalam format string/character

nah pada kolom a2 nilai pada kolom a1 tersebut akan saya jadikan angka/interger

dengan rumus VALUE

cell letakan pada A2 kemudian ketik

=VALUE(a1)

maka sekarang isi dari cell A2 adalah 164 namun dalam format angka/integer bukan string 

Membuat qrCode dengan memakai logo

 berikut adalah alamat untuk membuat qrcode, dimana qrcode bisa dimasukan lgo atau gambar

https://www.logodesign.net/qrcode-generator

qrcode bisa berupa :

alamat url

text

no.hp

facebook

twitter

youtube

silahkan dicoba

Download Images dan Langsung di copy di folder

 <?php

$namafile = "bunga.jpg";

$url = 'https://alamatweb.id/images/savefiles/'.$namafile;

$img = 'foto/'.$namafile; 

// Function to write image into file 

file_put_contents($img, file_get_contents($url)); 

?>

Setting akses database Microsoft SQL Server di PHP Versi 7.3

 Selamat pagi

Kali ini saya akan menerangkan cara setting di PHP untuk akses database Microsoft SQL Server di PHP Versi 7.3

1. Download terlebih dahulu DRIVER msSQL untuk PHP

2. copy file 

php_pdo_sqlsrv_73_nts_x64.dll

php_pdo_sqlsrv_73_ts_x64.dll

php_sqlsrv_73_nts_x64.dll  

php_sqlsrv_73_ts_x64.dll

ke folder : php/ext

2. tambahkan ke file php.ini

extension=php_pdo_sqlsrv_73_nts_x64.dll

extension=php_pdo_sqlsrv_73_ts_x64.dll

extension=php_sqlsrv_73_nts_x64.dll  

extension=php_sqlsrv_73_ts_x64.dll  

3. jalankan/restart php dari command command prompt, dengan perintah sebagai berikut

php --ini

4. selanjutnya silahkan cek dg script

<?php

phpinfo();

?>  

jalankan script tsb, jika hasilnya 

pdo_sqlsrv

sudah ada, maka berhasil setting nya

5. selanjutnya silahkan di test menggunkan script untuk konek ke msSQL

<?php

phpinfo();

exit;

$serverName = "iniAlamatServerMicrosoftSQL"; 

$connectionInfo = array( "Database"=>"DATABASE", "UID"=>"sa", "PWD"=>"PASSWORD");

$conn = sqlsrv_connect( $serverName, $connectionInfo);

if( $conn ) {

     echo "Konek Sukses.<br />";

}else{

     echo "Konek GAGAL.<br />";

     die( print_r( sqlsrv_errors(), true));

}?>

Universal Database Tool

Apabila anda menggunakan banyak database, dalam membuat aplikasi atau memegang banyak database dengan bermacam2 database : MySQL, PostgreSQL, SQLite, Oracle, DB2, SQL Server, Sybase, MS Access, Teradata, Firebird, Apache Hive, Phoenix, Presto. 

Anda bisa menggunakan tool

DBeaver 

dimana tool ini bisa digunakan untuk akses beberapa database tsb di satu layar pc anda.

alamat web nya https://dbeaver.io/

tool ini bisa berjalan di windows, dan yang paling mengembirakan adalah gratis.

membuat TextBox Pada Form Excel VBA

Fungsi dari textbox adalah untuk menerima input dari keyboard.

Excel pada form bisa menggunakan textbox dengan cara sebagai berikut :

Jalankan excel

klik kanan pada sheet1, dan klik view Source

buat userform

Drag n drop 

2 buah textbox 

2 buah label

1 buah ToggleButton : ini digunakan untuk mengeksekusi suatu perintah

pada toolbox ke userform1

sehingga tampilan nya seperti berikut 

kita akan mencoba, pada isian textbox1 begitu tombol/menu proses ditekan maka textbox2 akan berisi seperti pada textbox1

silahkan ToggleButton1 diklik 2x, sehingga seperti pd tampilan dibawah ini

Masukan script disitu, coba isikan script berikut

textbox2.Text = textbox1.Text 

artinya textbox2 diisi dari textbox1

coba kita jalan script tsb, tekan F5

sekarang ditest script nya, silahkan masukan pd textbox1 semisal : SURABAYA

sekarang silahkan klik menu PROSES

disitu tampak textbox2 berisi sama seperti pada textbox1

demikian, semoga bermanfaat

Membuat Script / Coding Ala Pemrograman Visual Basic pada Excel

Selamat pagi,

Sebagaimana Visual Basic, excel juga mempunyaan pemrograman yang dinamakan VBA (koreksi kalau salah), cara menampilkan/memuat halaman script nya adalah

Dari nama Sheet1 

Tambahkan teks

silahkan klik kanan dan view Code

Sehingga akan menampilkan seperti pada gambar berikut 

untuk membuat form, silahkan klik Kanan pada microsoft excel object

- Microsoft Excel Object - Insert - User Form

Sehingga menampilkan seperti berikut

untuk menjalankan form tsb, silahkan tekan F5

tampak pada excel terdapat form ditenggah2.

Kita, bisa menambahkan suatu label, silahkan di silang/close dulu form nya

Pada ToolBos silahkan tarik label ke form

Seperti ini hasil nya

silahkan klik label1, dan rubah caption di Properties

Cari kolom caption, rubah/ganti dengan UJI COBA

Untuk melihat hasil silahkan dijalankan script nya dengan jalan F5, maka akan menampilkan seperti pada gambar berikut

demikian

Tunggu tutorial yg lain, khusus membahas pemrograman excel