Pages

Menulis Statemen Assignment

Statemen assignment memberikan nilai atau ekspresi ke variabel atau konstan. Statemen assignment selalu menyertakan tanda sama dengan (=). Contoh berikut memberikan nilai kembali dari fungsi InputBox ke variabel Yourname.
Sub Question()
Dim yourName As String
yourName = InputBox("What is your name?")
MsgBox "Your name is " & yourName
End Sub

Statemen Let bersifat opsional dan biasanya dihilangkan. Sebagai contoh, pernyataan tugas sebelumnya dapat ditulis:

Let yourName = InputBox("What is your name?")

Statemen Set digunakan untuk menetapkan suatu objek ke variabel yang telah dinyatakan atau dideklarasikan sebagai objek. Kata kunci Set diperlukan. Pada contoh berikut, statemen Set menetapkan range di Sheet1 ke objek variabel myCell:

Sub ApplyFormat()
Dim myCell As Range
Set myCell = Worksheets("Sheet1").Range("A1")
With myCell.Font
.Bold = True
.Italic = True
End With
End Sub

Statemen yang menetapkan nilai properti juga merupakan statemen penugasan. Contoh berikut menetapkan property Bold dari objek Font untuk sel aktif:

ActiveCell.Font.Bold = True

No comments:

Post a Comment