Iniciar sesi贸n
Crear cuenta
Crear cuentaCrear cuenta| Se han encontrado 2654 coincidencias. | << >> |
| Visual Basic |
| Pregunta: | 43736 - DETECTAR SI EL DECIMAL DE MI EQUIPO ES PUNTO O COMA DESDE VB |
| Autor: | Yamid Rojas |
| Lo que sucede es que para mi programa trabajo separando los decimales con punto, y cuando creo el ejecutable, para poder correrlo en otro equipo necesito saber si este esta configurado
en el panel de control -> configuracion regional y de idioma -> Opcines Regionales -> Personalizar -> Simbolo decimal como punto para que pueda corer el programa, si esta con coma debo enviar un mensaje y el programa no debe arrancar hasta que lo cambie a punto, esta verificaci贸n se debe hacer al iniciar el ejecutable del programa hecho en Visual Basic 6. De antemano gracias por la ayuda que me puedan brindar, es muy urgente, ya que es para mi proyecto de Grado | |
| Respuesta: | Alfonso Salazar |
| Puedes utilizar esta funci贸n:
Public Function Puntodecimal() As String Dim S As String S = Format$(1.5, "0.0") Puntodecimal = Mid$(S, 2, 1) End Function La funci贸n devolver谩 "," o "." seg煤n la configuraci贸n del sistema puedes usarla, por ejemplo: if Puntodecimal = "," then msgbox "Cambiar punto decimal a ""."" end end if | |
| Pregunta: | 43737 - OBTENER MI DIRECCI贸N IP P煤BLICA |
| Autor: | Javier L |
| 驴C贸mo puedo obtener mi direcci贸n IP p煤blica en Visual Basic 6?
El control Winsock solo proporciona la IP local. 驴Hace falta otro control, 贸 librer铆a? Muchas gracias de antemano | |
| Respuesta: | Hans (sowher) Cruz Buchelli |
| Aca te va un code q lo he dise帽ado, pero no se si te servira...
Esa direccion es la correcta Private Sub Form_Load() Dim IPTroyanada As String ' Obtenemos la IP Publica IPTroyanada = Inet1.OpenURL("http://www.emergencias.com.ve/sowher/ipvb.php") MsgBox IPTroyanada, , "sowher / GEDZAC Labs" End End Sub | |
| Respuesta: | Ra煤l Collazo Alvarez |
| Hola Javier...
Bueno... Esta es una manera (aunque un poco lenta) de conseguir la IP p煤blica... En un formulario (frmPrincipal) colocamos un control Microsoft Internet Transfer Control (Inet1) y en un m贸dulo ponemos esta funci贸n... Public Function IPP煤blicaXWeb() As String Dim InfoIP As String Dim Cur1 As Byte, Cur2 As Byte InfoIP = frmPrincipal.Inet1.OpenURL("http://www.showmyip.com/es/", icString) Do While InStr(1, UCase(InfoIP), "</TITLE>") = 0 InfoIP = InfoIP & frmPrincipal.Inet1.GetChunk(100) DoEvents Loop Cur1 = InStr(1, InfoIP, "<TITLE>") + 46 Cur2 = InStr(Cur1, InfoIP, "</TITLE>") - 21 IPP煤blicaXWeb = Mid(InfoIP, Cur1, Cur2 - Cur1) End Function Espero que te sirva... Si alguien conoce una manera m谩s r谩pida, me interesar铆a mucho conocerla. Un saludo!!! | |
| Pregunta: | 43767 - ALMACEN DE RECURSOS |
| Autor: | Sergio Garcia |
| tengo que hacer una aplicacion multiidioma en Visual Basic utilizando un almacen de recursos y no tengo ni idea. 驴lguien podria decirme como se hace? | |
| Respuesta: | SuNcO |
| Pues.. la verdad no te ocupas complicar tanto.. una idea que se me viene a la mente es la manera de como lo usa por ejemplo "Php Nuke"
En un directorio llamado "lenguajes" hay varios archivos llamados dependiendo el lenguaje.. "Espa帽ol", "English" etc... estos contienen variables tipo.. en el archivo en Espa帽ol.. Msg1=click aqui para iniciar en el archivo en Ingles Msg1=click here to start etc.. eh visto varios programas que asi lo hacen | |
| Pregunta: | 43817 - FECHA Y HORA DEL SERVIDOR |
| Autor: | Vadick Acurio |
| Hola amigos programo en visual basic 6.0 y deseo obtener la fecha del servidor o de cualquier otra pc que esta conectada a la red asi como tambien deseo hacer mi acceso a una base de datos en access 2000 mas rapido. Gracias | |
| Respuesta: | Fercho Cavac |
| utiliza select getdate() te devuelve la fecha de sql | |
| Respuesta: | Agust铆n D谩vila |
| Utiliza esta instrucci贸n:
Shell "NET TIME \\Servidor /SET /YES", vbHide Donde 'Servidor' sera el nombre de tu servidor. | |
| Pregunta: | 43836 - CONTROL DE PUERTO USB MEDIANTE VISUAL BASIC |
| Autor: | luis cardenas |
| quisiera saber como puedo controlar el puerto usb a traves del visual basic, es decir lectura y escritura, y la configuracion de los pines del puerto, ya que deseo usar un pic y quisiera saber toda la configuracion y algunos ejemplos previos.
gracias de antemano por su respuesta | |
| Respuesta: | Edgar Morales |
| hola luis, para controlar puertos debes trabar con la libreria "inpout32.dll" la cual cuenta con 2 funciones inp32 y out32 deber leer el valor del puerto en herramientas del sistema el cual sera hexadecimal, ejemplo)
out(378h,0) seria salida al puerto 888 en decimail 0 valores al pin y en inp(378h) solo la direccion del puerto el puerto 378h es el ltp1 o sea el de la impresora. | |
| Pregunta: | 43892 - RELACIONAR VARIABLES DE VISUAL BASIC CON VARIABLES DE C++ |
| Autor: | Sergi Sagarra Carol |
| Tengo unas variables en Visual Basic (versi贸n 6), las variables son double o integer y su valor se lo introduzco en unos textbox. Tambi茅n tengo un programa en C++ (versi贸n Borland C++ 5.01) que tiene definidas unas variables (referidas a las mismas de visual basic), y necesito que los valores que yo ponga en el visual basic sean los valores usados en el programa en C para realizar sus pertinentes calculos.
Muchas gracias! | |
| Respuesta: | eider mauricio Aristiz谩bal Erazo |
| hola, yo te sugiero que las escribas en un archivo el cual lenguaje c va a leer,
dentro del lenguaje c debes hacer un ciclo que no continue hasta que no se haya creado dicho archivo, yo lo he hecho as铆 | |
| Pregunta: | 43957 - PLACA DE SONIDO CON VB |
| Autor: | sebastian marchesini |
| hola masters:
necesito ayuda,quiero utilizar Visual Basic 6 para poder realizar una aplicacion que utilize la placa de sonido onboard y emitir sonidos por ella.Gracias | |
| Respuesta: | Ricardo Faggella |
| Puedes usar la rutina de Api, un objeto Ole o el control multimedia que te brinda una gama amplia de posibilidades para reproducir diferentes formatos de sonido y videos.
Si te interesa, te puedo enviar alg煤n c贸digo Saludos: ROF | |
| Pregunta: | 43974 - CONECTAR VISUAL BASIC 6.0 CON LAS BASES DE DATOS EN FOXPRO |
| Autor: | VICTOR HUGO PEREZ APONTE |
| HE TRATADO DE MUCHAS MANERAS LOGRAR MANEJAR LA BASES DE DATOS DE FOXPRO CON VISUAL BASIC, PERO NO HE PODIDO ENCONTRAR LA FORMA, POR FAVOR SI ALGUIEN ME PUDIERA DECIR SI EN DEFINITIVA, SI ESTO ES POSIBLE 驴SI 脫 NO?. Y SI ES POSIBLE POR FAVOR INDIQUENME 驴COMO? | |
| Respuesta: | joal Diaz |
| Que tal Victor hugo.
En cuanto a tu pregunta, la respues es si, es decir puedes conectar bases de foxpro con visual basic. para ello requiere lo siguiente. 1.- Create una conexion Odbc, es decir desde panel de control selecciona ODBC. 2.- Debes crear un Dns de Usuario 3.- Alli le indicas la base de datos que quieres abrir, y si no tiene base de datos sino tablas, entonces indicale el nombre de la carpeta.aDEMAS DE TODO ESTO INDICALE UN NOMBRE. 4.- Una vez realizado todo esto puedes conectar la tabla con visual Basic, usando un control Ado y cuando lo configures asignale un proveedor ODBC Y SELECCIONA EL QUE HAYAS CREADO POR LOS PASOS 123 | |
| Pregunta: | 44009 - DATOS TIPO "MONEDA" EN VB6 |
| Autor: | Emilio Dubois |
| Tengo un problema, estoy haciendo un sistema en visual basic, que consulta una base de datos hecha en Access, lo que pasa es que no se como trabajar con los campos "moneda", ya que segun lo que estuve probando, visual usa el "." para los lugares decimales y la base de datos la ",". La funcion val() para variar, tampoco me tomo los numeros con "," y no tuve exito usando el dataformat del textbox a cargar. La cosa es que dentro del programa tengo que sumar y trabajar con los datos traidos, por lo que si o si necesito convertir la "," en ".". tambien pense usar la funcion "split" y volver a encadenar los segmentos con el punto en el medio, pero me parecio una solucion agarrada de los pelos, quisiera algo un poco mas eficiente. Cualquier ayuda, queda infinitamente agradecida. | |
| Respuesta: | sergio ureta |
| prueba a cambiar el tipo de datos en la base de datos, para q no te de problemas con la , y el . q dependede la configuracion de sistema... cambia los datos de moneda a numerico simple con formato euro y el numero de decimales q kieras q me imagino q 2, espero q te funcione xao | |
| Respuesta: | Carlos Ra煤l Sagastume Estrada |
| Mira lo que puedes hacer en ese campo de la moneda def铆nelo como texto as铆 te puede leer el punto decimal y a la hora de extraer los datos utiliza el siguiente instrucci贸n:
Dim moneda as single (realizas las respectivas instrucciones) moneda = format(total, "Currency") De esta forma te detecta autom谩ticamente el formato de la moneda como est茅 configurada en tu pc. Atentamente Carlos Sagastume | |
| Pregunta: | 44179 - IMAGENES CRYSTAL REPORTS |
| Autor: | Iracema Mondrag贸n Romero |
| Hola, tengo un problema con una aplcaci贸n en visual basic, necesito saber como puedo mandar la ubicaci贸n de una imagen a crystal para que cargue dicha imagen en un reporte de crystal, hasta ahora no encuentro la forma de pasar una imagen como parametro, espero puedan ayudarme, espero respuesta, Gracias......... | |
| Respuesta: | SuNcO |
| Hace como 1 semana tuve la misma pregunta pero lo resolvi buscandole, aunque recibi una respuesta algo dificil
Con algo de ingenio lo pude hacer mucho mas sencillo Si la base de datos es de access, ocupas crear un campo llamado por ejemplo "foto" el cual es de tipo "binary". Cuando eliges la imagen, para guardarla en ese campo lo puedes hacer asi... ' Declaracion Private La_Imagen As ADODB.Stream ' En la parte de Load Set La_Imagen = New ADODB.Stream ' En algun Boton Dim abtyImage() As Byte, hFile As Long, lngSize As Long With Data1.Recordset .AddNew strFile = "ruta del archivo" ' Liberamos por si esta abierto el Archivo hFile = FreeFile ' Lo Abrimos en modo Binario Open strFile For Binary Access Read As hFile ' Vemos cuanto mide lngSize = LOF(hFile) ' Si mide mas de 0... If lngSize > 0 Then ' Agrandar el arreglo de 1 a cuanto mide el Archivo ReDim abtyImage(1 To lngSize) As Byte ' Leer el Archivo y meterlo en el Arreglo Get hFile, , abtyImage() End If ' Cerrar el Archivo Close hFile ' Enviarle el Arreglo al campo "foto" .Fields("foto") = abtyImage() ' Actualizar .Update End With Crystal1.PrintReport Asi me funciona bien a mi =) | |
| |< << 221 222 223 224 225 226 227 228 229 230 231 >> >| |