Pergunta : Ho você cria um planejador/diário do espaço temporal em vb.net

OLÁ! eu quero criar um espaço temporal para mostrar os eventos para o dia. Eu não tenho nenhuma idéia onde começar ou como ir aproximadamente ele. Eu pensei posso ser um gráfico mas eu quero povos poder arrastar - e - deixo cair zumbo dentro e out.
I fizeram somente a base de dados dar forma a apps assim que este será uma curva de aprendizagem. Mas se alguém poderia me apontar no sentido correto e dar quaisquer sugestões que fossem grandes. nome de arquivo " vazio " >

timeline.jpg " fileSize " > (41 KB) Javascript " do href= o " dos " attachmentDetails do class= de (tipo de lima detalhes) a descrição " do class= de
This é o que eu quero largura do style= >
>
class= do

Resposta : Ho você cria um planejador/diário do espaço temporal em vb.net

Uma linha de tempo é um retângulo, então using:
    g.FillRectangle (HB, r) onde - g - gráficos, HB - escova, r - retângulo

Às côordenadas eval do retângulo, você precisa
   DateScrMin, DateScrMax - limites de data para a área de tela. Quando o zumbido você mudar limites.
   Não ofuscante Kt como único = (DateScrMax.ticks -) de DateScrMin.ticks/WidthScreenArea

  Agora para o intervalo Date1-Date2:
      xDate1 = ScreenArea.Left + Kt * (Date1.ticks - DateScrMin.ticks)
      barWidth= Kt * (Date2.ticks - Date1.ticks)

O código da amostra para extrair o encabeçamento do calendário, extrai o dia da traça e o dia do projeto.
Usa a cor vermelha para domingo e holydays, azul para sábado.
Neste código, tipo da data do uso do do´n de I, eu uso o tipo de FechaCpm (minutos) Date.Ticks/Timespan.ticksPerMinute
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
 'Dibujar Calendario
      Dmin não ofuscante como o inteiro = o FCalMin.Dia, xref como o dobro = o FCalMin.value * Kt - R_Cal.X
      dMax não ofuscante como o inteiro = o FscrMax.Dia
      Ktd não ofuscante como o dobro = o Kt * 1440 'día do por dos pixéis

      YO = R_Cal.Y: y1 = R_Cal.Bottom - 2: x = R_Cal.X
      g.FillRectangle (Brushes.White, R_Cal)
      Inferior de DrawHline (g, y1) 'Línea
      Inferior de DrawHline (g, R_GrAct.Bottom) 'Línea

      x - = 1: g.DrawLine (Pens.Black, x, YO, x, y1)
      'x - = 2: g.DrawLine (Pens.Black, x, YO, x, y1) 'Izda Calendario

      X0 não ofuscante como o inteiro = o R_Cal.X, x1 como o inteiro
      Ta. Alinhamento = StringAlignment.Center
      Para d como o inteiro = o dmin ao dMax
         x1 = CInt ((d + 1) * ktd - xref) 'se d < dMax="" Then="">= 0 então n += 1
         s = n.ToString
         Se (s.Length * TW)  <>
           
Outras soluções  
 
programming4us programming4us