When I press F7, nothing happens. I got the Virtual Key Codes from here.
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If GetAsyncKeyState(76) Then
MsgBox("")
ElseIf GetAsyncKeyState(77) Then
[code]....
Private Declare Function GetAsyncKeyState Lib "user32" Alias "GetAsyncKeyState" (ByVal vKey As System.Windows.Forms.Keys) As Short
[Code]...
I'm currently using this
Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Short
Public Function GetKeyState(ByVal Key1 As Integer, Optional ByVal Key2 As Integer = -1, Optional ByVal Key3 As Integer = -1) As Boolean[code].......
But even when I do press control, the message box doesn't pop up.
When I use this
[code]...
But for some reason, it doesn't place the image into the picture box.If I use this, and replace it with the first box of code, then it works fine.
[code]...
So, why doesn't it work in my class?
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long I've used that API in both vb.net and vb6, but in vb.net doesnt work. Why?
View 7 RepliesI am trying to take a look at the cache of UT2004 through my application since the information holder contains some bugs sometimes and I know how to fix them.
vb.net
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim totalText As String =
[code].....
I'm trying to get the Score of Pinball:
<DllImport("kernel32.dll", SetLastError:=True)> _
Public Function ReadProcessMemory( _
ByVal hProcess As IntPtr, _
ByVal lpBaseAddress As IntPtr, _
<Out()> ByVal lpBuffer() As Byte, _
ByVal dwSize As Integer, _
[Code]...
i need to imports some namespaces but it give me error, why??namespaces are:
Imports Outlook = Microsoft.Office.Interop.Outlook Imports Excel = Microsoft.Office.Interop.Excel i put them before the public class of a form.
This is an mock up only ... but the principal applies to a larger project i am working on...
Basically if you do this:
vb
Dim tstform1 As New Form
Dim tstform2 As New Form
tstform1.Text = "1"
[Code]....
I did a test using AxShockwaveFlash1, and while I set the WMode to Transparent, and tested the form, the transparency didn't work! How am I supposed to make it transparent?
View 1 RepliesI am trying to change the background color of a tooltip
I am using tooltip.backgroundcolor = color.colr
No errors but thecolor doesn't change
I've been working with Regex and I've run into something that doesn't make sense to me; I either misunderstood how the Multiline option works, I'm not using it right, or it really just doesn't work like it's supposed to. This is a little test I made:
[Code]...
i try to resize the picturebox according to the image size.for example if the image width is more than 500 then change the sizemode to stretch and then resize the width to 500.i am using a timer for doing this but i think it's unnecessary and stupid. and also it doesn't work well.
View 3 Repliesi have a simple code that send an e-mail, when i try it running in debug mode it works fine, after compile, i run the exe but the same code doesn't work any more..
View 2 Repliesi have a table layout panel with a background image. in the table there is some panels with transparent back colours. the image shows up in vb designer but when i execute it, it is invisible.
View 6 RepliesEDIT I accidentaly found a walk around to this problem... Adding the following line in the begining of the function solved the problem for some reason.remoteIPAdress = remoteIPAdress & "END"
I have a school assignment where I am supposed to build a simple TCP/IP messenger in Visual Basic.The problem is that when the client sends his IP in a request I've built ("LetMeInXXX.XXX.XXX.XXX"), even if the server receives the request as it should, it parses it completely wrong..
[Code]...
I'm having trouble getting this sub to work on Windows 2003. It works on Windows XP and Windows 7. Windows 2003 has "wininet.dll".
change_proxy("123.115.112.222:3128")
*********************************
Public Sub change_proxy(ByRef proxy_port As String)
[Code].....
So I do not know at design time if the var ms is going to be a stringreader or a memorystream. So I am trying to do basically this:
Dim ms as object = myfunction...
Dim mytype As Type = ms.GetType
Dim returnedobject = ser.Deserialize(CType(ms, mytype))
But I get an error saying "type mytype is not defined". How can I do this?
I have an application that requires data be entered, and after entering, a button is clicked to process that data. Clicking the button works just as it should--the data is processed properly. In constructing a test module, I provide a set of data values, followed by:
btnWhatever.PerformClick()
Nothing happens. I have used this syntax for years, and it has always worked flawlessly. I have triple checked everything else and isolated the problem to the failure of the PerformClick(). The PerformClick() is in a test subroutine that does nothing but fill textboxes and labels with default data, then calls the PerformClick() on the button to begin processing. Again, the button works fine, the data is entered as it should be, but the PerformClick() does not fire the click event.
If CheckBox_StartHotkey.Checked = True Then
If Not ComboBox_StartHotkey.Text = Nothing Then
Dim StartHotKey As Boolean
StartHotKey = GetAsyncKeyState(ComboBox_StartHotkey.Text)
If StartHotKey = True Then
StartActions()
[Code]...
I am trying to input the function key that a user has selected from a ComboBox (containing the function keys F1~F12 as options) into the GetAsyncKeyState(). However, since the ComboBox_StartHotkey.Text is a string, it cannot be converted into Long data type needed for the GetAsyncKeyState() function. I have tried Conversion and Parse Methods but what I try doesn't seem to work. Anyone know how to effectively convert a String (such as F6) into a Long data type for using in the GetAsyncKeyState() function in this case?
I used the tried to use the ItemData property to hold the Key Code representing the Function Key.
How would I use Select Case with GetAsyncKeyState? Ive tried Select Case GetAsyncKeyState End Select and I get Argument not specified for parameter 'vKey' of 'Declare Ansi Function GetAsyncKeyState Lib "user32"(vKey As Long) As Integer'.
View 2 RepliesI'm not able to use edit and continue feature while debugging my project. I'm using VB 2008 Express Edition on a 32bit winXP version.
I already check on MSDN and found that this feature can be enable in dialog Tools/Options/Debugging.... However, I do not have a Debugging entry in the treeview in this option dialog. I also used to reset the Import/Export setting features in the tool menue. However this did not solve the problem as well. Then I tried to import some settings and I was able to select the option for debugging. However in the tools/option menu, the debugging feature is still not visible. Edit and Continue is not working as well
Its really a pain to debug with the current setup, as I always have to restart my application when I did some minor changes.
Possible Duplicate: Datagridview doesnt work! I have written code to show records in a datagridview but it shows nothing. I have tried to debug & when it step into GetData function following codes
Catch ex As Exception
returnData = Nothing
If connection.State = ConnectionState.Open Then
connection.Close()
End If
become gray & it shows error sign. When I take my mouse pointer on it it shows message. It says "Cannot open database SUIMT requested by the login. The login failed. Login failed for user 'MY-PCJames'".
Imports System.Data.SqlClient
Public Class Form34
Private Const ConnectionString As String = "Server=.SQLEXPRESS;" & _
"Database=SUIMT;Trusted_Connection=True"
[code]....
So I have 2 data files, single dimension, that I'm trying to populate two rtb. If I comment one streamreader out the other will print. This also works in the vise versa situation. Does anybody see where I'm going wrong with this? They won't run together.
Dim Alpha As New System.IO.StreamReader("alpha.dat")
Dim Beta As New System.IO.StreamReader("beta.dat")
Dim strLine As String
[code].....
dim str as nullable(of string) is this syntax incorrect?
View 1 Repliesi'm working on a MDI application and need to view a ".PDF" files in a MDI child form, but when using the AxAcroPDF control it doesent work, note that it works fine when viewing the form separately from the MDI application.
View 14 Repliesthis is my code:
Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
For i = 0 To 1000
[code]....
Has anyone succeeded in creating a class library solution/project in VB.net VS2010 4.0 Net Framework for COM to run on WindowsXP Excel 2003. I created a dll which changed specific data in an excel worksheet. The dll worked just fine on the development computer but wont work on any other. I downloaded .NET 4 framework onto the target PCs and used RegAsm.exe to register both the .dll and .tlb files in the registry. That worked OK and the dll is visible as a reference in excel and can be ticked. The error message I get is RunTime Error -2147024894(80070002): Automation Error The System cannot find the file specified.
I also tried creating a Setup and Deploy project in the original development solution but this created just a vbproj setup file which the target PC cannot read (no VS installed), I hoped the project would create an EXE file I could use. Does anyone know any links that describe how to do this type of stuff as most links I have tried are either for Windows Forms projects are are way above my knowledge. Maybe someone out there has already succeeded with this sort of activity?
I have Visual Studio 2010 Express Edition. I'm using it to evaluate functionality before purchasing the real thing, but I'm having trouble. I want to build a DLL that can be used on PCs other than my development PC, that I can call from VBScript.
I follow the hundreds of examples out on the intranet and things still don't work.I have built a simple HelloWorld DLL with a function that returns "Hello World".I've been through all the stuff about making the assembly COM visible, and the threads about Register for COM Interop checkbox missing. One person suggested editing the .vbproj file and adding a tag to turn on Regiser for COM Interop (which was not needed because it was already there).
Anyway, if I build my project and run my VBScript:
Set testdll = CreateObject("HelloWorld.Class1")
wscript.echo testdll.HelloWorld()
Everything works great. But....if I copy the DLL to another PC and register it with RegAsm, the VBScript fails with a "File not found" error on the CreateObject line of the VBScript.
In fact, if I unregister the DLL on my development PC and then register it with RegAsm, the VBScript now fails on my development PC. RegAsm said everything was okay and if I look in the registery using RegEdit, things look good, but it still doesn't work. The only way to get it to work again is to rebuild the DLL (which in turn, registers the DLL).
I'd like to be able to build a DLL which I can be registered and used on other PCs (without requiring those PCs to have Visual Studio 2010 EE and without requiring them to have the source and build the DLL).
Dim
a As Date? = Nothing
Dim b As Date? = If(a Is Nothing, Nothing, GetValue(a))
I thought b would be Nothing, but it is not...is it a bug?