Cyber-Space Forum
WellCome To Cyber-Space Forum

Please Register To Join And See and Reply All The Topics

Then Check Your Email And Comfirm To Active Your Account





By Administrator



Cyber-Space Community | Sharing is Caring
 
HomenewsRegisterLog in

Share | 
 

 Jawaban Soal Praktek NO. 1

View previous topic View next topic Go down 
AuthorMessage
Maverick Carbine
Newbe
Newbe


Posts : 2
Join date : 2010-11-01
Age : 27
Location : DI Depan Komputer

PostSubject: Jawaban Soal Praktek NO. 1   Mon Nov 01, 2010 4:52 pm

INI JAWABAN SOAL PRAKTEK NO. 1


Code:
Public Class Form1

    Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim pesan As String = ""
        Dim pesan2 As String = ""
        Dim pesan3 As String = ""

        For Each I As CheckBox In GroupBox1.Controls
            If I.Checked = True Then
                pesan += "-" & I.Text
            End If
        Next
        For Each J As CheckBox In GroupBox2.Controls
            If J.Checked = True Then
                pesan += "-" & J.Text
            End If
        Next
        For Each K As RadioButton In GroupBox3.Controls
            If K.Checked = True Then
                pesan += "-" & K.Text
            End If
        Next
        Label2.Text = pesan + pesan2 + pesan3
    End Sub
End Class


Tampilan pesanan (label pesanan) masih belum bagus, silakan anda desain sendiri.......... klo gk bs tanya sma MBAH MARIJAN....
Back to top Go down
admin slicer
Admin
Admin


Posts : 93
Join date : 2010-10-31
Age : 26
Location : UnderGround

PostSubject: Re: Jawaban Soal Praktek NO. 1   Mon Nov 01, 2010 5:05 pm

kog kw blang tdi ada gambar nya ??? so mna gambarnya???? hhehehehe lol!
Back to top Go down
http://cyber-space.co.nr
Maverick Carbine
Newbe
Newbe


Posts : 2
Join date : 2010-11-01
Age : 27
Location : DI Depan Komputer

PostSubject: Re: Jawaban Soal Praktek NO. 1   Mon Nov 01, 2010 5:08 pm

admin slicer wrote:
kog kw blang tdi ada gambar nya ??? so mna gambarnya???? hhehehehe lol!


gk ada yg cantik gambarnya.....
Back to top Go down
admin slicer
Admin
Admin


Posts : 93
Join date : 2010-10-31
Age : 26
Location : UnderGround

PostSubject: Re: Jawaban Soal Praktek NO. 1   Mon Nov 01, 2010 5:57 pm

[You must be registered and logged in to see this image.] but nice shared lahhh ...................... [You must be registered and logged in to see this image.]
Back to top Go down
http://cyber-space.co.nr
junkelse
Moderator
Moderator


Posts : 8
Join date : 2010-10-31

PostSubject: Re: Jawaban Soal Praktek NO. 1   Mon Nov 01, 2010 6:07 pm

prikitiw nya mna sob..
Very Happy
Back to top Go down
admin slicer
Admin
Admin


Posts : 93
Join date : 2010-10-31
Age : 26
Location : UnderGround

PostSubject: Re: Jawaban Soal Praktek NO. 1   Mon Nov 01, 2010 10:12 pm

tmbahan untukk button batal nya ne codenya...

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
For Each a As CheckBox In GroupBox1.Controls
a.Checked = False
Next
For Each b As CheckBox In GroupBox2.Controls
b.Checked = False
Next
For Each c As RadioButton In GroupBox3.Controls
c.Checked = False
Next
TextBox1.Clear()
End Sub

_________________
---------------------------------------------------------
[You must be registered and logged in to see this image.]
Go Ahead anD fUck OfF

Back to top Go down
http://cyber-space.co.nr
Sponsored content




PostSubject: Re: Jawaban Soal Praktek NO. 1   Today at 7:11 pm

Back to top Go down
 
Jawaban Soal Praktek NO. 1
View previous topic View next topic Back to top 
Page 1 of 1
 Similar topics
-
» [ASK]Gear Design Update Season 5 Part Coming Soon? Hero Evo ga koar-koar?
» Tips Ujian Praktek SIM C
» sharing game2 asah otak aja..
» MOVIE (INFO) : Sherlock Holmes (2009)
» [Matibeku.com] We Are Closing Down..

Permissions in this forum:You cannot reply to topics in this forum
Cyber-Space Forum :: Programming :: Vb / Vb.Net-
Jump to: