Saat mengembangkan pemrograman VB, rangkaian angka yang dimasukkan dalam formulir dipecah menjadi satu angka. Mari kita lihat tutorial detailnya di bawah ini.
1. Pertama, masukkan dua kontrol kotak teks di area pengeditan dan beri nama Text1 dan Text2.
2. Selanjutnya, masukkan tombol kontrol.
3. Dalam kode, tentukan dua variabel string str dan res untuk menyimpan nomor sebelum pemisahan dan nomor setelah pemisahan.
4. Kemudian tentukan variabel arr dan nilainya.
5. Masukkan nilai string str dan dapatkan dengan menggunakan metode Teks.
6. Dapatkan nilai arr(1) menggunakan metode Mid.
7. Pisahkan semua angka yang ada di string str, dan simpan angka yang dipecah itu ke dalam variabel arr.
8. Gunakan pernyataan For untuk mengontrol dan membaca nilai dalam variabel arr.
9. Simpan setiap nilai pemisahan pada variabel res.
10. Terakhir, tampilkan setiap nilai yang dipisahkan di jendela, dipisahkan dengan spasi.
11. Jalankan program, masukkan serangkaian angka ke dalam sel, dan itu akan dibagi menjadi satu angka.
Di atas adalah tutorial membagi rangkaian angka yang dimasukkan ke dalam formulir VB6.0 menjadi angka tunggal. Saya harap Anda menyukainya, dan mohon terus memperhatikan website webmaster baru.
Rekomendasi terkait:
Bagaimana cara menggunakan kotak label VB6.0?
Bagaimana cara cepat menghapus konten txt secara berkelompok di VB6.0?