- 博客(5)
- 收藏
- 关注
RSS订阅
1原创 数据处理 ransac
Imports System.IOPublic Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim d As Double d = Val(TextBox2.Text) 'Dim str As New StreamReader("C:\Users\HR\Desktop\新建文本文档.txt") .
2021-12-29 17:13:04
288
原创 vb数据读取
Imports System.IOPublic Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click File.OpenRead("C:\Users\HR\Desktop\新建文本文档.txt") Dim str As IO.StreamReader Dim s1 As String str = Ne.
2021-12-29 17:11:44
367
原创 定时器输出
Public Class Form1 Dim a As Integer Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick a += 1 TextBox1.Text = a End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles B...
2021-12-29 17:08:48
196
原创 【无标题】登录
Imports System.IOPublic Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim sw1 As New StreamReader("E:\学习程序\yh.txt", True) Dim strTemp As String Dim strs() As String While.
2021-12-29 17:03:46
155
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人