Posts by Jx_Man

Playing Basketball
swimming
read books
Guitar & keyboard
watching Movies (korean movies)
Eat :D

Hi CoffeZila...Welcome to Daniweb Friend :)
do u like coffe much?? :D

Milk Bread

so combo box item is not retrived from database??

let user choose the item frm combo box then retrived the data from databse and view it.

what was retrived from database?and what to viewed?
how about your database table?

this for windows application.
i repost the program.

reference missing maybe..

see this example :

Private Sub Command1_Click()
Sum.Caption = "Sum : " & (Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text))
Average.Caption = "Average : " & ((Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text)) / 3)

If Val(Text1.Text) < Val(Text2.Text) And Val(Text1.Text) < Val(Text3.Text) Then
    Smallest.Caption = "Smallest : " & Text1.Text
ElseIf Val(Text2.Text) < Val(Text1.Text) And Val(Text2.Text) < Val(Text3.Text) Then
    Smallest.Caption = "Smallest : " & Text2.Text
ElseIf Val(Text3.Text) < Val(Text1.Text) And Val(Text3.Text) < Val(Text1.Text) Then
    Smallest.Caption = "Smallest : " & Text3.Text
End If

If Val(Text1.Text) > Val(Text2.Text) And Val(Text1.Text) > Val(Text3.Text) Then
    Larger.Caption = "Larger : " & Text1.Text
ElseIf Val(Text2.Text) > Val(Text1.Text) And Val(Text2.Text) > Val(Text3.Text) Then
    Larger.Caption = "Larger : " & Text2.Text
ElseIf Val(Text3.Text) > Val(Text1.Text) And Val(Text3.Text) > Val(Text1.Text) Then
    Larger.Caption = "Larger : " & Text3.Text
End If

End Sub

make three textbox for input.
- to get sum u just add all textbox value
ex. sum = val(textbox1.text) + val(textbox2.text) + ...
- average = sum / 3
- to display you can use label or message box, or textbox.

what u means cant open?
cant to open attachment file or wave (.wav) file?

declare even and odd as integer and value to accomodate input (get).
to insert (put) number you can use text box or inputbox.

Select * from Table1 a left join Table2 b on (a.id = b.id) where a.id <> '1'

See this link
and see this too

so what the point here?how far you do this?

Outer_Circleg1 = Pitch_radiusg1 + addendum
Gear_Features.Outer_Circleg1.Text = Outer_Circleg1.ToString
......
root_Circleg1 = Pitch_radiusg1 - dedendum
Gear_Features.Root_Circleg1.Text = root_Circleg1.ToString

what it addendum and dedendum?they didn't get value assignment..

Hi Thando...
i'll post the program to you.
i guest you don't load movies before.
see the program, and press load movies button to load flash file and play.

i m glad to share :)

this.Dispose(false);

Correction :

Common_Features.Addendum1.Text = (CDbl(Common_Features.Addendum.Text) * 25.4).ToString

just set option strict to off. you make this more harder.

set strict on to off. it will make error. why you want to set it on??

for an attachment in this thread??i try download it and none file corrupted. are you sure??

i post the program, try it.

are you have already solved them??

HI Russel Welcome to Daniweb too :)

Hi Vouge welcome to Daniweb :)

Hi welcome to Daniweb.
what r u talking about??

oh. its already solved. great. i think that i must migrate from .net 2003 to higher. more controls not included here.

You can merge cells in the TableLayoutPanel control by setting the ColumnSpan or RowSpan properties. it from msdn or you can ask others or find with google.

well, i never do this. i works under .net 2003 and .net 2003 not including TableLayoutPanel.

cause the equation is (1.2 / 4) + 0.002 in your code not 1.25/4

oh..and set timer interval = 1 to get fast update.

if you want value always update, you can use timer.
put timer control on your form and add the code in it. don't forget to set timer enable properties = true

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        label1.Text = Form1.temp
    End Sub

no, you don't have to terminate program, just close form2 and open again cause code works in form load event. why you put label in form2 not in common feature form?

how about manifest file to make your program looks like your windows.

- i think vb is easy to learn than c#.
- no many different between them. one different that i find is encapsulation between form. in vb6 u can access anything in other form from another form, in .net you must make variable to get value. and more easy to make report.

Ok.. see this example.
we have 2 form, you want to pass value from textboxt in form1 to label in form2.
in form 1 :
declare this code after windows generated code or before events.

Public Shared temp As String

in whatever event in form 1

temp = textbox1.text

in Form 2.
you just take the value in temp

label1.text = form1.temp

Hi Bill...Welcome to DaniWeb friend :)

Public Declare Function PlaySound Lib "winmm.dll" (ByVal pszSound As String, ByVal hmod As IntPtr, ByVal fdwSound As Integer) As Boolean
    'Public Declare Function PlaySound Lib "winmm.dll" (ByVal pszSound As Byte(), ByVal hmod As IntPtr, ByVal fdwSound As SoundFlags) As Boolean
    Public Enum SoundFlags As Integer
        ''' <summary>
        ''' The sound is played synchronously, and PlaySound returns after
        ''' the sound event completes. This is the default behavior.
        ''' </summary>
        SND_SYNC = &H0

        ''' <summary>
        ''' The sound is played asynchronously and PlaySound returns
        ''' immediately after beginning the sound. To terminate an
        ''' asynchronously played waveform sound, call PlaySound with
        ''' pszSound set to NULL.
        ''' </summary>
        SND_ASYNC = &H1

        ''' <summary>
        ''' No default sound event is used. If the sound cannot be found,
        ''' PlaySound returns silently without playing the default sound.
        ''' </summary>
        SND_NODEFAULT = &H2

        ''' <summary>
        ''' The pszSound parameter points to a sound loaded in memory.
        ''' </summary>
        SND_MEMORY = &H4

        ''' <summary>
        ''' The sound plays repeatedly until PlaySound is called again
        ''' with the pszSound parameter set to NULL. If this flag is
        ''' set, you must also set the SND_ASYNC flag.
        ''' </summary>
        SND_LOOP = &H8

        ''' <summary>
        ''' The specified sound event will yield to another sound event
        ''' that is already playing. If a sound cannot be played because
        ''' the resource needed to generate that sound is busy playing
        ''' another sound, the function immediately returns False without
        ''' playing the requested sound.
        ''' </summary>
        ''' <remarks>If …

1. if u just want to display i think label is better.
2. use public shared variable to pass value from one to another form.

yes, data will display on combo box. in my code id student will display on combo box.

Hi James...Welcome to Daniweb Friend :)

i didn't get the point... and please insert a picture (you can attach..use forum facility), don't give a link.

Post on Current forum.
C++

Hi sammy...
please don't do like this again, you can post on previous post if you want to do like this.
Ok. i repost again the files.

yes, you don't have parameter to update. i mean your key to update. your code its not specify who to update.
you need key :
where KeyName = ???. ex : where IdMember='"123"'
and you loosing to add single quote :

ExecuteSqlCommand("update member set tmembername='" & membername & "', taddress='" & address & "' and handphone='" & handphone & "' Where IdMember = '"???"' " )

this following code to read data and display on combo box, u just put on event like "form load":

Public Function GetConnect()
        Dim conn As SqlConnection
        conn = New SqlConnection("server = jery;database = VBtoC#;Trusted_Connection = yes")
        Return conn
End Function


Private Sub ReadData()
        Dim i As Integer
        Dim cmdStudent As New SqlCommand
        Dim daStudent As New SqlDataAdapter
        Dim dsStudent As New DataSet
        Dim dtStudent As New DataTable
        Dim conn As SqlConnection

        conn = GetConnect()
        Try

            cmdStudent = conn.CreateCommand
            cmdStudent.CommandText = "SELECT * FROM Student"
            daStudent.SelectCommand = cmdStudent
            daStudent.Fill(dsStudent, "Student") ' Table Name
            dtStudent = dsStudent.Tables("Student") 'Table Name
            For i = 0 To dtStudent.Rows.Count - 1
                cmbNis.Items.Add(dtStudent.Rows(i).Item(0))
            Next

        Catch ex As Exception
            MsgBox("Error: " & ex.Source & ": " & ex.Message, MsgBoxStyle.OKOnly, "Connection Error !!")
        End Try
	conn.Close()
End Sub

Hope this helps..

you're welcome friend.
i m glad to help and share my knowledge :D

Virus

My Wife is a Gangster 2

122 = 1111010

saint