|
I misunderstood you.
can you provide more details please?
Shimi
|
|
|
|
|
Hello Shimi
When ever we create a datagridview we always have a column header and a row header.
I wanted to have serial number in the row header when ever I add a new row both programmatically and by the user
Also can you pls tell me how to define the column format, that is, I want a column to be a floating point numbers only and a currency column
Regards
Nishkarsh
|
|
|
|
|
Public Class Form1<br />
Inherits System.Windows.Forms.Form<br />
<br />
Dim fName$<br />
Dim lName$<br />
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btAddRow.Click<br />
Static counter As Integer = 0<br />
If counter = 0 Then<br />
fName = "Nish"<br />
lName = "karsh"<br />
counter += 1<br />
ElseIf counter < 10 Then<br />
fName &= "a"<br />
lName &= "a"<br />
counter += 1<br />
Else<br />
counter = 0<br />
End If<br />
Dim o As Object() = {fName, lName}<br />
DataGridView1.Rows.Add(o)<br />
Static row As Integer = 0<br />
DataGridView1.Rows(row).HeaderCell.Value = o(0).ToString<br />
row += 1<br />
End Sub<br />
<br />
<br />
<br />
<br />
<br />
'Form overrides dispose to clean up the component list.<br />
<System.Diagnostics.DebuggerNonUserCode()> _<br />
Protected Overrides Sub Dispose(ByVal disposing As Boolean)<br />
Try<br />
If disposing AndAlso components IsNot Nothing Then<br />
components.Dispose()<br />
End If<br />
Finally<br />
MyBase.Dispose(disposing)<br />
End Try<br />
End Sub<br />
<br />
'Required by the Windows Form Designer<br />
Private components As System.ComponentModel.IContainer<br />
<br />
'NOTE: The following procedure is required by the Windows Form Designer<br />
'It can be modified using the Windows Form Designer. <br />
'Do not modify it using the code editor.<br />
<System.Diagnostics.DebuggerStepThrough()> _<br />
Private Sub InitializeComponent()<br />
Me.DataGridView1 = New System.Windows.Forms.DataGridView<br />
Me.Column1 = New System.Windows.Forms.DataGridViewTextBoxColumn<br />
Me.Column2 = New System.Windows.Forms.DataGridViewTextBoxColumn<br />
Me.btAddRow = New System.Windows.Forms.Button<br />
CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit()<br />
Me.SuspendLayout()<br />
'<br />
'DataGridView1<br />
'<br />
Me.DataGridView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize<br />
Me.DataGridView1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.Column1, Me.Column2})<br />
Me.DataGridView1.Location = New System.Drawing.Point(27, 28)<br />
Me.DataGridView1.Name = "DataGridView1"<br />
Me.DataGridView1.Size = New System.Drawing.Size(279, 150)<br />
Me.DataGridView1.TabIndex = 0<br />
'<br />
'Column1<br />
'<br />
Me.Column1.HeaderText = "Column1"<br />
Me.Column1.Name = "Column1"<br />
'<br />
'Column2<br />
'<br />
Me.Column2.HeaderText = "Column2"<br />
Me.Column2.Name = "Column2"<br />
'<br />
'btAddRow<br />
'<br />
Me.btAddRow.Location = New System.Drawing.Point(130, 207)<br />
Me.btAddRow.Name = "btAddRow"<br />
Me.btAddRow.Size = New System.Drawing.Size(75, 23)<br />
Me.btAddRow.TabIndex = 1<br />
Me.btAddRow.Text = "Button1"<br />
Me.btAddRow.UseVisualStyleBackColor = True<br />
'<br />
'Form1<br />
'<br />
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)<br />
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font<br />
Me.ClientSize = New System.Drawing.Size(339, 264)<br />
Me.Controls.Add(Me.btAddRow)<br />
Me.Controls.Add(Me.DataGridView1)<br />
Me.Name = "Form1"<br />
Me.Text = "Form1"<br />
CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).EndInit()<br />
Me.ResumeLayout(False)<br />
<br />
End Sub<br />
Friend WithEvents DataGridView1 As System.Windows.Forms.DataGridView<br />
Friend WithEvents Column1 As System.Windows.Forms.DataGridViewTextBoxColumn<br />
Friend WithEvents Column2 As System.Windows.Forms.DataGridViewTextBoxColumn<br />
Friend WithEvents btAddRow As System.Windows.Forms.Button<br />
<br />
End Class<br />
<br />
br mode="hold" /><br />
:wtf: :wtf: :wtf: :omg: :rolleyes: :-O :-\ :zzz: :((
Shimi
|
|
|
|
|
hii ,
I am using Font class as property and showing in the propertygrid .
Now i want to show only the font dialog line in the propertygrid .
The remaining things below the
Font ------->FontDialog -- TO Show
--> Name These all below Font things i want2 hide r Enabled=false
--> Size
--> Unit
--> Bold
--> GdiCharSet
--> Italic
--> Strikeout
--> Underline i want to make enabled = False or Visible= False
How to do these things??
Thanks
Dvs
|
|
|
|
|
You would need to create your own class derived from Font and use that. The property grid looks for any public property on the class and exposes it through the grid. You might be able to do this using a custom type editor, but I'm not sure you can override the one that is already associated with the Font class itself.
Scott.
—In just two days, tomorrow will be yesterday.
—Hey, hey, hey. Don't be mean. We don't have to be mean because, remember, no matter where you go, there you are. - Buckaroo Banzai
[ Forum Guidelines] [ Articles] [ Blog]
|
|
|
|
|
Hi Thanks ,
I saw form properties there ,
For Icon property they are enabled =false below that property . Like that i want to do for my Location .Point & Font .
Is there any way .
Thanks
Dvs
|
|
|
|
|
Hello every one
I am having a VB.net 2005 Express Application
Is there a way to find all unused functions in the solution…
Also if there is a event handler function on a object and the object is no more existing
I am using Microsoft Interface and Sharp developer at time
Regards
Nishkarsh
|
|
|
|
|
Try looking at FxCop[^] or NDepend[^].
Scott.
—In just two days, tomorrow will be yesterday.
—Hey, hey, hey. Don't be mean. We don't have to be mean because, remember, no matter where you go, there you are. - Buckaroo Banzai
[ Forum Guidelines] [ Articles] [ Blog]
|
|
|
|
|
Hii ,
1) My base form is a Panel .On panel i have to create Line , Rectanlge , Oval at runtime and i have to drag those things at any place .
2) I used Vb.powerpacks DLL .It worked to my expectations . But when i click on that shape type it is showing the blue lines around the shape control which i dont want .(At this place i have to use my control selection with small squares or round rectangles to resize and drag that control .Here i used
http://www.codeproject.com/script/common/ErrorInternal.aspx?aspxerrorpath=/KB/miscctrl/CSPickBoxSample1.aspx[^]
It drag & drop any control except shape controls .So i used instead of control (Rectangleshape ) then i am able to drag &resize.
But while dragging some black lines are showing and placing there for some time (For looking it is not good ,Occuring only for shape control )
3) Which is good for shapes creation Picturebox or Panel as base ??????
4) How to do these things while using Drawing namespace .without Powerpacks and i want to drag and resize to any place with selection which is used for everycontrol like VS2005 form design ???
Dvs
|
|
|
|
|
dvsriram wrote: 3) Which is good for shapes creation Picturebox or Panel as base ??????
Panel. PictureBox is used for showing Image files, as you've been told before.
dvsriram wrote: 4) How to do these things while using Drawing namespace .without Powerpacks and i want to drag and resize to any place with selection which is used for everycontrol like VS2005 form design ???
You have to implement a "Retained Mode" graphics system. This is something, that believe it or not, doesn't exist as "standard" in Windows or GDI+, and hence, the .NET Framework. Though it does exist if you use Windows Presentation Foundation (WPF). But, to use this, you have to forget everything you've already learned about painting and using controls and start from scratch. I highly recommend picking up a book on it of you want to use it at all.
You can find an example of implementing a system yourself without using WPF here[^].
There are also third party control libraries that implement this too...
|
|
|
|
|
hai all,
I am using Outlook Express in vb.net. by importing .dll files.
I have doubt that it will work in linux and mac os???
Can you give me the idea?????
Thanks in advance
Senthil.S
Senthil S
Software Engineer
|
|
|
|
|
Since Outlook Express DLL's don't exist on Linux and Mac, yeah, it's not going to work.
Why are you stuck with using "Outlook Express"??
|
|
|
|
|
Senthil S wrote: have doubt that it will work in linux and mac os
The .dll will not work on Linux or Mac OS.
Senthil S wrote: Can you give me the idea?
There's mono, but I don't think it will help any.
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
|
|
|
|
|
Hi,
I have a dataGrid with 4 columns. I want to set the EditMode to programmatically for the last three columns and for the first column I want to enable keyboard writing (editMode = EditOnKeystroke).
The idea is: the last three columns accept only one character(X), which is written on double clicking the cell. But the first column is the time column in which the user writes the time in format - hh:mm
Any ideas?
Thanks!
|
|
|
|
|
Hi all,
I am trying to come up with a way of securing controls inside of a VB.NET 2005 windows form application. I have searched online and found information, but they are all base on ASP.NET - which I think the usage, codes and all differ to quite some degree from VB.NET (Codeproject's article are also not useful enough, like http://www.codeproject.com/KB/vb/2gs_txtbx.aspx#add[^], which is not really what I want)
I have created database to store usernames and passwords. And, I have already did a login form which can verify the username and password submitted (if both values are correct, the user would be directed to another form).
1) How to set user groups, e.g admin and user. I would want to have two level of security. One that has limited access to certain forms (users) and another that has full access (admin).
2) And also if possible, I would like users to be able to access a form with controls such as DataGridView (using Dataset) but not be able to edit them.
Is there any good concepts out there (or codes in particular, is it a code thing or?) on how to manage this efficiently?
Any help would be greatly appreciated. Thanks!
telly
|
|
|
|
|
I'd like to populate a rich text box control with text from a number of records from an SQL database.
The text from each record will be protected and unable to be edited by the user. For ease of reference I'll refer to this as Protected Text.
However, the user can enter text after each section of Protected Text. This text is (in effect) appended to the record in the SQL database. I'll refer to this as User Text.
I then need to be able to parse the rich text box control, going to each segment of Protected Text, retrieving the record ID associated with the Protected Text then write User Text to the database using the record ID.
Does anyone have any idea how to do this?
I understand the Selection Protected property of the rich text box control. What I'm struggling with is
- how to embed the record ID in the rich text box at the appropriate point
- how to parse the rich text box retrieving the record ID and User Text.
Any assistance would be much appreciated.
Thanks in advance
|
|
|
|
|
I am a middle aged internet college student trying to get some assistance a Case problem for my course. I have ask for help from instructor, but due to the holidays he has not replied to any of my queries. My assignment is due no later midnight on the 28 of Dec 07. I am stuck like chuck...
Project Name: Random Number Game
Scope: Create an VB.Net app that allows the user to guess a random number generated by the computer. When the user makes an incorrect guess, the application should move an image up or down depending on how the guess compares to the random number. If the random number is greater that users guess the image shoould move upwards to indicate to the user to guess higher. Same with a lesser guess but the image moves lower indcate the user shoul guess lower. The game ends when the user guesss the random number. If the usershould opt to end the game early the random number should be displayed.
I have been able to create a text indicator version of this game without the early termination criteria. I have come to an impass. Snippet of code of functioning code below:
---------------------------------------
Option Strict On
Option Explicit On
Imports System.Globalization
Public Class mainForm
Private Sub startButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles startButton.Click
Dim randomGenerator As New Random
Dim inputString As String
Dim input As Integer
Dim random As Integer
Dim isConverted As Boolean
Const Prompt As String = "Enter guess"
Const Title As String = "Guess a number"
'Dim cancel As DialogResult = Windows.Forms.DialogResult.Cancel ' Case usage
'Dim ok As DialogResult = Windows.Forms.DialogResult.OK ' Case usage
'Dim choice As DialogResult
' primer read - not needed program work fine without it
'input = 0
'generate random number from 1 t0 10
random = randomGenerator.Next(1, 11)
' Begin Loop
Do
'input guess
inputString = InputBox(Prompt, Title, "0")
'Select Case choice
' Case Windows.Forms.DialogResult.Cancel
'If Windows.Forms.DialogResult.Cancel = cancel Then
'input = random
'MessageBox.Show("The number was " & random, "Answer", MessageBoxButtons.OK)
'End If
' Case Windows.Forms.DialogResult.OK
'If Windows.Forms.DialogResult.OK = ok Then
isConverted = Integer.TryParse(inputString, input)
If isConverted = True Then
'if input is integer then execute loop
If input > random Then
displayLabel.Text = "Guess lower"
ElseIf input < random Then
displayLabel.Text = "Guess Higher"
Else : input = random
displayLabel.Text = random & " is correct"
End If
Else
MessageBox.Show("Enter a number between 1 and 10")
End If
'End If
'End Select
'End Select
Loop Until input = random ' End Loop
'-----------------------------------------------------------
'display correct guess
'If input = random Then
'MessageBox.Show("You are correct") 'alternate method of correct guess display
'displayLabel.Text = random & " is correct"
'End If
End Sub
End Class
You will notice that I remarked out my all my Case structure, when I add them the program ceases to function properly. Any help would be appreciated, I have waited to the last minute because I thought I woulde get the help I needed from my instructor. Thanks in advance to any who care to respond. 
|
|
|
|
|
Are you asking about the case thing only or are you having other problems? Also we would be able to help you better if you gave us some of the error messages you are getting and what lines are coming up as bad.
One thing that I see is that you have 2 end selects commented out and I only see one select case statement. On top of that one would be nested inside the other which I doubt was your intent.
|
|
|
|
|
Thanks for the reply,
When I add the case statments the app gets stuck in the loop for some reason. There are no error messages. The program will not display the "guess higher" or "guess lower". In addition it will not perform its data validation. It just keeps displaying the inputBox. I thought maybe I coded the event arguement for the Cancel and OK incorretly, but I cant find anything in my book(Microsoft Visual Basic 2005: Reloaded, Second Edition).
I apoligize for th sloppy code. I have been hash at it for the last week. I even toyed with methods of input(listbox and combobox). The input box just facilitates input for a Loop. My frustration maybe getting the better of me.
The code works as is, but when I hit the cancel button from the input box I keep getting the data validation message, which prompted me to use the case statement.
|
|
|
|
|
I think I understand what is wrong here but please let me know if my guess about your intentions is incorrect.
It looks like you're drawing a false analogee between how c/c++ handles events and how vb handles events. There is no reason I can see that you would need a loop at all and it looks like you are trying to treat your subroutine as if it was main in c/c++. In c/c++ execution starts at main and events are handled one of 2 ways: either there is an infinate loop that is interrupted with an interrupt or you use some library function that stops execution. For instance scanf will stop and wait for you to make an input.
VB doesn't work that way. Nothing that I am aware of waits for inputs and there is no main. It looks like you are expecting your inputbox to work like a scanf. What will happen in vb is that the program will immediately read your inputbox then go immediately to the next line of code regardless. Everytime you do something vb looks for a subroutine that matches the event and if it finds one it call that sub and goes till it finishes execution. In general I think you are making your code way more complicated than it needs to be.
Lets get specific, you are getting an infinate loop it looks like because it looks like the assignment of random to input probably never executes because it is nested in a case that never executes. Therefore your loop always test something other than random. But to be honest I don't think you need a loop at all.
I might be misunderstanding your project cause I don't understand the logic of some of your code. But if I am understanding it correctly I would do it like below.
dim inputnum as integer, randomnum as integer<br />
<br />
'create a random number<br />
inputnum = textbox1.text<br />
if inputnum > randomnum then<br />
'move picture up<br />
elseif inputnum < randomnum then<br />
'move picture down<br />
else 'they're equal<br />
'game is done<br />
end if
ps if you have option strict on you may need to do some casting on this statement inputnum = textbox1.text but I'm not sure.
|
|
|
|
|
Mike, Thanks for the help. I thought I may have been over complicating things. I will try it out and see what happens. Thanks again.
DK
|
|
|
|
|
Mike, Thanks for getting me to simplify things. I have a solution that meets the criteria. Unfortunatly it does not use the principals outlined in the chapter I am working on (Decisions and Loops). I have posted my solution below:
Option Strict On
Option Explicit On
Public Class mainForm
' declare variable for form
Dim random As Integer
Private Sub mainForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'declare variable
Dim randomGenerator As New Random
'generate random number and direct focus to text box
random = randomGenerator.Next(1, 11)
inputTextBox.Text = "0"
inputTextBox.Focus()
End Sub
Private Sub startButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles startButton.Click
' decalre variables
Dim randomGenerator As New Random
Dim input As Integer
Dim isConverted As Boolean
'convert input and validate input
isConverted = Integer.TryParse(inputTextBox.Text, input)
If isConverted = True Then
'direct focus to text box
inputTextBox.Clear()
inputTextBox.Text = "0"
inputTextBox.Focus()
' Decision Tree
If input > random Then
pointPictureBox.SetBounds(82, 162, 100, 50)
displayLabel.Text = "Last Guess was " & input
input = 0
inputTextBox.Focus()
ElseIf input < random Then
pointPictureBox.SetBounds(82, 82, 100, 50)
displayLabel.Text = "Last Guess was " & input
input = 0
inputTextBox.Focus()
Else
pointPictureBox.SetBounds(82, 122, 100, 50)
displayLabel.Text = random & " is correct"
End If
Else
' if invalid iput then show
MessageBox.Show("Input Number from 1 to 10")
End If
End Sub
Private Sub exitButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles exitButton.Click
'Show Random and Close Application
MessageBox.Show("The number was " & random, "Answer", MessageBoxButtons.OK)
Me.Close()
End Sub
Private Sub newButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles newButton.Click
' Generate random number and direct focus to text box
Dim randomGenerator As New Random
random = randomGenerator.Next(1, 11)
inputTextBox.Focus()
End Sub
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
End Sub
End Class
|
|
|
|
|
Well I'm glad I was able to at least partially help you. I'm not sure what to tell you now though since I probably don't have your book I can't really help you to make it conform with the book.
good luck
Mike
|
|
|
|
|
Hi,
As the title says?
How?
I tried with
button.image = image.fromfile(image.ico)
...
doesn't work
thanks
|
|
|
|
|
try
add the icon files to the application resources then
button.image = my.resource.iconfilename
help everyone
Falling down is not defeat...defeat is when u refuse to get up...
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
