Search Results - VBForums

Search:

Type: Posts; User: 4x2y

Page 1 of 13 1 2 3 4

Search: Search took 0.04 seconds.

  1. Replies
    12
    Views
    342

    Re: SendKeys on Facebook

    ChrW accept codes range 0~65535 (0~&HFFFF)

    Windows charmap.exe also accepts entering only 4 digits hex, so I don't know how to send these big code
  2. VS 2013 Re: [RESOLVED] Where is VB.NET's start bar shortcut EXE stored?

    The exe itself located here

    C:\Program Files (x86)\Microsoft Visual Studio 14.0\Common7\IDE\devenv.exe

    Replace 14.0 with your version
  3. Replies
    12
    Views
    342

    Re: SendKeys on Facebook

    Wait param is boolean not period, so setting it to 50 hasn't any meaning.

    Add Text box to your form, type the emoji code and use the following code to send it


    SendKeys ChrW(Val("&H" &...
  4. Replies
    12
    Views
    342

    Re: SendKeys on Facebook

    It is not difficult, SendKeys send stroke to the active window, so first activate Facebook field you want to write in then minimize your program window then sendKeys

    Private Sub Command1_Click()
    ...
  5. Re: Return only the last three characters after a specified phrase in a string

    Dim code As String = inputstr.Substring(inputstr.LastIndexOf("(Code: ") + 7, 3)

    7 is the length of "(Code: " and 3 is number of the wanted digits
  6. Replies
    12
    Views
    261

    VS 2013 Re: Label Backcolor Transparent

    The following code should work at run time


    Label1.FlatStyle = FlatStyle.Standard
    Label1.BackColor = Color.Transparent
  7. Replies
    12
    Views
    261

    VS 2013 Re: Label Backcolor Transparent

    You cannot set Label1.BackColor = Color.Transparent when the property FlatStyle is set to FlatStyle.System
  8. Thread: Lost Everything

    by 4x2y
    Replies
    8
    Views
    235

    VS 2013 Re: Lost Everything

    Deleted...

    Misunderstood the problem!!
  9. Re: Auto Scrolling ListView - There must be a better way

    You have to set MultiSelect to False or unselect previous highlighted e.g.


    For j = 1 To ListView1.ListItems.Count
    ListView1.ListItems(j).Selected = False
    Next
    ListView1.ListItems...
  10. Re: Auto Scrolling ListView - There must be a better way

    Try

    If Y > Y Then
    ListView1.ListItems(ListView1.HitTest(X, Y).index + 1).EnsureVisible
    ListView1.ListItems(ListView1.HitTest(X, Y).index + 1).Selected = True
    ElseIf Y < PrevY Then
    ...
  11. Thread: Splitting String

    by 4x2y
    Replies
    4
    Views
    264

    Re: Splitting String

    Try using Substring method


    StrNCV = SplitCV.ToString

    For i = 0 To StrNCV.Length - 1
    Output = Output + CInt(StrNCV.Substring(i, 1))
    Next i

    ...
  12. Replies
    6
    Views
    242

    Re: [RESOLVED] toolbar right to left

    You are welcome :)
  13. Re: Using Functions and Subs fro many forms

    Sorry, i don't understand! what is the problem of calling function/sub from another function/sub?
  14. Replies
    7
    Views
    391

    Re: latest vbrun files?

    It gets it from your system folder (C:\Windows\System32\), so if the latest runtime files installed on your machine, the wizard will include them in the package.
  15. Replies
    6
    Views
    242

    Re: toolbar right to left

    There is no property do that, but it is possible to emulate the behavior by inserting a button of type Placeholder at the beginning and using the following code


    Private Sub Form_Load()
    '...
  16. Replies
    2
    Views
    159

    Re: MSCOMCT2.OCX missing from Wins 7

    You can download from many sites like http://www.ocxdump.com/download-ocx-files_new.php/ocxfiles/M/MSCOMCT2.OCX/6.00.88046/download.html then use regsvr32.exe to register it on your system
  17. Re: Problems with custom TextBox control and its dynamic creation

    To solve KeyPress issue, set the form's KeyPreview property to True

    To solve Font issue, set the font like this

    Private Sub Form_Load()
    Set ctlDynamic = Controls.Add("Project1.UniTextBox",...
  18. VS 2015 Re: ListView DragDrop that accepts 2 drops from same type

    Mark this thread [RESOLVED] from Thread Tools menu, then rep+ :)
  19. VS 2015 Re: ListView DragDrop that accepts 2 drops from same type

    ListViewItem object has ListView property, it is refer to the ListView contains it, so you can use something like this



    Dim itemDrag As ListViewItem =...
  20. Replies
    5
    Views
    332

    Re: Delete image from Clipboard

    AFAIK clipboard cannot contains different format at the same time, so if Clipboard.ContainsImage returns True then the Clipboard definitely doesn't contain Text or any other format.
  21. Replies
    5
    Views
    332

    Re: Delete image from Clipboard

    Try this

    If Clipboard.ContainsImage Then
    Clipboard.Clear()
    End If


    There are some functions for other formats, e.g. Clipboard.ContainsAudio,...
  22. Replies
    13
    Views
    551

    Re: How to select subitems in a listview?

    No, you can only select all columns by setting the property FullRowSelect = True
  23. Re: Can someone help me convert this into a module?

    I have enhanced the code to auto show/hide the scroll bars as required.
  24. Re: Can someone help me convert this into a module?

    @Monster4869

    Try the attached project, it is contain a class named ScrollPicture which can be used with any form, just declare it and set its property PictureBox like this

    Private...
  25. Replies
    3
    Views
    250

    Re: get domain from stril

    You can use alternate version

    Private Function GetRootDomainName2(url As String) As String Dim p As Long p = InStrRev(url, ".") GetRootDomainName2 = Left$(url, p - 1)) End Function

    But you need...
  26. Replies
    3
    Views
    250

    Re: get domain from stril

    Try this function


    Private Function GetRootDomainName(url As String) As String
    Dim p As Long
    p = InStrRev(url, ".")
    GetRootDomainName = "www" & Mid$(url, InStrRev(url, ".", p - 1))...
  27. Thread: Copy Subfolder

    by 4x2y
    Replies
    3
    Views
    245

    VS 2010 Re: Copy Subfolder

    You must calculate the files count in the source folder and its sub-folders then assign the value to ProgressBar1.Maximum property.


    Private Sub Button1_Click(ByVal sender As System.Object,...
  28. Thread: Copy Subfolder

    by 4x2y
    Replies
    3
    Views
    245

    VS 2010 Re: Copy Subfolder

    See this
  29. Replies
    3
    Views
    284

    Re: How to make numbers to show on the textbox

    I said "1- Define a module level variable", module level variable is declared directly under the class declaration, so add Private mblnFirstNumber As Boolean = True under Public Class Calculator
    ...
  30. Replies
    3
    Views
    284

    Re: How to make numbers to show on the textbox

    You must define a Boolean flag to know where the number should go, like

    1- Define a module level variable e.g. Private mblnFirstNumber As Boolean = True
    2- On each digit button click event, check...
  31. Re: Open a Word Document on the file list box with a command button [VB6]

    Replace this line

    objname = "*.docx"

    With

    objname = File1.List(File1.ListIndex)
  32. Replies
    4
    Views
    279

    VS 2012 Re: C# to visual basic translation

    From where that Key element come from? Which C# translator you are using?

    Try the Free Edition of C# to VB.NET converter, it is always give accurate results.
  33. Replies
    2
    Views
    182

    Re: increment form size??

    Try something like the following under MDI Form Resize event

    Private Sub MDIForm_Resize()
    On Error Resume Next
    Dim frm As Form
    Set frm = Me.ActiveForm

    frm.Height =...
  34. Replies
    1
    Views
    246

    Re: Compare Textbox values

    Convert string to numeric, Val function is not supported in VBScript, so you can use CInt or CDbl function


    Dim NTGvar, NTPvar

    NTGvar = CDbl(textbox1)
    NTPvar = CDbl(textbox2)

    If NTGvar >...
  35. Replies
    4
    Views
    907

    Re: Simple 3-Way Splitter

    Yes, i have read this comment
    ' Function to keep Vertical Scrollbar at bottom of Textbox but i don't understand its meaning, that is, How Vertical Scrollbar can be at bottom of Textbox?


    Sorry...
  36. Replies
    4
    Views
    907

    Re: Simple 3-Way Splitter

    Nice, but i don't understand the need of this line SendMessage Text1.hwnd, EM_SCROLL, SB_BOTTOM, 0
  37. Re: What antivirus software do you use? I have buggy Avira 2015, but uninstalling it.

    I'm using BitDefender for many years, it is work great for me.
  38. Replies
    3
    Views
    221

    Re: Append string with multiple if statements.

    Or

    Dim UserNotes As New Text.StringBuilder
    UserNotes.Append(If(ExtAlpha.Checked, "Alpha", String.Empty))
    UserNotes.Append(If(ExtData.Checked, "Data", String.Empty))
    ...
  39. Replies
    8
    Views
    318

    Re: confused in file paths

    What you get and what is should be?

    What about replacing

    File_To_Upload_Path.Caption = App.Path & "\Incoming_Files\" & File2.Filename
    with

    File_To_Upload_Path.Caption = File2.Path & "\" &...
  40. VS 2015 Re: How do i disable this when i pause my program while debugging(screen pic attached

    I use this extension and it is working great.
Results 1 to 40 of 500
Page 1 of 13 1 2 3 4



Featured


Click Here to Expand Forum to Full Width

Survey posted by VBForums.