Posts by Jx_Man

If you knows answer then give answer but don't give advises

It kind of Laziness....Show the effort, how far you have done with this.

You Need To See This Rule :)

SS Tab is a control on Component (Ctrl + T or Project ->Component).

explain more detail...

Post your question on PHP Section. This section just for VB.Net

what do you want exactly?
did u cannot import System.Data.SqlClient on your codes?

alternatively :

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
    ComboBox1.Items.Remove(ComboBox1.SelectedItem)
End Sub

set the timer interval.

you're Welcome. Don't forget to mark this thread as Solved.

if this thread was solved then please mark it as Solved. so other member can find it easily if they had a same problem. :)

First you must to know the pattern of prime number then u can write the code.
see wikipedia and FactMonster

>> what should be installed on client machine
install .net framework to run a vb.net 1.0 application smoothly...

I would like to know if someone could send me a entire code for this purpose

>> anything is wrong in my code?
post the code

ex :

Interaction.MsgBox(Math.Sqrt(9));

ohhhh, i was wrong....
im so sorry friend, i m not read carefully.
the answer was given by veena.

try this :

Private Sub HScroll1_Change()
Text1.Text = HScroll1.Value
End Sub

if successfully then give a message.

Using Blob...

thnx for sharing friend :)

see this code, this my code to get data into combobox :

Private Sub BacaData()
        Dim i, k 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")
            dtStudent = dsStudent.Tables("Student")
            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

In form2 :

Private Sub Form_Load()
Command1.Caption = Form1.Text1
End Sub

using timer.
in timer event you can change text color.

i think its textbox

just put your code in function method.
this an example :

Public Function GetSpecialFolder(ByVal mFolder As Environment.SpecialFolder) As String
        GetSpecialFolder = Environment.GetFolderPath(mFolder)
End Function

Private Sub Form1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Label1.Text = GetSpecialFolder(Environment.SpecialFolder.System)
End Sub

Well, great..
Don't forget to mark this thread solved.

well, i don't have experience with this topic but i found this thread. Hope it make a sense and helping u a little bit.
http://www.daniweb.com/forums/showthread.php?t=112440&highlight=Voice+Recognition
http://www.daniweb.com/forums/showthread.php?t=40204&highlight=Voice+Recognition

http://www.houseoffusion.com/groups/cf-server/thread.cfm/threadid:117
http://database.ittoolbox.com/documents/popular-q-and-a/odbc-vs-oledb-2412
http://www.issociate.de/board/goto/75615/Difference_betwwen_ADO_vs_ODBC_vs_OLE_DB.html
http://jamesmccaffrey.spaces.live.com/blog/cns!504C7CC53E7E7FE8!143.entry
http://www.forumtopics.com/busobj/viewtopic.php?p=69143
http://www.experts-exchange.com/Databases/Q_20985045.html

>> filelength = filelength + file.Length
it should be objfile.length

>> filelength = filelength + file.Length
why you add filelength with file.Length?
just filelength = file.length

i suggest to make a function, so it looks neat.

Imports System.IO
...
Private Function GetFileSize(ByVal MyFilePath As String) As Long
        Dim MyFile As New FileInfo(MyFilePath)
        Dim FileSize As Long = MyFile.Length
        Return FileSize
    End Function

to call this function :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim temp As String
        temp = GetFileSize("D:\Address.txt") / 1000

        MsgBox(temp)
    End Sub

just convert c# example into vb.net.

Try this following code :

Private Sub Text1_Change()
    If IsNumeric(Right(Text1, 1)) = True Then
     ' is a number
        Text1 = Left(Text1, Len(Text1) - 1)
        'Text1.Text = ""
    Else
     'anything but a number
 
    End If
End Sub

Or This code :

Private Sub Text1_KeyPress(KeyAscii As Integer)
    Select Case KeyAscii
        Case 65 To 90, 8, 32
        'Let these key codes pass through
        Case 97 To 122, 8, 32
        'Let these key codes pass through
        Case Else
        'All others get trapped
        KeyAscii = 0
    End Select
End Sub

You're Welcome friend...
Don't forget to mark this thread Solved :)

private void Form1_Closing(object sender, System.ComponentModel.CancelEventArgs e)
{
	if ((Interaction.MsgBox("Are you sure want to quit?", MsgBoxStyle.YesNo, "Exit")) == MsgBoxResult.Yes)
	{
		ProjectData.EndApp();
	}
	else
	{
		e.Cancel = true;
	}
}

ok.
so this thread was solved or not?

you didn't make a connection to sql server..

hmmm, how far u have done?show the code and other member can correct any mistaken..

61 views and no reply..... no good will to help me out there???

it can be non member / guest who make it 61 views.

Post your question on Computer Science and Software Design section for any idea from other member.

Hello,

Thanks for the info not sure if that will work but i will try, i found the answer which is below, i was missing the using system.media on top including the information below. hope this helps everyone as it did me.

thanks to share the answer and don't forget to mark this thread solved to make it easy to find.

Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrackBar1.Scroll
    Form1.ActiveForm.Opacity = TrackBar1.Value / TrackBar1.Maximum
End Sub

try this following code :

Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox3.TextChanged
        If Val(TextBox3.Text) > 32 Then
            TextBox3.Text = TextBox3.Text.Remove(0, Len(TextBox3.Text))
            MsgBox("input under 33")
        End If
    End Sub

how far u do this?

specify more..
to select two table u can use JOIN in your sql statement.

Great Idea...

Just asking,
where a province of indonesia that u live on? i mean an origin place...
>>im studying computer/informatics engineering
what's the university name?
(btw jarang lho ada org indonesia di sini :))

Hi all,
Welcome to Daniweb Friends...
actually this section just for introducing your self. So if u have any problem please post on current section. :)

you can visit this site to see more information detail

i have a problem to put an image on my MDI form which i also using an active skin in all forms including the MDI form..

You mean to show picture as you mdi form background?
- On MDIForm Properties set Picture with your current picture.

n ehm..wat syntax should i use to close an mdi child forms using the EXIT button on top right ?

Private Sub MDIForm_Unload(Cancel As Integer)
Dim pil As Variant
  pil = MsgBox("Anda Yakin ingin Keluar?", vbOKCancel, "Exit Confirm")
  If pil = 1 Then
    End
  Else
    Cancel = 1
  End If
End Sub

hmmm, you can post this thread on Computer Science and Software Design section

To call form2 you must to make an object of form2 :

Dim MainMenu as New Form2
MainMenu.show

To close form1 after called form2 :
- Don't use Me.Close cause it will close application.
- Use Dispose(), set it to false.
e.g :

Dim MainMenu as New Form2
MainMenu.show
Me.Dispose(False)

what a questions?

do u have the exe file of visual C++?
if u have the exe file u can run that file from vb.net using Shell Function.