Переделываю свою прогу написанную на vb6 под vb 10. И завис.Ниже дам код 6. И укажу где затык.
Private Sub Form_Load()<br/>
Slider1.Max = 255<br/>
Slider1.Min = 0<br/>
Slider1.TickFrequency = 10<br/>
Slider1.LargeChange = 10<br/>
MSComm1.RThreshold = 3///10 ????<br/>
MSComm1.InputLen = 3///10 ????<br/>
MSComm1.Settings = "9600,n,8,1"///10 ????<br/>
MSComm1.CommPort = 6<br/>
MSComm1.PortOpen = True<br/>
MSComm1.DTREnable = False///10 ????<br/>
Picture1.ScaleWidth = 1000<br/>
Picture1.AutoRedraw = True<br/>
End Sub<br/>
<br/>
Private Sub Form_Unload(Cancel As Integer)<br/>
MSComm1.PortOpen = False<br/>
End Sub<br/>
<br/>
Private Sub Slider1_Change()<br/>
MSComm1.Output = Chr$(Slider1.Value) //Как переделать данную строку под 10-й??<br/>
Label3.Caption = Slider1.Value<br/>
End Sub<br/>