FOTO SAMPUL

Welcome to WordPress. This is your first post. Edit or delete it, then start blogging!Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Quisque sed felis. Aliquam sit amet felis. Mauris semper, velit semper laoreet dictum, quam diam dictum urna, nec placerat elit nisl in quam. Etiam augue pede, molestie eget, ...

Category name clash

Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Quisque sed felis. Aliquam sit amet felis. Mauris semper, velit semper laoreet dictum, quam diam dictum urna, nec placerat elit nisl in quam. Etiam augue pede, molestie eget, rhoncus at, convallis ut, eros. Aliquam pharetra. Nulla in tellus eget odio sagittis blandit. ...

Test with enclosures

Here's an mp3 file that was uploaded as an attachment: Juan Manuel Fangio by Yue And here's a link to an external mp3 file: Acclimate by General Fuzz Both are CC licensed. Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Quisque sed felis. Aliquam sit amet felis. Mauris semper, velit semper laoreet dictum, ...

Block quotes

Some block quote tests: Here's a one line quote. This part isn't quoted. Here's a much longer quote: Lorem ipsum dolor sit amet, consectetuer adipiscing elit. In dapibus. In pretium pede. Donec molestie facilisis ante. Ut a turpis ut ipsum pellentesque tincidunt. Morbi blandit sapien in mauris. Nulla lectus lorem, varius aliquet, ...

Contributor post, approved

I'm just a lowly contributor. My posts must be approved by the editor.Mauris semper, velit semper laoreet dictum, quam diam dictum urna, nec placerat elit nisl in quam. Etiam augue pede, molestie eget, rhoncus at, convallis ut, eros. Aliquam pharetra. Nulla in tellus eget odio sagittis blandit. Maecenas at ...

Latihan_03_46110021

Posted by Unknown - - 0 komentar


  1. Langkah-langkah penyelesaian
    Public Class Latihan_03_46110021
     Private Sub lama46110021_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lama46110021.Enter
        lama46110021.Text = Val(sd46110021.Text) + Val(sltp46110021.Text) + Val(slta46110021.Text) + Val(poli46110021.Text)
    End Sub

     Private Sub selesai46110021_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles selesai46110021.Enter
        selesai46110021.Text = Val(umur46110021.Text) + Val(sd46110021.Text) + Val(sltp46110021.Text) + Val(slta46110021.Text) + Val(poli46110021.Text)
    End Sub

     Private Sub persen46110021_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles persen46110021.Enter
        persen46110021.Text = (Val(lama46110021.Text) / Val(selesai46110021.Text)) * 100
    End Sub

     Private Sub kosong46110021_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kosong46110021.Click
        umur46110021.Text = ""
        sd46110021.Text = ""
        sltp46110021.Text = ""
        slta46110021.Text = ""
        poli46110021.Text = ""
        selesai46110021.Text = ""
        lama46110021.Text = ""
        persen46110021.Text = ""
    End Sub
End Class
2. Scribt unik beserta komentar
  1.     Private Sub lama46110021_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lama46110021.Enter ==> fungsi (enter) pada scribt disamping ialah untuk memunculkan hasil rumus yang ada pada kotak tersebut ketika tombol (Tab) ditekan

Leave a Reply