Public Sub Main()
Dim Lang As String
Shell "echo
$LANG" To Lang
If Lang =
"id_ID.utf8\n" Then
Print “LANG
System berbahasa Indonesia”
Else
Print “Lang
System berbahasa selain Indonesia”
Endif
End
Perhatikan pada
“id_ID.utf8” terdapat tambahab “\n”, karena pemanggilan
perintah shell “echo $LANG” pada gambas akan menampilkan tambahan
sepasi dibawahnya.
Tidak ada komentar:
Posting Komentar