在VB（Visual Basic）中，选择单元格的数值可以通过以下几种方法实现：
使用Excel对象模型
创建一个Excel应用程序对象。
打开指定的Excel文件。
获取指定工作表和单元格的引用。
读取单元格的值。
示例代码：
```vb
Dim xlApp As Object
Dim xlBook As Object
Dim xlSheet As Object
Dim cellValue As String
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("C:\YourExcelFile.xlsx")
Set xlSheet = xlBook.Sheets("Sheet1")
' 获取单元格A1的值
cellValue = xlSheet.Range("A1").Value
MsgBox cellValue
xlBook.Close
Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing
```
使用NumberFormat属性
通过设置单元格的NumberFormat属性来指定特定范围内单元格的小数位数。
示例代码：
```vb
Range("A1").NumberFormat = "0.00"
```
使用ActiveSheet和Cells方法
通过ActiveSheet对象和Cells方法来访问和操作单元格。
示例代码：
```vb
With ActiveSheet
r = 2
If Sheets("afix").Cells(r, 1) = "" Then
GoTo ends
End If
If Sheets("afix").Cells(r, 1) = 18.8 Then
' 执行操作
End If
End With
```
使用DataGridView控件
如果是在WinForms应用程序中，可以使用DataGridView控件来获取选中的单元格值。
示例代码：
```vb
Text = DataGridView_View.SelectedRows(0).DataBoundItem(0)
```
使用文件输入输出
如果是在处理文本文件，可以使用File Input/Output流来读取和写入数据。
示例代码：
```vb
Open "data.txt" For Input As 1
count = 0
sum = 0
Do While Not EOF(1)
Line Input 1, line
count = count + 1
ReDim Preserve numbers(count - 1)
numbers(count - 1) = Val(line)
sum = sum + numbers(count - 1)
Loop
Close 1
```
根据你的具体需求选择合适的方法来获取和操作单元格的数值。如果你需要在VB中处理Excel文件，建议使用Excel对象模型，因为它提供了更强大和灵活的功能。如果你是在WinForms应用程序中处理数据，DataGridView控件可能是一个更方便的选择。对于文本文件的处理，文件输入输出流是一个简单有效的方法。