Recent content by waynespangler

  1. waynespangler

    ComboBox question...

    In the properties window under DropDownStyle select DropDownList.
  2. waynespangler

    Multiple filetypes : For Each File As String in Directory.GetFiles

    As I understand it you can't use but one pattern at a time. I have tried several ways but none of them work. Here is what I use: Dim DirInfo As New DirectoryInfo("d:\graphics") Dim files() As FileInfo = DirInfo.GetFiles("*.gif") For Each File As FileInfo In files...
  3. waynespangler

    textbox & form

    1. Try putting it in a messagebox to make sure there is something there. Messagebox.Show(Trim$(rsIncidents.Fields("Notes1").Value & "")) 2. You might have to add ToString to Value PrintSingleRecord.Wrapsource2.Text = Trim$(rsIncidents.Fields("Notes1").Value.ToString & "")
  4. waynespangler

    Save an Image...

    just add what's in red: Imports System.IO Public Class frmMain Dim NewName As String Dim NewPath As String = "c:\test" Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click With OpenFileDialog1 If .ShowDialog...
  5. waynespangler

    Save an Image...

    Try this: Imports System.IO Public Class frmMain Dim NewName As String Dim NewPath As String = "c:\test" Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click With OpenFileDialog1 If .ShowDialog =...
  6. waynespangler

    to use Button in top right corner of the form?

    Put your button in the upper right hand corner, size it the way you want and then set the anchor properties to Top and Right.
  7. waynespangler

    Check Digit Help pls

    For every problem there are a 100 solutions. Here is mine. Public Class Form1 Dim str As String = "ABCD123456-3" Dim ary(9) As Integer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim tot As Integer = 0 Dim...
  8. waynespangler

    hide public members of class

    Private Function a()
  9. waynespangler

    How to create GLASS effects?

    http://www.codeproject.com/useritems/Enhanced_GlassButton.asp http://www.codeproject.com/cs/miscctrl/glassbutton.asp
  10. waynespangler

    Drawing text using the GraphicsPath

    Are you enlarging the image or redrawing it at the larger size? Images do not expand well and keep defination.
  11. waynespangler

    Multiply effect

    It was explained quite good here: http://paintdotnet.forumer.com/viewtopic.php?f=6&p=96398 and here http://pdnfans.freeforums.org/viewtopic.php?t=79
  12. waynespangler

    How can i Transparent Image in Picture Box

    Use color matrix and image attribute. http://www.codeproject.com/useritems/Alphablend__using_matrix.asp
  13. waynespangler

    Out of memory

    The problem is here: For Each file In filelist If Microsoft.VisualBasic.LCase(Microsoft.VisualBasic.Left(file.Name, 7)) = "picture" Then count = count + 1 found = True End If Next When you leave the for loop then your...
  14. waynespangler

    Fixing ellipses drawn with GDI+ in user control

    I only found one problem with your code that you have shown. You did not show how you plotted your ellipses. I did not want to create a control so I just used a form. The enclosed code shows what I did and it worked. On your "Private Ellipse5Brush As New SolidBrush(Color.FromArgb(0, 255, 255...
  15. waynespangler

    beginner question control button

    If CheckBox1.Checked = True Then MsgBox("on") Else MsgBox("off") End If
Top Bottom