vb.net-2010

I need code to read an image from a file and convert the image into an array of integers. The format of image is BMP and I'm using vb.net-2010 You can find a similar question and valuable answers (although the question and answers are for c# i think they will help you to understand the solution) at : How can I read image pixels' values as RGB into 2d array? First you need to load the file to a System.Drawing.Bitmap object. Then you can read pixel values using GetPixel method. Note that every pixel data includes a Color value. You can convert this value to an integer value using ToArgb() method

I'm somewhat new to programming and I am having trouble just making this work. I'm supposed to run this code using a delegate but I've run into error after error. I'm using Vb.net. Could anyone help me solve the issues in this code? Public Delegate Function D() Dim Str As String = Console.ReadLine() Sub Main() Dim D1 As D D1 = New D(AddressOf Fn1) End Sub Function Fn1() System.Console.WriteLine("Please enter the string") Dim revstr As String = StrReverse(Str) Console.WriteLine("Reverse:") Console.WriteLine(revstr) Console.WriteLine("Amount of characters in the string:") Dim Count As Integer =

I'm trying to populate a listview with varBinary(max) values. Well, I actually need to write each varBinary into a csv file and the table consists of 100 000 odd rows. I just don't know how to retrieve the datatype! Sub getInformation() Try If Not String.IsNullOrWhiteSpace(connString) Then Using cn As SqlConnection = New SqlConnection(connString) cn.Open() Using cmd As SqlCommand = New SqlCommand() cmd.Connection = cn Dim qry As String qry = String.Format("SELECT [varBinaryField] FROM [dbX].[dbo].[tableX]") cmd.CommandText = qry cmd.CommandTimeout = 0 Using myReader As SqlDataReader = cmd

Getting error on cmd.ExecuteNonQuery() My Current Code Using con As New SqlConnection(sConString) Using cmd As New SqlCommand( "INSERT INTO MC_Entry VALUES(" & "@0,@1, @2, @3, @4, @5,@6,@7,@8,@9,@10,@11,@12,@13,@14,@15,@16,@17," & "@18, @19, @20, @21, @22,@23,@24,@25,@26,@27,@28,@29,@30,@31,@32,@33,@34," & "@35, @36, @37, @38, @39,@40,@50,@51,@52,@53,@54)", con) For MyIncremental = 0 To 54 cmd.Parameters.AddWithValue("@" & MyIncremental, vValues(MyIncremental)) Next MyIncremental 'Debug.Print(UBound(vValues)) 'Debug.Print(LBound(vValues)) 'Debug.Print(Join(vValues, vbTab)) con.Open() cmd

Trying to write information in Excel worksheet But have some strange problems ;) i looked info on Google but no result.. So plz help ) I Add reference Microsoft.excel 14.0 Object Library and also Import Microsoft.Office.interop I need to get Value from specific cell so i use command Checker = shXL.cells(1,1). And here i don't have Value.... i only got this (Equal / GetHashCode / GetType / toString) So question is WHY i don't have (.Value) for .cells and where is an Error Dim appXL As Excel.Application Dim wbXL As Excel.Workbook Dim wbsXL As Excel.Workbooks Dim shXL As Excel.Worksheet Dim

I have a problem in query data from database to make report in VB.NET. I use the Business Object to do the report. And here is my example data: ___________________________________________________________________________ | | | | | | | | Id | Item | Unit | Unit Price | Quantity | Amount | |____|_______________|__________|_____________|___________|_______________| | 1 | Gasoline | L | $ 2.00 | 10 | $ 20.00 | | 1 | Gasoline | L | $ 2.50 | 20 | $ 50.00 | | 2 | Water | Bottle | $ 5.00 | 10 | $ 50.00 | | 3 | Meat | Kg | $ 14.90 | 15 | $ 223.50 | | 1 | Gasoline | L | $ 8.00 | 50 | $ 400.00 | | 4 |