Ver Mensaje Individual
  #1 (permalink)  
Antiguo 03/02/2011, 23:40
darksitoo
 
Fecha de Ingreso: marzo-2010
Mensajes: 78
Antigüedad: 14 años, 8 meses
Puntos: 0
Ayuda por favor

Miren tengo este codigo en visual basic...

Código vb:
Ver original
  1. Option Explicit On
  2. Public Class Form1
  3.     Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
  4.  
  5.     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  6.         Dim server As String
  7.         server = "foro"
  8.     End Sub
  9.  
  10.     Private Sub OpenFile(ByVal sURL As String)
  11.         Dim nRetVal As Long
  12.         ShellExecute(nRetVal, "open", sURL, "", "", 1)
  13.     End Sub
  14.  
  15.     Private Sub sFile_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles sFile.Click
  16.         OpenFile("http://" + server + ".com")
  17.     End Sub
  18. End Class

lo que pasa es en la linea "OpenFile("http://" + server + ".com")" no se como hacer para poder meter la variable dentro de ese parentesis x.x ya he intentado con [server] y $server

gracias!