Forum Topics Tagged [vb.net]

Help me , Search data with dataGuidViewer and print that searching result (vb.Net). I am try verious Code thous are found youtube, but it not work...... Please Help me VB.Net (2010, 2012,2013,)

 Please help how to code this on vb.net with SQL server database

Hi! We are a 4 member group for our thesis and we already have submitted 5 topic proposals yet nothing was accepted...and here are the topics: enrollment system, gadgets on track, employment resource system, subdivision technical entry pass Now, I need a help for new ideas that can be developed through visual studio and it can be a web-based or window-based projects. Hope you can help me Thanks in advance!

Hi, I hv vb.net applivcation. I have following CODE1 to save data & to prevent duplicate data entry into table. The following code I put in button save event. However I want to put this CODE2 in perticluar textbox e.g. here SpecimenNoTextBox. so that when the user enter duplicate SpecimenNo.it says "Specimen No. already exist". How can i do this? **CODE1** If SpecimenNoTextBox.Text = "" Then MsgBox("Enter") Else Dim cmd As New OleDbCommand Dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\data\Histopathology New.accdb") con.Open() Dim cmdlogin As New OleDbCommand(("SELECT SpecimenNo FROM HPReport"), con) Dim dalogin As New OleDbDataAdapter Dim dslogin As New DataSet …

Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 'TextBox1.Text = Token() If Button1.Enabled = True Then Label1.Text = Label1.Text + " A1 " If Button1.BackColor = Color.Yellow Then Button1.BackColor = Color.Red Else Button1.BackColor = Color.Yellow End If Else Label2.Text = "" Label2.Text = True End If Button1.BackColor = Color.Yellow End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click If Button2.Enabled = True Then Label1.Text = Label1.Text + " b1 " If Button1.BackColor = Color.Yellow Then Button1.BackColor = Color.Red Else Button1.BackColor = Color.Yellow End If Else Label2.Text = "" Label2.Text = True End …

how to select an item in the combobox and then put item quantity in the textbox. and how to price the combobox items. Really need help .. Next week is my system defense.. Thank you

I am currently creating a product lookup system for a project of mine, however from reading around it has come to my attention that an OLEDB connection will not handle the SQL query below as it will not handle more than a simple "SELECT, FROM". Table: tbl_ProductInformation Field: Product_Name CurrentEntry = Variable storing the users entry [CODE] "SELECT Product_Name FROM tbl_ProductInformation WHERE Product_Name LIKE '*" & CurrentEntry & "*'" [/CODE] The outcome of this query is then put into a listbox. Is there anyway to make the OLEDB SQL query work so that the returned entries will correctly narrow down …

Anybody who knows how to change word or character in kanji to katakana or vice-versa. I'm using 2 textbox to do this, the first textbox is for katakana and the second textbox is for kanji. What i wanted to do is, whatever i typed in the kanji textbox it will be converted to its corresponding katakana value in the first textbox or vice-versa. Is this possible in vb.net or do i need to use third party software / dll / activeX to be able to do this, anyone please give me a good idea how to deal with this problem. …

For this particular sub I type the customer id in a text box and then click the button, then I'm trying to get the relative information pertaining to that id. Not sure what I am doing wrong. Comes back with an error message of system.data.sqlclient.sqlexception Recursive common table expression '[customers]' does not contain a top-level UNION ALL operator. Private Sub FillByCustomerIDToolStripButton_Click(ByVal sender As Object, ByVal e As EventArgs) Handles FillByCustomerIDToolStripButton.Click Try Dim customerID As Integer = CInt(CustomerIDToolStripTxtBox.Text) ' LOAD THE CUSTOMERS TABLE WITH THE SELECTED CUSTOMER. Dim id = Me.CustomersTableAdapter.FillByCustomerID(Me.DatabaseDataSet.customers, customerID) If Me.DatabaseDataSet.customers.Count > 0 Then For Each row As …

Hey community, how can i show the connected USB-Device like keyboard, mouse, webcam and so on? Or how can i search in the connected USB-Devices, if I know the name or only a part of the name? I am looking for some examples since 2 days, but no one doesn´t work. So I hope you can help me with some code examples in vb.net. best regards joshi

Hi group, I'm attempting to populate a listview with data from my test database created via Visual Studio 2019. I'm getting a syntax error that says, "Incorrect syntax near the keyword 'FROM'." It's not clear to me what the error is. The code I've written is as follows: Dim strQ As String = String.Empty Dim datasource As String = "Data Source=(LocalDB)\MSSQLLocalDB;AttachDbFilename=C:\Users\Don\Documents\Visual Studio 2019\SalesForm\DWHRPT.mdf;Integrated Security=True" conn = New SqlConnection(datasource) Dim searchID As String = tbxCompanyName.Text strQ = "SEARCH CUST_ACCT_NO, CUST_COMPANY_NAME, CUST_FIRST_NAME, CUST_MIDDLE_INITIAL, CUST_LAST_NAME FROM CUSTREC WHERE CUST_COMPANY_NAME LIKE '" & searchID & "%'" cmd = New SqlCommand(strQ, conn) da = New …

Hi group, I've just installed Visual Studio 2019 and have started my first app using this. Within the program I created a database using the tools provided in Visual Studio. I now want to begin writing to the tables I've created. But I'm stumped on how to do this. Hopefully you can help. This database is installed on my laptop and is called DATAWHOUSE. Will I need some kind of connection string to write to the data table (and to read from it and/or make changes to it in the future)?

Hi this is my first time using this site, so please bare with me. I'm also pretty new at coding and got thrown into connecting to a database in one of my classes. But anywho, I keep receiving a syntax error and I was wondering if anyone could help me figure out why. Thank you! Imports System.Data Imports System.Data.SqlClient Public Class PatientForm1 Dim con As New SqlClient.SqlConnection("deleted for privacy") Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles lname.TextChanged End Sub Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load End Sub Private Sub Label14_Click(sender As Object, e As …

I want when click on the Name Listed on a Listbox from the database to fill Textboxes with Username and Password of particular user from SQL database. I am able to see Names stored on the database on the listbox but when i click on the name its unable to fill the Textboxes. Here is the code that fills the Listbox with data from database (NOTE: I am able to view a list of names on the Listbox with the code below) Public Sub ListBox() Try If con.State = ConnectionState.Open Then con.Close() End If con.Open() Dim cmd As SqlCommand cmd …

dear all i have a invoice table now in that datagrid table i have 4 columns itemcode itemdescription qty price now what i need is user come to itemcode and whenever he type itemcode, he should get a list of initial alphabetic itemnames like if i type A so itemcode must show all items codes related to A and when i get my required itemcode, after pressing enter it should fill the related field (item description,qty,price) please guide with codes thanks

Hi everyone! I'm making an application which requires users with different permissions/previleges to login and use the application.For example, if the user is "admin", all menu items in the menu bar are shown and enabled. If the user is say "user_group1", some of the menu items are to be hidden. The same for "user_group2", "user_group3", "user_group4" and so on. I could put a code for each specific user in each form but that's a great deal since users and their user groups may be added after application deployment. So it has to be something flexible. I want the user "Administrator" …

Hi guys, i'm having a difficulty to set the path in vb.net.i put the code in the module and every time i run the code it throws error "Could not find file 'C:\Users\Abdueie\Desktop\BMS\Bridge Asset Management\Bridge Asset Management\bin\Debug\Adigrat.accdb'." here's the code Public conn As OleDbConnection = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0; Data Source= .\\Adigrat.accdb;Persist Security Info=False")

Hello all, I was wondering if I could get some questions answered about how cupons work in the work place. I have an idea which involves creating a very flexible cupon service, but would require knowing the rudiments of how cupons work. The main question I have is how is tax calculated on a ware as it is sold under a cupon service. I believe that would be the only thing I would have to stringently mandate as far as the cupon goes, since the institution wishes to clear the merchendise from the floor. The service would involve some C# …

Hello, I want to have a manual IP-input-box like windows.  I tried by MaskedTextBox but the problem is, the 3 pionts are sliding when i insert some numbers and i can insert letters and numbers higher then 255 (higher is not allowed in IP´s). I hope anyone helps me, maybe with some codesnips!?! :) best regards josh

Hello, i got a table in Excel (or exported to CSV). There are 3 columns (1. column = specification / 2. columns = value1 / 3. column = value2). On my vb.net form i got a textbox, 2 labels and a button. If i write in in the textbox "5" it should search in the Excel or CSV-File in columns A (specification" the "5" and then it should show the both values in this row in label1 and label2. I tried much things but i can only read and show the complete row in only one label and only from …

Hi, I Have below table I want all rows with all coloumn from below table where ActCode is 1162828 and sum of DocAmount for DocNo. i.e where the docNo is repeated i want only one row with sum of amount of all repeated rows. ** "Select *, Sum (DocAmount) from TblPurLedTranData whre TblPurLedtranData.ActCode='" & 1162828 & "' Groupby DocNo " ** PosDate DocDate DocNo DocAmount DueDate Status Period DocType FinYear Chan ActCode 10/10/2018 12/10/2018 369896     36980      11/11/2018 INV      5         PUST       2018       PUST       1243684    10/10/2018 12/12/2018 665        36000      11/01/2019 INV …

[B][COLOR="Green"]Hi Guys :).. I hope you fine :), I need the best and easist way for printing the form ,nested of PrintForm tool coz it is very bad :angry:,it prints the form [U][COLOR="Red"]like screen shot :angry:[/COLOR][/U] ,what I want print entire form on A4 ... Any suggestions ? :( Thanks for your help :)[/COLOR][/B]

Hello all, I am relatively new to Visual Basic and have managed to muttle my way through creating a 2013 Word document that has some ActiveX controls. The final control I put in place is a Command Button that, when clicked, it sends the form off to an email. That is all working great, however, I would like to have a pop-up message that displays after the button is clicked, letting the form sender know the form has actually been sent. I have put the code I used for this Command Button below. Any help would be much appreciated. Private …

I am traying to filter Datagrid view based on user type in TbxGlCode (TextBox) Initialy Datatable is populated from SQL table to TempTable (DataTable) getting error at **runtime** at below line Dim Rows As DataRow() = TempTable.[Select]("Code like '%" & VerCode & "%'") Exception Unhandled **System.Data.EvaluateException: 'Cannot perform 'Like' operation on System.Int32 and System.String** How to filter datatable with** Like ** option *My Code* Dim TempTable As DataTable Private Sub FrmGLCodeList_Load(sender As Object, e As EventArgs) Handles MyBase.Load ' Dim TempTable As DataTable 'Create New Table Instance TempTable = New DataTable TempTable.Columns.Add("Code", GetType(Integer)) TempTable.Columns.Add("Name", GetType(String)) 'Adding Rows to TempTable from …

hi, i am trying to read from a text file and store the data in an array but i don't know how to get started with my code. can someone please get me started here. i have start with the code for locating the file, but i am having difficulty reading the file. Dim strFileName As String OpenAnswerFile.ShowDialog() strFileName = OpenAnswerFile.FileName MessageBox.Show(strFileName) 'message box showing the file path

Im Stuck With Something, Iv Been Searching, And Searching And I Canot Find Any Information On How To Make SQL Database Show The Samething For Everyone, When Updated Of Coarse... I Can Make The DataTable And Put It On A Form But I Cannot Make It To Where I Add Something And It Update For People That Have Different computers... Please Help!!!!

Below is my code for adding parameters in my vb .net code for prepared statements of npgsql. Dim xConn As NpgsqlConnection = ConnectDB() Dim xCmd As NpgsqlCommand = xConn.CreateCommand() xCmd.CommandText = "UPDATE " & xTable & " SET previous_tot_adj = @prev_adj ,tot_adj = @tot_adj WHERE version = " & _version & " AND monthly_mq_id = @Index" For Each Index In _Results.Keys If Not IsNothing(_Results.Item(Index)) Then xCmd.Parameters.AddWithValue("prev_adj", NpgsqlTypes.NpgsqlDbType.Double, _Results.Item(Index)) xCmd.Parameters.AddWithValue("tot_adj", NpgsqlTypes.NpgsqlDbType.Double, _Results.Item(Index)) xCmd.Parameters.AddWithValue("Index", NpgsqlTypes.NpgsqlDbType.Bigint, Index) End If Next xCmd.Prepare() xCmd.ExecuteNonQuery() After executing this code i get this kind of error . > A first chance exception of type 'Npgsql.NpgsqlException' occurred in …

how can i limit a user to enter 10 digit no like telephone no in textbox without using regular expressions?????

Hi! My name is Jung and I'm new to VBNET I have already tried many ways to write codes for "btnSearch" but seems like nothing works.. I really need help for this as the deadline is around the corner :'( Below are my codes for Search button.. 

hello sir how can I get my system short date format in a label in vb. net. I try this code : Label1.Text = System.Globalization.CultureInfo.CurrentUICulture.DateTimeFormat.ShortDatePattern() but show wrong data. all time show "M/d/yyyy" format. I change it(to "dd/MM/yyyy") manually and by coding result is same("M/d/yyyy") please help me..... For Change the Format: Microsoft.Win32.Registry.SetValue("HKEY_CURRENT_USER\Control Panel\International", "sShortDate", "dd/MM/yyyy")