Search results for query: *

  1. Poppa Mintin

    I have a problem with 'Resources'.

    Hi, after using this form of declaration for many years... Private fred_1 As Image = My.Resources.ResourceManager.GetObject("Fred") Today I get an error message; - I find it odd that the above code was copied and pasted from a test project, which I've just finished working on, and which works...
  2. Poppa Mintin

    File.GIF not running in PictureBox.

    Hi, I'm trying to run a .gif file while playing a tune. Imports System.IO Private Sub ShowPict(ByVal pic As String) PictureBox1.Image = My.Resources.ResourceManager.GetObject(pic) End Sub Private Sub NoPict() PictureBox1.Image = Nothing End Sub Private...
  3. Poppa Mintin

    selecting controls in designer

    John, is there a way to select a whole bunch of the same control in order to change a parameter for each, without having to select each one individually ? I know I can see the list in the properties dialogue, but I can't find a way to select more than one item at a time. In the quoted incidence...
  4. Poppa Mintin

    Trying to disguise mouse entry highlighting

    Hi, I'm using buttons as a textbox or label so that I can set the TextAlign to middle centre, something I can't do with other controls. Sadly though, it's a bit distracting when the button highlights as the cursor passes over it, especially for a user who has no reason to believe the button is...
  5. Poppa Mintin

    One form, several different programs ?

    Hi, How should I go about writing (say) two different codes for the same one Form ? I guess I could just make two identical forms and write a code for each, then pick which one to use, but there's bound to be a better way. Poppa.
  6. Poppa Mintin

    I have a problem with backcolor.

    Hi, Here is code for generating a number of buttons on myForm1. Private Sub Buts() Dim num As Int32 = 0 Dim fnt As New System.Drawing.Font("Comic Sans MS", CInt(gap * 0.38)) For i = 1 To col For j = 1 To row num += 1 Dim...
  7. Poppa Mintin

    What does "$W0 was Nothing." mean ?

    Hi, I'm trying to add some buttons to my Form1: Private Sub Buts() Dim m As Int32 = box \ 6 Dim num As Int32 = 0 Dim naim As String Dim fnt As New System.Drawing.Font("Comic Sans MS", box \ 4) For i = 1 To col For j = 1 To row...
  8. Poppa Mintin

    Why don't all my ellipses show ?

    Hi, I'm trying to draw 36 dots on my windows form 1. For the purpose of this question I've increased the size of the dots to be much larger circular ellipses. Here is Form1. Clicking 'Dots' ought to draw 36 'dots' on the form in 6 rows of 6 columns, to form the corners of 25 boxes in a 5 x...
  9. Poppa Mintin

    How do I get the RectangleF of a control ?

    Hi, I have a Windows form with 24 PictureBoxes. If the user clicks any one of these I would like to detect when the cursor exits that box. Now of course I could make 24 subroutines, one for each picturebox, but that seems a little inelegant. So... I'm trying to find how to get the size and...
  10. Poppa Mintin

    Trying to find my WAN IPaddress

    Hi, I'm trying to find my WAN IP address. I think my code finds four results, the last of which I know in my LAN address. The first three are reputed to be addresses in Hex. format but when I (think I) convert these to decimal, they don't resemble any IP address. Imports System.IO Imports...
  11. Poppa Mintin

    Fora.

    In which forum ought I to ask a question which doesn't seem to fit any of the listed fora ? Poppa.
  12. Poppa Mintin

    Why does my Label not update ?

    Hi, This is the first relevant Public Sub on Form1: Public Sub Client_Accept(ByVal state As Object) Try palPC.EndConnect(C_Token) C_Token = Nothing Catch ex As Exception 'MsgBox("Client_Accept :" & vbCrLf & ex.ToString) End Try...
Back
Top