Tener el conocimiento de cómo hacer llamadas telefónicas desde un Microsoft Visual Basic.NET ( VB.NET ) la aplicación puede ahorrar tiempo si usted necesita para hacer llamadas continuamente. VB.NET es un lenguaje de programación utilizado para crear aplicaciones móviles , web y de escritorio. Hacer llamadas telefónicas de VB.NET se puede lograr mediante la interfaz de programación de aplicaciones de telefonía ( TAPI ) . TAPI proporciona a los programadores las capas necesarias para acceder a los archivos DLL de Microsoft Telefonía ( bibliotecas de vínculos dinámicos ) . Telefonía integra ordenadores con dispositivos tales como cámaras y redes de Internet . Cosas que necesitará
Microsoft Visual Basic Express
Ver Más instrucciones
1

Inicie Microsoft Visual Basic Express , haga clic en "Nuevo proyecto ... " en el panel izquierdo de la pantalla y seleccione " Aplicación de Windows Forms ". Haga clic en " Aceptar".
2

doble clic en " botón" en la " caja de herramientas " para añadir un nuevo botón . Haga doble clic en " Label " para añadir una etiqueta. Añadir una segunda etiqueta con el mismo proceso . Haga doble clic en " TextBox " para agregar un cuadro de texto.
3

doble clic en " Button1 " para abrir el módulo " Form1.vb " . Copia y pega el siguiente en la primera línea del módulo:

Imports System.Windows.Forms
4

Copia y pega el siguiente para declarar la DLL TAPI32 en " Public Class Form1 ", pero por encima de la " Button1_Click "Procedimiento :

Declarar Función Auto tapiRequestMakeCall Lib" tapi32.dll "_

( DestAddress ByVal como secuencia, AppName ByVal As String , _
< p > CalledParty ByVal como secuencia , el comentario de ByVal como secuencia) como Integer

Const TAPIERR_NOREQUESTRECIPIENT Como corta: -2

Const TAPIERR_REQUESTQUEUEFULL Como Short = -3

Const TAPIERR_INVALDESTADDRESS Como corta: -4

el procedimiento " Button1_Click " se ha creado al hacer doble clic en " Button1 " en su formulario .
5

Copia y pega el siguiente dentro del procedimiento " Button1_Click " para crear las variables :

phoneNum Dim As String Dim

TResult en corto

tmpStr dévil como secuencia

El procedimiento " Button1_Click " se ha creado cuando se hace doble - hace clic en " Button1 " en su Formulario
6

Copia y pega el siguiente para conseguir el número de teléfono introducido en el cuadro de texto y lo llaman : .

phoneNum = Trim ( TextBox1.Text )

Trate

TResult = tapiRequestMakeCall ( phoneNum , "Dial " , phoneNum , "")

Catch ex As Exception

Label2.Text = " Error "

End Try
7

Copia y pega el siguiente para comprobar si hay errores :

Si TResult < > 0 Entonces

tmpStr = "Error"

Select Case TResult

Case TAPIERR_NOREQUESTRECIPIENT

tmpStr = tmpStr & " No aplicación de marcación de telefonía de Windows está en ejecución y no se pudo iniciar. "

Case TAPIERR_REQUESTQUEUEFULL

tmpStr = tmpStr y " La cola de espera de las solicitudes de marcado de telefonía de Windows está lleno. "

Case TAPIERR_INVALDESTADDRESS

tmpStr = tmpStr y " El número de teléfono no es válido. "

Case Else

tmpStr = tmpStr y " error Unkown ".

End Select

demás

tmpStr = "Marcado "

End If

Label2.Text = tmpStr

End Sub End Class

8

Press "F5 " para ejecutar el programa , a continuación, introduzca un número de teléfono en el cuadro de texto y haga clic en " Button1 ".