Codigo Visual Basic Atomos Y Esferas De Metal

Páginas: 3 (693 palabras) Publicado: 6 de marzo de 2013
|Metal |Simbolo |PM (g/mol) |Densidad (g/mol) |
|Aluminio |Al|26.98 |2.7 |
|Titanio |Ti |47.67 |4.79|
|Cromo |Cr |51.99 |7.19 |
|Hierro |Fe|55.84 |7.9 |
|Niquel |Ni |58.69 |8.9|
|Cobre |Cu |63.54 |8.96 |
|Cinc |Zn|65.4 |7.15 |
|Plata |Ag |107.9|10.5 |
|ORO |Au |197 |19.32 |


Atomos en esferas demetal



Algunos Metales de la tabla periodica





Marco Teorico

[pic]



















Pantalla de información y Tabla de propiedades

[pic]

|Control|Tipo |Nombre |Propiedad |
|1 |Form |NumeroAtomos|Caption:Atomos en esferas de |
| | | |metal |
|2...
Leer documento completo

Regístrate para leer el documento completo.

Estos documentos también te pueden resultar útiles

  • Visual Basic Codigos

    ...Dim codfac As Integer Dim cant As Integer Private Sub borrar_Click() Dim r As Integer On Error GoTo rutinadeerror r = MsgBox("¿Desea borrar el Registro?", vbYesNo, "ATENCION") If r <> vbYes Then Exit Sub Adodc2.Recordset.Delete Adodc2.Recordset.MoveNext sumar If Adodc2.Recordset.EOF Then Adodc2.Recordset.MoveLast Total = 0 DataGrid1.Row = 0 DataGrid1.Col = 4 ' Suponemos columna del importe For i = 1 To DataGrid1.ApproxCount...

    Leer más
    642 Palabras 3 Páginas
  • Codigo en visual basic

    ...Option Explicit Dim i As Long Dim Tiempo As String Dim cw As Integer Dim ve As Integer Dim f As Integer Private Sub cmdDetener_Click() Timer1.Interval = 0 CmdIniciar.Enabled = True LblAcierto.Caption = "0" LblError.Caption = "0" End Sub Private Sub CmdIniciar_Click() i = 0 Timer1.Interval = 0 Lblcronometro.Caption = "" Timer1.Interval = 1 CmdIniciar.Enabled = False CmdTrasladar.Enabled = True LblPregunta.Caption = "Si realmente te sientes listo da click en 'Trasladar'" End...

    Leer más
    704 Palabras 3 Páginas
  • codigos imagenes visual basic

    ... Private Sub Command1_Click() Dim formato As String Rem guarda en formato lo que se digite en la caja de texto formato = Text1.Text Rem mostrar un mensaje de acuerdo con la edad Select Case formato Case Is = "bogota" Label2.Caption = "bogota,oficialmente bogota distrito capital(D.C)es la ciudad capital de la republica de colombia y del departamento de cundinamarca esta organizada como distrito capital, gozando de autonomia para la gestion de sus intereses dentro de los limites de...

    Leer más
    896 Palabras 4 Páginas
  • Codigos visual basic

    ...Descripción En esta página hay dos ejemplos para poder autocompletar mientras se escribe en un control DataCombo El primer Código lo hace utilizando la propiedad MatchEntry del DataCombo para poder autocompletar mientras se escribe en el control. El segundo código fuente, lo hace buscando con la propiedad Find del recordset, y seleccionando y autocompletando en caso de coincidencias   1 - Autocompletar usando la propiedad MatchEntry Esta propiedad tiene dos...

    Leer más
    1429 Palabras 6 Páginas
  • Codigo Visual Basic Para Transparencia

    ...Imports System.Data Imports System.Data.OleDb Public Class Form1 ' Aqui se declara la cadena de cnexion con la base de datos de Access ' se debe incluir la ruta y nombre completo del archivo Dim strConexion As String = "provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Ejemplo\categorias.accdb" Dim strComando As String = "select * from categorias" Dim DA As OleDbDataAdapter Dim DS As New DataSet() Dim CB As OleDbCommandBuilder Dim Posicion As Integer...

    Leer más
    567 Palabras 3 Páginas
  • Codigo para imprimir un DataGrid en Visual Basic 2010

    ...como imprimir el contenido de un datagrid, me veo en la obligación a hacer el mismo ejemplo en VB.NET, sobre todo porque el código que puse en los comentarios tenía algún error. Recordando el ejemplo, se trata de un formulario que contiene: - un datagrid llamado DataGridView1 - un botón llamado Button1 - un PrintDocument llamado PrintDocument1 Y aquí tenéis el código: Public Class Form1 ' Variable a nivel de clase para recordar en qué punto nos hemos...

    Leer más
    548 Palabras 3 Páginas
  • Códigos Para Visual Basic

    ...-cateto opuesto Private Sub Option3_Click() Text3.Text = Sqr(Val(Text1.Text) - Val(Text2.Text)) End Sub -cateto ayacente Private Sub Command1_Click() If Text1.Text = "Breaking" And Text2.Text = "789123369" Then MsgBox "Código Correcto" Else MsgBox "Código Incorrecto" End If End Sub Private Sub Command1_Click() Text13.Text = Val(Text1.Text) + Val(Text7.Text) Text14.Text = Val(Text2.Text) + Val(Text8.Text) Text15.Text = Val(Text3.Text) +...

    Leer más
    440 Palabras 2 Páginas
  • Codigos de visual basic

    ...Aplicaciones multiproceso Visual Studio 2008 Otras versiones Este tema aún no ha recibido ninguna valoración - Valorar este tema Actualización: noviembre 2007 Con Visual Basic, puede crear aplicaciones que realicen varias tareas de forma simultánea. Las tareas con la posibilidad de mantener otras tareas pueden ejecutarse en subprocesos separados, un proceso que se conoce como subprocesamiento múltiple o subprocesamiento libre. Las...

    Leer más
    4474 Palabras 18 Páginas

OTRAS TAREAS POPULARES

Conviértase en miembro formal de Buenas Tareas

INSCRÍBETE - ES GRATIS